2 Common italian names for notes. "b" means flat (bemolle), "d" means sharp (diesis)
6 Italian: la si do re mi fa sol
8 For french naming just change 'do' in 'ut'.
11 % contributed by Paolo Zuliani <<zuliap@easynet.it>>
14 (dobb . ,(ly:make-pitch -1 0 DOUBLE-FLAT))
15 (dob . ,(ly:make-pitch -1 0 FLAT))
16 (do . ,(ly:make-pitch -1 0 NATURAL))
17 (dod . ,(ly:make-pitch -1 0 SHARP))
18 (dodd . ,(ly:make-pitch -1 0 DOUBLE-SHARP))
19 (rebb . ,(ly:make-pitch -1 1 DOUBLE-FLAT))
20 (reb . ,(ly:make-pitch -1 1 FLAT))
21 (re . ,(ly:make-pitch -1 1 NATURAL))
22 (red . ,(ly:make-pitch -1 1 SHARP))
23 (redd . ,(ly:make-pitch -1 1 DOUBLE-SHARP))
24 (mibb . ,(ly:make-pitch -1 2 DOUBLE-FLAT))
25 (mib . ,(ly:make-pitch -1 2 FLAT))
26 (mi . ,(ly:make-pitch -1 2 NATURAL))
27 (mid . ,(ly:make-pitch -1 2 SHARP))
28 (midd . ,(ly:make-pitch -1 2 DOUBLE-SHARP))
29 (fabb . ,(ly:make-pitch -1 3 DOUBLE-FLAT))
30 (fab . ,(ly:make-pitch -1 3 FLAT))
31 (fa . ,(ly:make-pitch -1 3 NATURAL))
32 (fad . ,(ly:make-pitch -1 3 SHARP))
33 (fadd . ,(ly:make-pitch -1 3 DOUBLE-SHARP))
34 (solbb . ,(ly:make-pitch -1 4 DOUBLE-FLAT))
35 (solb . ,(ly:make-pitch -1 4 FLAT))
36 (sol . ,(ly:make-pitch -1 4 NATURAL))
37 (sold . ,(ly:make-pitch -1 4 SHARP))
38 (soldd . ,(ly:make-pitch -1 4 DOUBLE-SHARP))
39 (labb . ,(ly:make-pitch -1 5 DOUBLE-FLAT))
40 (lab . ,(ly:make-pitch -1 5 FLAT))
41 (la . ,(ly:make-pitch -1 5 NATURAL))
42 (lad . ,(ly:make-pitch -1 5 SHARP))
43 (ladd . ,(ly:make-pitch -1 5 DOUBLE-SHARP))
44 (sibb . ,(ly:make-pitch -1 6 DOUBLE-FLAT))
45 (sib . ,(ly:make-pitch -1 6 FLAT))
46 (si . ,(ly:make-pitch -1 6 NATURAL))
47 (sid . ,(ly:make-pitch -1 6 SHARP))
48 (sidd . ,(ly:make-pitch -1 6 DOUBLE-SHARP))