c, d16[ c c c] e[ e \sustainOff \sustainOn e e ] f4 \sustainOff
g\sustainOn b \sustainOff c
\set Staff.pedalSustainStrings = #'("-" "-P" "P")
c, d16[ c c c] e[ e \sustainOff \sustainOn e e ] f4 \sustainOff
g\sustainOn b \sustainOff c
\set Staff.pedalSustainStrings = #'("-" "-P" "P")