+setTextDecr = {
+ \set decrescendoText = \markup { \italic "decr." }
+ \set decrescendoSpanner = #'dashed-line
+}
+
+setTextDim = {
+ \set decrescendoText = \markup { \italic "dim." }
+ \set decrescendoSpanner = #'dashed-line
+}
+setHairpinCresc = {
+ \unset crescendoText
+ \unset crescendoSpanner
+}
+setHairpinDecresc = {
+ \unset decrescendoText
+ \unset decrescendoSpanner
+}
+setHairpinDim = {
+ \unset decrescendoText
+ \unset decrescendoSpanner
+}