X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fnorsk.ly;h=5b02889ab43a9b66abbc9be80061fb784c9e5d7f;hb=0aa76be34498475f09693cba89b17be8a1f13b8f;hp=4414041af76b15979ce15bc8dc602c8cf78a7c15;hpb=aa384518d059d26ffd6c0da3068fbdc2a345ecc1;p=lilypond.git diff --git a/ly/norsk.ly b/ly/norsk.ly index 4414041af7..5b02889ab4 100644 --- a/ly/norsk.ly +++ b/ly/norsk.ly @@ -23,85 +23,88 @@ added "ass" et al, and made some b->h-related changes. There may be bugs in here please tell me (or send patches) if you find any. - Arvid Gr=F8tting + Arvid Gr=F8tting <> %} -\pitchnames #`( - (ceses . ,(make-pitch -1 0 -2 )) - (cessess . ,(make-pitch -1 0 -2 )) - (ces . ,(make-pitch -1 0 -1 )) - (cess . ,(make-pitch -1 0 -1 )) - (c . ,(make-pitch -1 0 0 )) - (cis . ,(make-pitch -1 0 1 )) - (ciss . ,(make-pitch -1 0 1 )) - (cisis . ,(make-pitch -1 0 2 )) - (cississ . ,(make-pitch -1 0 2 )) - (deses . ,(make-pitch -1 1 -2 )) - (dessess . ,(make-pitch -1 1 -2 )) - (des . ,(make-pitch -1 1 -1 )) - (dess . ,(make-pitch -1 1 -1 )) - (d . ,(make-pitch -1 1 0 )) - (dis . ,(make-pitch -1 1 1 )) - (diss . ,(make-pitch -1 1 1 )) - (disis . ,(make-pitch -1 1 2 )) - (dississ . ,(make-pitch -1 1 2 )) - (eeses . ,(make-pitch -1 2 -2 )) - (eessess . ,(make-pitch -1 2 -2 )) - (eses . ,(make-pitch -1 2 -2 )) - (essess . ,(make-pitch -1 2 -2 )) - (ees . ,(make-pitch -1 2 -1 )) - (eess . ,(make-pitch -1 2 -1 )) - (es . ,(make-pitch -1 2 -1 )) - (ess . ,(make-pitch -1 2 -1 )) - (e . ,(make-pitch -1 2 0 )) - (eis . ,(make-pitch -1 2 1 )) - (eiss . ,(make-pitch -1 2 1 )) - (eisis . ,(make-pitch -1 2 2 )) - (eississ . ,(make-pitch -1 2 2 )) - (feses . ,(make-pitch -1 3 -2 )) - (fessess . ,(make-pitch -1 3 -2 )) - (fes . ,(make-pitch -1 3 -1 )) - (fess . ,(make-pitch -1 3 -1 )) - (f . ,(make-pitch -1 3 0 )) - (fis . ,(make-pitch -1 3 1 )) - (fiss . ,(make-pitch -1 3 1 )) - (fisis . ,(make-pitch -1 3 2 )) - (fississ . ,(make-pitch -1 3 2 )) - (geses . ,(make-pitch -1 4 -2 )) - (gessess . ,(make-pitch -1 4 -2 )) - (ges . ,(make-pitch -1 4 -1 )) - (gess . ,(make-pitch -1 4 -1 )) - (g . ,(make-pitch -1 4 0 )) - (g . ,(make-pitch -1 4 0 )) - (gis . ,(make-pitch -1 4 1 )) - (giss . ,(make-pitch -1 4 1 )) - (gisis . ,(make-pitch -1 4 2 )) - (gississ . ,(make-pitch -1 4 2 )) - (aeses . ,(make-pitch -1 5 -2 )) - (aessess . ,(make-pitch -1 5 -2 )) - (ases . ,(make-pitch -1 5 -2 )) - (assess . ,(make-pitch -1 5 -2 )) - (aes . ,(make-pitch -1 5 -1 )) - (aess . ,(make-pitch -1 5 -1 )) - (as . ,(make-pitch -1 5 -1 )) - (ass . ,(make-pitch -1 5 -1 )) - (a . ,(make-pitch -1 5 0 )) - (ais . ,(make-pitch -1 5 1 )) - (aiss . ,(make-pitch -1 5 1 )) - (aisis . ,(make-pitch -1 5 2 )) - (aississ . ,(make-pitch -1 5 2 )) - (bes . ,(make-pitch -1 6 -2 )) - (bess . ,(make-pitch -1 6 -2 )) - (b . ,(make-pitch -1 6 -1 )) - (b . ,(make-pitch -1 6 -1 )) - (h . ,(make-pitch -1 6 0 )) - (his . ,(make-pitch -1 6 1 )) - (hiss . ,(make-pitch -1 6 1 )) - (hisis . ,(make-pitch -1 6 2 )) - (hississ . ,(make-pitch -1 6 2 )) +pitchnamesNorsk = #`( + (ceses . ,(ly:make-pitch -1 0 DOUBLE-FLAT)) + (cessess . ,(ly:make-pitch -1 0 DOUBLE-FLAT)) + (ces . ,(ly:make-pitch -1 0 FLAT)) + (cess . ,(ly:make-pitch -1 0 FLAT)) + (c . ,(ly:make-pitch -1 0 NATURAL)) + (cis . ,(ly:make-pitch -1 0 SHARP)) + (ciss . ,(ly:make-pitch -1 0 SHARP)) + (cisis . ,(ly:make-pitch -1 0 DOUBLE-SHARP)) + (cississ . ,(ly:make-pitch -1 0 DOUBLE-SHARP)) + (deses . ,(ly:make-pitch -1 1 DOUBLE-FLAT)) + (dessess . ,(ly:make-pitch -1 1 DOUBLE-FLAT)) + (des . ,(ly:make-pitch -1 1 FLAT)) + (dess . ,(ly:make-pitch -1 1 FLAT)) + (d . ,(ly:make-pitch -1 1 NATURAL)) + (dis . ,(ly:make-pitch -1 1 SHARP)) + (diss . ,(ly:make-pitch -1 1 SHARP)) + (disis . ,(ly:make-pitch -1 1 DOUBLE-SHARP)) + (dississ . ,(ly:make-pitch -1 1 DOUBLE-SHARP)) + (eeses . ,(ly:make-pitch -1 2 DOUBLE-FLAT)) + (eessess . ,(ly:make-pitch -1 2 DOUBLE-FLAT)) + (eses . ,(ly:make-pitch -1 2 DOUBLE-FLAT)) + (essess . ,(ly:make-pitch -1 2 DOUBLE-FLAT)) + (ees . ,(ly:make-pitch -1 2 FLAT)) + (eess . ,(ly:make-pitch -1 2 FLAT)) + (es . ,(ly:make-pitch -1 2 FLAT)) + (ess . ,(ly:make-pitch -1 2 FLAT)) + (e . ,(ly:make-pitch -1 2 NATURAL)) + (eis . ,(ly:make-pitch -1 2 SHARP)) + (eiss . ,(ly:make-pitch -1 2 SHARP)) + (eisis . ,(ly:make-pitch -1 2 DOUBLE-SHARP)) + (eississ . ,(ly:make-pitch -1 2 DOUBLE-SHARP)) + (feses . ,(ly:make-pitch -1 3 DOUBLE-FLAT)) + (fessess . ,(ly:make-pitch -1 3 DOUBLE-FLAT)) + (fes . ,(ly:make-pitch -1 3 FLAT)) + (fess . ,(ly:make-pitch -1 3 FLAT)) + (f . ,(ly:make-pitch -1 3 NATURAL)) + (fis . ,(ly:make-pitch -1 3 SHARP)) + (fiss . ,(ly:make-pitch -1 3 SHARP)) + (fisis . ,(ly:make-pitch -1 3 DOUBLE-SHARP)) + (fississ . ,(ly:make-pitch -1 3 DOUBLE-SHARP)) + (geses . ,(ly:make-pitch -1 4 DOUBLE-FLAT)) + (gessess . ,(ly:make-pitch -1 4 DOUBLE-FLAT)) + (ges . ,(ly:make-pitch -1 4 FLAT)) + (gess . ,(ly:make-pitch -1 4 FLAT)) + (g . ,(ly:make-pitch -1 4 NATURAL)) + (g . ,(ly:make-pitch -1 4 NATURAL)) + (gis . ,(ly:make-pitch -1 4 SHARP)) + (giss . ,(ly:make-pitch -1 4 SHARP)) + (gisis . ,(ly:make-pitch -1 4 DOUBLE-SHARP)) + (gississ . ,(ly:make-pitch -1 4 DOUBLE-SHARP)) + (aeses . ,(ly:make-pitch -1 5 DOUBLE-FLAT)) + (aessess . ,(ly:make-pitch -1 5 DOUBLE-FLAT)) + (ases . ,(ly:make-pitch -1 5 DOUBLE-FLAT)) + (assess . ,(ly:make-pitch -1 5 DOUBLE-FLAT)) + (aes . ,(ly:make-pitch -1 5 FLAT)) + (aess . ,(ly:make-pitch -1 5 FLAT)) + (as . ,(ly:make-pitch -1 5 FLAT)) + (ass . ,(ly:make-pitch -1 5 FLAT)) + (a . ,(ly:make-pitch -1 5 NATURAL)) + (ais . ,(ly:make-pitch -1 5 SHARP)) + (aiss . ,(ly:make-pitch -1 5 SHARP)) + (aisis . ,(ly:make-pitch -1 5 DOUBLE-SHARP)) + (aississ . ,(ly:make-pitch -1 5 DOUBLE-SHARP)) + (bes . ,(ly:make-pitch -1 6 DOUBLE-FLAT)) + (bess . ,(ly:make-pitch -1 6 DOUBLE-FLAT)) + (b . ,(ly:make-pitch -1 6 FLAT)) + (b . ,(ly:make-pitch -1 6 FLAT)) + (h . ,(ly:make-pitch -1 6 NATURAL)) + (his . ,(ly:make-pitch -1 6 SHARP)) + (hiss . ,(ly:make-pitch -1 6 SHARP)) + (hisis . ,(ly:make-pitch -1 6 DOUBLE-SHARP)) + (hississ . ,(ly:make-pitch -1 6 DOUBLE-SHARP)) ) +pitchnames =\pitchnamesNorsk -\version "1.5.49" +\version "2.12.0" + +#(ly:parser-set-note-names parser pitchnames)