X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fdynamic-scripts-init.ly;h=570197ed146b7dead55b74a460695da2aa2be4ce;hb=eba67a0bc70f38a7847de75c640d7ad19c6fd804;hp=b4c85955b1fb2ebaa0f722e7d44214394b72b0d2;hpb=ecaf73bb03e974018c17e3051b3ac3a805dd1653;p=lilypond.git

diff --git a/ly/dynamic-scripts-init.ly b/ly/dynamic-scripts-init.ly
index b4c85955b1..570197ed14 100644
--- a/ly/dynamic-scripts-init.ly
+++ b/ly/dynamic-scripts-init.ly
@@ -1,4 +1,4 @@
-\version "2.1.28"
+\version "2.16.0"
 
 %
 % declare the standard dynamic identifiers.
@@ -7,17 +7,22 @@
 #(define (make-dynamic-script str)
    (make-music 'AbsoluteDynamicEvent
               'text str))
-ppppp = #(make-dynamic-script "pppp")
+
+%% don't exceed ppppp or fffff; see midi.scm.
+ppppp = #(make-dynamic-script "ppppp")
 pppp = #(make-dynamic-script "pppp")
 ppp = #(make-dynamic-script "ppp")
 pp = #(make-dynamic-script "pp")
 p = #(make-dynamic-script "p")
 mp = #(make-dynamic-script "mp")
 mf = #(make-dynamic-script "mf")
-f = #(make-dynamic-script "f")
+
+%% f is pitch.
+"f" = #(make-dynamic-script "f")
 ff = #(make-dynamic-script "ff")
 fff = #(make-dynamic-script "fff")
 ffff = #(make-dynamic-script "ffff")
+fffff = #(make-dynamic-script "fffff")
 fp = #(make-dynamic-script "fp")
 sf = #(make-dynamic-script "sf")
 sfp = #(make-dynamic-script "sfp")