-lowerDynamics = \notes{
- s2
- | %2
- s2\sustainDown s8. s16\sustainUp s4
- | %3
- s2\sustainDown s8. s16\sustainUp s4
- | %4
- s4\sustainDown
- \set Dynamics.pedalSustainStrings = #'("Ped." "*Ped." "*")
-
- % grace destroys pedal-line-spanner?
- % let's do manual tweak:
- \once\override Dynamics.SustainPedal #'extra-offset = #'(10 . 0) %tweak
- s8\sustainUp
- \once\override Dynamics.SustainPedal #'extra-offset = #'(16 . 0) %tweak
- s8\sustainDown
-%{
- s4
- \grace {
- \override Stem #'stroke-style = #"grace"
-
- s8
- s16 s s
- s32 s s s\sustainUp
- s32 s s s\sustainDown
-
- \revert Stem #'stroke-style }
-
-%}
- s2
-
- | %5
- % ugh, I don't think that 'mixed should show last edge, but rather:
- %
- % Ped__________/\__________ *
- %
- % that's what gray wants, anyway.
-
- \set Dynamics.pedalSustainStyle = #'mixed
- s8\sustainDown s s
- s s\sustainUp\sustainDown s
- s
- \once \set Dynamics.pedalSustainStyle = #'text
- s\sustainUp
-
- | %6
- \set Dynamics.pedalSustainStyle = #'mixed
- s8\sustainDown s s
- s s\sustainUp\sustainDown s
- s
- \once \set Dynamics.pedalSustainStyle = #'text
- s\sustainUp
- | %7
-}
-
-\score{