]> git.donarmstrong.com Git - lilypond.git/blob - ly/espanol.ly
0c7598d7df8f493601ff127ac5dbc4fdf87c4d6f
[lilypond.git] / ly / espanol.ly
1 %{
2
3  Common Spanish names for notes. "b" means flat (bemol), "s" means sharp (sostenido).
4  Adapted from italiano.ly.
5
6  English: a   b   c   d   e   f   g
7  Spanish: la  si  do  re  mi  fa  sol
8
9 %}
10
11 % contributed by Carlos García Suárez <<cgscqmp@terra.es>>
12
13
14 % For using "sostingut" notation, which is also correct
15 pitchnamesEspanol = #`(
16         (dobb . ,(ly:make-pitch -1 0 DOUBLE-FLAT))
17         (dob . ,(ly:make-pitch -1 0 FLAT))
18         (do . ,(ly:make-pitch -1 0 NATURAL))
19         (dos . ,(ly:make-pitch -1 0 SHARP))
20         (doss . ,(ly:make-pitch -1 0 DOUBLE-SHARP))
21
22         (rebb . ,(ly:make-pitch -1 1 DOUBLE-FLAT))
23         (reb . ,(ly:make-pitch -1 1 FLAT))
24         (re . ,(ly:make-pitch -1 1 NATURAL))
25         (res . ,(ly:make-pitch -1 1 SHARP))
26         (ress . ,(ly:make-pitch -1 1 DOUBLE-SHARP))
27
28         (mibb . ,(ly:make-pitch -1 2 DOUBLE-FLAT))
29         (mib . ,(ly:make-pitch -1 2 FLAT))
30         (mi . ,(ly:make-pitch -1 2 NATURAL))
31         (mis . ,(ly:make-pitch -1 2 SHARP))
32         (miss . ,(ly:make-pitch -1 2 DOUBLE-SHARP))
33
34         (fabb . ,(ly:make-pitch -1 3 DOUBLE-FLAT))
35         (fab . ,(ly:make-pitch -1 3 FLAT))
36         (fa . ,(ly:make-pitch -1 3 NATURAL))
37         (fas . ,(ly:make-pitch -1 3 SHARP))
38         (fass . ,(ly:make-pitch -1 3 DOUBLE-SHARP))
39
40         (solbb . ,(ly:make-pitch -1 4 DOUBLE-FLAT))
41         (solb . ,(ly:make-pitch -1 4 FLAT))
42         (sol . ,(ly:make-pitch -1 4 NATURAL))
43         (sols . ,(ly:make-pitch -1 4 SHARP))
44         (solss . ,(ly:make-pitch -1 4 DOUBLE-SHARP))
45
46         (labb . ,(ly:make-pitch -1 5 DOUBLE-FLAT))
47         (lab . ,(ly:make-pitch -1 5 FLAT))
48         (la . ,(ly:make-pitch -1 5 NATURAL))
49         (las . ,(ly:make-pitch -1 5 SHARP))
50         (lass . ,(ly:make-pitch -1 5 DOUBLE-SHARP))
51
52         (sibb . ,(ly:make-pitch -1 6 DOUBLE-FLAT))
53         (sib . ,(ly:make-pitch -1 6 FLAT))
54         (si . ,(ly:make-pitch -1 6 NATURAL))
55         (sis . ,(ly:make-pitch -1 6 SHARP))
56         (siss . ,(ly:make-pitch -1 6 DOUBLE-SHARP))
57 )
58
59 pitchnames = \pitchnamesEspanol
60
61 \version "2.3.8"
62
63 #(ly:parser-set-note-names parser pitchnames)