input/regression/measure-grouping.ly

   1 \header
   2 {
   3
   4     texidoc = "The Measure_grouping_engraver adds triangles and
   5 brackets above beats when you set beatGrouping.  This shows a fragment
   6 of Steve Martland's Dance Works. "
   7
   8 }
   9
  10 \version "1.7.6"
  11
  12
  13 %% TODO: should have 2/4 + 5/8 time sig style.
  14 \score { \notes
  15 \context Staff
  16          \relative c' {
  17              #(set-time-signature 2 4)
  18              c8 a'4 a8-~
  19              #(set-time-signature 5 8 '(3 2))
  20              a8 bes4 r8 bes8->
  21              \time 2/4
  22              c,8 g'4 g8-~
  23              #(set-time-signature 5 8 '(3 2))
  24              g8 a4 g a->
  25          }
  26          \paper  {
  27              linewidth = -1.0
  28              \translator { \StaffContext
  29                            \consists "Measure_grouping_engraver"
  30                            }
  31              }
  32          }