%% Generated by lilypond-book.py
%% Options: [exampleindent=10.16\mm,indent=0\mm,line-width=160\mm]
\include "lilypond-book-preamble.ly"


% ****************************************************************
% Start cut-&-pastable-section
% ****************************************************************



\paper {
  indent = 0\mm
  line-width = 160\mm
  % offset the left padding, also add 1mm as lilypond creates cropped
  % images with a little space on the right
  line-width = #(- line-width (* mm  3.000000) (* mm 1))
}

\layout {
  
}





% ****************************************************************
% ly snippet:
% ****************************************************************
\sourcefilename "heavily-customized-polymetric-time-signatures.ly"
\sourcefileline 0
%% 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.16.0"

\header {
%% Translation of GIT committish: e99967817ff985eb5bd5b0220b2fbf552963f9de
  texidocfr = "
Bien que la métrique complexe ne soit pas l'élément primordial de cet
exemple, elle permet d'indiquer la pulsation de cette pièce qui, par
ailleurs, constitue le canevas d'une chanson traditionnelle des
Balkans.
 
"
  doctitlefr = "Indication personnalisée d'une polymétrie complexe"

  lsrtags = "contemporary-notation, percussion, real-music, rhythms"

  texidoc = "
Though the polymetric time signature shown was not the most essential
item here, it has been included to show the beat of this piece (which
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")
  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
}

drum = \new DrumStaff \drummode {
  \bar "|:" bd4.^\markup { Drums } sn4 bd \bar ":" sn4.
  bd4 sn \bar ":" bd sn bd4. sn4 bd \bar ":|"
}

{
  \melody
  \drum
}



% ****************************************************************
% end ly snippet
% ****************************************************************