Doc-it: Add Notation Reference (first chapter).

[lilypond.git] / Documentation / snippets / heavily-customized-polymetric-time-signatures.ly

diff --git a/Documentation/snippets/heavily-customized-polymetric-time-signatures.ly b/Documentation/snippets/heavily-customized-polymetric-time-signatures.ly
index 9dcb29d2ff33dc1bc756391c247640613517ddce..c13c8c7161677518b8ca0b9436358f6811ea3aea 100644 (file)
--- a/Documentation/snippets/heavily-customized-polymetric-time-signatures.ly
+++ b/Documentation/snippets/heavily-customized-polymetric-time-signatures.ly
@@ -1,7 +1,10 @@
-%% Do not edit this file; it is automatically
+%% DO NOT EDIT this file manually; it is automatically
 %% generated from LSR http://lsr.dsi.unimi.it
+%% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
+%% and then run scripts/auxiliar/makelsr.py
+%%
 %% This file is in the public domain.
-\version "2.13.4"
+\version "2.15.20"
 
 \header {
   lsrtags = "rhythms, percussion"
@@ -17,26 +20,24 @@ is the template of a real Balkan song!).
 
 #(define plus (markup #:vcenter "+"))
 #(define ((custom-time-signature one two three four five six
-           seven eight nine ten eleven num) grob)
-            (grob-interpret-markup grob
-              (markup #:override '(baseline-skip . 0) #:number
-                (#:line (
-                    (#:column (one num)) plus
-                    (#:column (two num)) plus
-                    (#:column (three num)) plus
-                    (#:column (four num)) plus
-                    (#:column (five num)) plus
-                    (#:column (six num)) plus
-                    (#:column (seven num)) plus
-                    (#:column (eight num)) plus
-                    (#:column (nine num)) plus
-                    (#:column (ten num)) plus
-                    (#:column (eleven num)))))))
-
+                                 seven eight nine ten eleven num) grob)
+   (grob-interpret-markup grob
+                          (markup #:override '(baseline-skip . 0) #:number
+                                  (#:line ((#:column (one num)) plus
+                                           (#:column (two num)) plus
+                                           (#:column (three num)) plus
+                                           (#:column (four num)) plus
+                                           (#:column (five num)) plus
+                                           (#:column (six num)) plus
+                                           (#:column (seven num)) plus
+                                           (#:column (eight num)) plus
+                                           (#:column (nine num)) plus
+                                           (#:column (ten num)) plus
+                                           (#:column (eleven num)))))))
 melody = \relative c'' {
   \set Staff.instrumentName = #"Bb Sop."
   \key g \major
-  #(set-time-signature 25 8 '(3 2 2 3 2 2 2 2 3 2 2))
+  \time #'(3 2 2 3 2 2 2 2 3 2 2) 25/8
   \override Staff.TimeSignature #'stencil =
     #(custom-time-signature "3" "2" "2" "3" "2" "2"
       "2" "2" "3" "2" "2" "8")
@@ -48,7 +49,7 @@ melody = \relative c'' {
 }
 
 drum = \new DrumStaff \drummode {
-  \bar "|:" bd4.^\markup { "Drums" } sn4 bd \bar ":" sn4.
+  \bar "|:" bd4.^\markup { Drums } sn4 bd \bar ":" sn4.
   bd4 sn \bar ":" bd sn bd4. sn4 bd \bar ":|"
 }
 
@@ -56,3 +57,4 @@ drum = \new DrumStaff \drummode {
   \melody
   \drum
 }
+