ly/svenska.ly

   1 %
   2 % common Swedish names for notes. "ess" means flat, "iss" means sharp
   3 %
   4 % by Mats Bengtsson.
   5
   6 \pitchnames #'(
   7         (cessess . ,(make-pitch -1 0 -2 ))
   8         (cess . ,(make-pitch -1 0 -1 ))
   9         (c . ,(make-pitch -1 0 0 ))
  10         (ciss . ,(make-pitch -1 0 1 ))
  11         (cississ . ,(make-pitch -1 0 2 ))
  12         (dessess . ,(make-pitch -1 1 -2 ))
  13         (dess . ,(make-pitch -1 1 -1 ))
  14         (d . ,(make-pitch -1 1 0 ))
  15         (diss . ,(make-pitch -1 1 1 ))
  16         (dississ . ,(make-pitch -1 1 2 ))
  17         (essess . ,(make-pitch -1 2 -2 ))
  18         (ess . ,(make-pitch -1 2 -1 ))
  19         (e . ,(make-pitch -1 2 0 ))
  20         (eiss . ,(make-pitch -1 2 1 ))
  21         (eississ . ,(make-pitch -1 2 2 ))
  22         (fessess . ,(make-pitch -1 3 -2 ))
  23         (fess . ,(make-pitch -1 3 -1 ))
  24         (f . ,(make-pitch -1 3 0 ))
  25         (fiss . ,(make-pitch -1 3 1 ))
  26         (fississ . ,(make-pitch -1 3 2 ))
  27         (gessess . ,(make-pitch -1 4 -2 ))
  28         (gess . ,(make-pitch -1 4 -1 ))
  29         (g . ,(make-pitch -1 4 0 ))
  30         (giss . ,(make-pitch -1 4 1 ))
  31         (gississ . ,(make-pitch -1 4 2 ))
  32         (assess . ,(make-pitch -1 5 -2 ))
  33         (ass . ,(make-pitch -1 5 -1 ))
  34         (a . ,(make-pitch -1 5 0 ))
  35         (aiss . ,(make-pitch -1 5 1 ))
  36         (aississ . ,(make-pitch -1 5 2 ))
  37         (hessess . ,(make-pitch -1 6 -2 ))
  38         (b . ,(make-pitch -1 6 -1 ))
  39         (h . ,(make-pitch -1 6 0 ))
  40         (hiss . ,(make-pitch -1 6 1 ))
  41         (hississ . ,(make-pitch -1 6 2 ))
  42 )
  43 \version "1.3.110";