ly/norsk.ly

   1 %%%% norsk.ly -- common Norwegian names for notes
   2 %%%%
   3 %%%% source file of the GNU LilyPond music typesetter
   4 %%%%
   5 %%%% (c) 1998--2009 Arvid Grøtting <arvidg@ifi.uio.no>
   6
   7 \version "2.12.0"
   8
   9 %{
  10
  11   es     = flat
  12   ess    = flat
  13   eses   = double-flat
  14   essess = double-flat
  15
  16   is     = sharp
  17   iss    = sharp
  18   isis   = double-sharp
  19   ississ = double-sharp
  20
  21     English: c  d  e  f  g  a  bf b
  22   Norwegian: c  d  e  f  g  a  b  h
  23
  24 %}
  25
  26 pitchnamesNorsk = #`(
  27         (ceses . ,(ly:make-pitch -1 0 DOUBLE-FLAT))
  28         (cessess . ,(ly:make-pitch -1 0 DOUBLE-FLAT))
  29         (ces . ,(ly:make-pitch -1 0 FLAT))
  30         (cess . ,(ly:make-pitch -1 0 FLAT))
  31         (c . ,(ly:make-pitch -1 0 NATURAL))
  32         (cis . ,(ly:make-pitch -1 0 SHARP))
  33         (ciss . ,(ly:make-pitch -1 0 SHARP))
  34         (cisis . ,(ly:make-pitch -1 0 DOUBLE-SHARP))
  35         (cississ . ,(ly:make-pitch -1 0 DOUBLE-SHARP))
  36         (deses . ,(ly:make-pitch -1 1 DOUBLE-FLAT))
  37         (dessess . ,(ly:make-pitch -1 1 DOUBLE-FLAT))
  38         (des . ,(ly:make-pitch -1 1 FLAT))
  39         (dess . ,(ly:make-pitch -1 1 FLAT))
  40         (d . ,(ly:make-pitch -1 1 NATURAL))
  41         (dis . ,(ly:make-pitch -1 1 SHARP))
  42         (diss . ,(ly:make-pitch -1 1 SHARP))
  43         (disis . ,(ly:make-pitch -1 1 DOUBLE-SHARP))
  44         (dississ . ,(ly:make-pitch -1 1 DOUBLE-SHARP))
  45         (eeses . ,(ly:make-pitch -1 2 DOUBLE-FLAT))
  46         (eessess . ,(ly:make-pitch -1 2 DOUBLE-FLAT))
  47         (eses . ,(ly:make-pitch -1 2 DOUBLE-FLAT))
  48         (essess . ,(ly:make-pitch -1 2 DOUBLE-FLAT))
  49         (ees . ,(ly:make-pitch -1 2 FLAT))
  50         (eess . ,(ly:make-pitch -1 2 FLAT))
  51         (es . ,(ly:make-pitch -1 2 FLAT))
  52         (ess . ,(ly:make-pitch -1 2 FLAT))
  53         (e . ,(ly:make-pitch -1 2 NATURAL))
  54         (eis . ,(ly:make-pitch -1 2 SHARP))
  55         (eiss . ,(ly:make-pitch -1 2 SHARP))
  56         (eisis . ,(ly:make-pitch -1 2 DOUBLE-SHARP))
  57         (eississ . ,(ly:make-pitch -1 2 DOUBLE-SHARP))
  58         (feses . ,(ly:make-pitch -1 3 DOUBLE-FLAT))
  59         (fessess . ,(ly:make-pitch -1 3 DOUBLE-FLAT))
  60         (fes . ,(ly:make-pitch -1 3 FLAT))
  61         (fess . ,(ly:make-pitch -1 3 FLAT))
  62         (f . ,(ly:make-pitch -1 3 NATURAL))
  63         (fis . ,(ly:make-pitch -1 3 SHARP))
  64         (fiss . ,(ly:make-pitch -1 3 SHARP))
  65         (fisis . ,(ly:make-pitch -1 3 DOUBLE-SHARP))
  66         (fississ . ,(ly:make-pitch -1 3 DOUBLE-SHARP))
  67         (geses . ,(ly:make-pitch -1 4 DOUBLE-FLAT))
  68         (gessess . ,(ly:make-pitch -1 4 DOUBLE-FLAT))
  69         (ges . ,(ly:make-pitch -1 4 FLAT))
  70         (gess . ,(ly:make-pitch -1 4 FLAT))
  71         (g . ,(ly:make-pitch -1 4 NATURAL))
  72         (g . ,(ly:make-pitch -1 4 NATURAL))
  73         (gis . ,(ly:make-pitch -1 4 SHARP))
  74         (giss . ,(ly:make-pitch -1 4 SHARP))
  75         (gisis . ,(ly:make-pitch -1 4 DOUBLE-SHARP))
  76         (gississ . ,(ly:make-pitch -1 4 DOUBLE-SHARP))
  77         (aeses . ,(ly:make-pitch -1 5 DOUBLE-FLAT))
  78         (aessess . ,(ly:make-pitch -1 5 DOUBLE-FLAT))
  79         (ases . ,(ly:make-pitch -1 5 DOUBLE-FLAT))
  80         (assess . ,(ly:make-pitch -1 5 DOUBLE-FLAT))
  81         (aes . ,(ly:make-pitch -1 5 FLAT))
  82         (aess . ,(ly:make-pitch -1 5 FLAT))
  83         (as . ,(ly:make-pitch -1 5 FLAT))
  84         (ass . ,(ly:make-pitch -1 5 FLAT))
  85         (a . ,(ly:make-pitch -1 5 NATURAL))
  86         (ais . ,(ly:make-pitch -1 5 SHARP))
  87         (aiss . ,(ly:make-pitch -1 5 SHARP))
  88         (aisis . ,(ly:make-pitch -1 5 DOUBLE-SHARP))
  89         (aississ . ,(ly:make-pitch -1 5 DOUBLE-SHARP))
  90         (bes . ,(ly:make-pitch -1 6 DOUBLE-FLAT))
  91         (bess . ,(ly:make-pitch -1 6 DOUBLE-FLAT))
  92         (b . ,(ly:make-pitch -1 6 FLAT))
  93         (b . ,(ly:make-pitch -1 6 FLAT))
  94         (h . ,(ly:make-pitch -1 6 NATURAL))
  95         (his . ,(ly:make-pitch -1 6 SHARP))
  96         (hiss . ,(ly:make-pitch -1 6 SHARP))
  97         (hisis . ,(ly:make-pitch -1 6 DOUBLE-SHARP))
  98         (hississ . ,(ly:make-pitch -1 6 DOUBLE-SHARP))
  99 )
 100
 101 pitchnames = \pitchnamesNorsk
 102
 103 #(ly:parser-set-note-names parser pitchnames)