with s for sharp and f for flat.
%}
-\pitchnames #`(
+pitchnamesEnglish = #`(
(cflatflat . ,(ly:make-pitch -1 0 DOUBLE-FLAT))
(cflat . ,(ly:make-pitch -1 0 FLAT))
(c . ,(ly:make-pitch -1 0 NATURAL))
(bx . ,(ly:make-pitch -1 6 DOUBLE-SHARP))
)
-\version "1.9.7"
+pitchnames = \pitchnamesEnglish
+\version "2.7.39"
+
+
+#(ly:parser-set-note-names parser pitchnames)