input/test/compound-time.ly

   1
   2 \version "2.5.20"
   3 \header {
   4 texidoc = "@cindex compound time
   5 @cindex plus
   6
   7 Compound time signatures can be printed.
   8
   9 "
  10 }
  11
  12 \layout{raggedright = ##t}
  13
  14 #(define (compound-time grob one two num)
  15   (interpret-markup
  16    (ly:grob-layout grob)
  17    '(((baseline-skip . 2)
  18       (word-space . 2)
  19       (font-family . number)))
  20    (markup
  21     #:line ( #:column (one num) #:lower 1 "+" #:column (two num)))))
  22 %    ;;  #:line ( #:column (one num) #:lower 1 "+" #:column (two num)))))
  23
  24 \relative {
  25   %% compound time signature hack
  26   \time 5/8
  27   \override Staff.TimeSignature #'print-function
  28   = #(lambda (grob) (compound-time grob "2" "3" "8"))
  29
  30   %% manual beaming, auto beam engraver cannot handle compound time,
  31   %% it extends 2/8 pattern to 4/8, which does not work.
  32
  33   %% Hmm, why don't we just junk the modulo functionality, and
  34   %% write-out all endings explicitely, we get compound time handling
  35   %% for free?
  36
  37   c4 c8[ c c]
  38 }