X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fscale-definitions-init.ly;h=127e7e5fb97aa12b8055c2f26ecb8580c0884138;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=1c075be3a20c8280e0b81b40301a3e2754e37ca0;hpb=e9bd265943d37689b1a6892217cb6f67bbe69f73;p=lilypond.git

diff --git a/ly/scale-definitions-init.ly b/ly/scale-definitions-init.ly
index 1c075be3a2..127e7e5fb9 100644
--- a/ly/scale-definitions-init.ly
+++ b/ly/scale-definitions-init.ly
@@ -1,7 +1,7 @@
-\version "1.9.1"
+\version "2.16.0"
 
 
-major = #'(
+major = #`(
     (0 . 0)
     (1 . 0)
     (2 . 0)
@@ -11,18 +11,18 @@ major = #'(
     (6 . 0)
   )
 
-minor = #'(
+minor = #`(
     (0 . 0)
     (1 . 0)
-    (2 . -1)
+    (2 . ,FLAT)
     (3 . 0)
     (4 . 0)
-    (5 . -1)
-    (6 . -1)
+    (5 . ,FLAT)
+    (6 . ,FLAT)
     )
 
 
-ionian = #'(
+ionian = #`(
     (0 . 0)
     (1 . 0)
     (2 . 0)
@@ -33,68 +33,68 @@ ionian = #'(
   )  
 
 
-locrian = #'(
+locrian = #`(
     (0 . 0)
-    (1 . -1)
-    (2 . -1)
+    (1 . ,FLAT)
+    (2 . ,FLAT)
     (3 . 0)
-    (4 . -1)
-    (5 . -1)
-    (6 . -1)
+    (4 . ,FLAT)
+    (5 . ,FLAT)
+    (6 . ,FLAT)
   )  
 
 
-aeolian = #'(
+aeolian = #`(
     (0 . 0)
     (1 . 0)
-    (2 . -1)
+    (2 . ,FLAT)
     (3 . 0)
     (4 . 0)
-    (5 . -1)
-    (6 . -1)
+    (5 . ,FLAT)
+    (6 . ,FLAT)
     )
 
 
-mixolydian = #'(
+mixolydian = #`(
     (0 . 0)
     (1 . 0)
     (2 . 0)
     (3 . 0)
     (4 . 0)
     (5 . 0)
-    (6 . -1)
+    (6 . ,FLAT)
   )  
 
 
-lydian = #'(
+lydian = #`(
     (0 . 0)
     (1 . 0)
     (2 . 0)
-    (3 . 1)
+    (3 . ,SHARP)
     (4 . 0)
     (5 . 0)
     (6 . 0)
   )  
 
 
-phrygian = #'(
+phrygian = #`(
     (0 . 0)
-    (1 . -1)
-    (2 . -1)
+    (1 . ,FLAT)
+    (2 . ,FLAT)
     (3 . 0)
     (4 . 0)
-    (5 . -1)
-    (6 . -1)
+    (5 . ,FLAT)
+    (6 . ,FLAT)
 )  
 
 
-dorian = #'(
+dorian = #`(
     (0 . 0)
     (1 . 0)
-    (2 . -1)
+    (2 . ,FLAT)
     (3 . 0)
     (4 . 0)
     (5 . 0)
-    (6 . -1)
+    (6 . ,FLAT)
   )