input/proportional.ly

   1 \header
   2 {
   3   title  = "Proportional notation"
   4 }
   5
   6
   7 %% RhythmicStaff broken with 32nd rests ?
   8
   9 \layout
  10 {
  11   indent = #0.0
  12   \context {
  13     \Voice
  14     \remove "Forbid_line_break_engraver"
  15     tupletNumberFormatFunction = #fraction-tuplet-formatter
  16     tupletFullLength = ##t
  17     allowBeamBreak = ##t
  18   }
  19   \context {
  20     \Score
  21     \override SpacingSpanner #'uniform-stretching = ##t
  22     \override SpacingSpanner #'strict-note-spacing = ##t
  23     proportionalNotationDuration = #(ly:make-moment 1 64)
  24     \override TimeSignature #'break-visibility = #end-of-line-invisible
  25     \override Beam #'break-overshoot = #'(-0.5 . 1.0)
  26   }
  27   \context {
  28
  29     % we want over print if necessary.
  30     \RhythmicStaff
  31     \remove "Separating_line_group_engraver"
  32   }
  33 }
  34
  35 staffKind = "RhythmicStaff"
  36
  37 %staffKind = "Staff"
  38
  39 \relative c''
  40 \new StaffGroup <<
  41   \new \staffKind <<
  42     {
  43       \skip 2
  44       \skip 2
  45       \break \time 4/8
  46
  47       \skip 1 \break \time 4/8
  48       \skip 2 \time 1/8
  49     }
  50
  51     {
  52     \time 4/8
  53
  54     \times 7/9 {
  55       \times 4/6 {
  56         r8 r32[ c c c c c c c] r4
  57         r32[ c32 c16 }
  58         \times 5/4 {
  59           c16 c c] r32[ c32 c16 c] r8 }
  60       }
  61     \times 10/12 {
  62       \times 7/6 {
  63         r32[ c32. c16 c16.] r4
  64         r16[ c16 c16. c32
  65            }
  66         \times 5/8 {
  67           c16 c c16. c32] r8 c8[ c] r4
  68       }
  69     }
  70
  71     \times 4/7 {
  72       r8
  73       r16[ c16
  74         \times 5/4 {
  75           c16 r16 c8 c c
  76         }
  77     }
  78
  79     \times 3/4 {
  80       c8]
  81       r16[ c
  82            \times  2/3 {
  83              c16 r16]
  84            r4 }
  85     }
  86   }
  87     >>
  88   \new \staffKind
  89   <<
  90   {
  91     \times 9/5 {
  92       r8. c16[ c c
  93                \grace {
  94                  \stemDown
  95                  c32[ c32]
  96                  \stemNeutral
  97                }
  98                c16 c c
  99       c
 100     }
 101     \times 4/7 {
 102       c16 c c c ]
 103       \times 5/4 {
 104         c16[ c32 c32]
 105         r4
 106         c32[ c c16
 107       }
 108     }
 109     \times 10/12 {
 110       \times 7/9 {
 111         c16 c16 c8] r8 r4
 112         r8.[ c32 c16 c r8 c16 c16
 113       }
 114       c16 c32 c32]
 115       r4.
 116       r16.[
 117       c32
 118     }
 119     c16 r16]
 120
 121   }
 122   { \skip 2 * 6 } % filler space.
 123   >>
 124 >>
 125
 126
 127
 128