Snippets: Replace \set Staff.instrumentName

[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 fadfcf5e5a2095661868c799a69fa067deaaaa1e..79bb34efc0cc0bda18dbadc2e0e93c43282c0b82 100644 (file)
--- a/Documentation/snippets/heavily-customized-polymetric-time-signatures.ly
+++ b/Documentation/snippets/heavily-customized-polymetric-time-signatures.ly
@@ -1,10 +1,11 @@
-%% 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.15.43"
+% DO NOT EDIT this file manually; it is automatically
+% generated from Documentation/snippets/new
+% Make any changes in Documentation/snippets/new/
+% and then run scripts/auxiliar/makelsr.py
+%
+% This file is in the public domain.
+%% Note: this file works from version 2.19.56
+\version "2.19.56"
 
 \header {
   lsrtags = "contemporary-notation, percussion, real-music, rhythms"
@@ -18,42 +19,27 @@ is the template of a real Balkan song!).
   doctitle = "Heavily customized polymetric time signatures"
 } % begin verbatim
 
-
-#(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)))))))
 melody = \relative c'' {
-  \set Staff.instrumentName = #"Bb Sop."
   \key g \major
-  \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")
+  \compoundMeter #'((3 8) (2 8) (2 8) (3 8) (2 8) (2 8)
+                    (2 8) (2 8) (3 8) (2 8) (2 8))
   c8 c c d4 c8 c b c b a4 g fis8 e d c b' c d e4-^ fis8 g \break
   c,4. d4 c4 d4. c4 d c2 d4. e4-^ d4
   c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 \break
   c4. d4 c4 d4. c4 d c2 d4. e4-^ d4
   c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 \break
-}
+} % begin verbatim
+
 
 drum = \new DrumStaff \drummode {
-  \bar "|:" bd4.^\markup { Drums } sn4 bd \bar ":" sn4.
-  bd4 sn \bar ":" bd sn bd4. sn4 bd \bar ":|"
+  \bar ".|:" bd4.^\markup { Drums } sn4 bd \bar ";" sn4.
+  bd4 sn \bar ";" bd sn bd4. sn4 bd \bar ":|."
 }
 
+  \new Staff \with {
+    instrumentName = \markup { \concat { "B" \flat " Sop." } }
+  }
+
 {
   \melody
   \drum