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 = #begin-of-line-visible
  25     \override Beam #'break-overshoot = #'(-0.5 . 1.0)
  26
  27   }
  28 }
  29
  30 staffKind = "RhythmicStaff"
  31
  32 %staffKind = "Staff"
  33
  34 \relative c''
  35 \new StaffGroup <<
  36   \new \staffKind <<
  37     {
  38       \skip 2
  39       \skip 2
  40       \break \time 4/8
  41
  42       \skip 1 \break \time 4/8
  43     }
  44
  45     {
  46     \time 4/8
  47
  48     \times 7/9 {
  49       \times 4/6 {
  50         r8 r32[ c c c c c c c] r4
  51         r32[ c32 c16 }
  52         \times 5/4 {
  53           c16 c c] r32[ c32 c16 c] r8 }
  54       }
  55     \times 10/12 {
  56       \times 7/6 {
  57         r32[ c32. c16 c16.] r4
  58         r16[ c16 c16. c32
  59            }
  60         \times 5/8 {
  61           c16 c c16. c32] r8 c8[ c] r4
  62       }
  63     }
  64
  65     \times 4/7 {
  66       r8
  67       r16[ c16
  68         \times 5/4 {
  69           c16 r16 c8 c c
  70         }
  71     }
  72
  73     \times 3/4 {
  74       c8]
  75       r16[ c
  76            \times  2/3 {
  77              c16 r16]
  78            r4 }
  79     }
  80   }
  81     >>
  82   \new \staffKind {
  83     \times 9/5 {
  84       r8. c16[ c c  c c c
  85       c
  86     }
  87     \times 4/7 {
  88       c16 c c c ]
  89       \times 5/4 {
  90         c16[ c32 c32]
  91         r4
  92         c32[ c c16
  93       }
  94     }
  95     c16 c16 c8] r8 r4
  96     \times 10/12 {
  97       \times 7/9 {
  98         r8.[ c32 c16 c r8 c16 c16
  99       }
 100       c16 c32 c32]
 101       r4 r16
 102     }
 103   }
 104 >>
 105
 106
 107
 108