Nitpick: ly:spanner-bound grob name slur -> spanner.
[lilypond.git] / input / regression / beam-quant-standard.ly
blob33b37bd29a1c497910a13fd79cc6788a811ea805
1 \header {
3 texidoc = "This file tests a few standard beam quants, taken from
4 Ted Ross' book. If LilyPond finds another quant, the correct quant
5 is printed over the beam."
9 \version "2.12.0"
11 \layout {
12 ragged-right = ##t
13 #(define debug-beam-quanting #t)
16 filler = \new Voice \relative {
17 \hideNotes
18 e4 e
23 %% Ross p108--112
24 primes = \relative {
25 \time 3/4
26 \assertBeamQuant #'(0 . 0) #'(0 . 0)
27 c8[ c]
28 \filler
29 \assertBeamQuant #'(1 . -1) #'(1 . -1)
30 d8[ d]
32 \filler
34 \assertBeamQuant #'(1 . 0) #'(1 . 0)
35 e8[ e]
36 \filler
39 \assertBeamQuant #'(2 . -1) #'(2 . -1)
40 f8[ f]
41 \filler
44 \assertBeamQuant #'(2 . 0) #'(2 . 0)
45 g8[ g]
46 \filler
49 \assertBeamQuant #'(2 . 1) #'(2 . 1)
50 a8[ a]
51 \filler
54 \once \override Beam #'inspect-quants = #'(2.2 . 2.2)
55 \assertBeamQuant
56 a8[ a]
57 \filler
64 seconds = \relative {
66 \assertBeamQuant #'(0 . 0) #'(0 . 1)
67 a8[ b]
68 \filler
71 \assertBeamQuant #'(0 . 0) #'(0 . 1)
72 b8[ c]
73 \filler
76 \assertBeamQuant #'(0 . 0) #'(0 . 1)
77 c8[ d]
78 \filler
80 \assertBeamQuant #'(1 . -1) #'(1 . 0)
81 d8[ e]
82 \filler
85 \assertBeamQuant #'(1 . 0) #'(1 . 1)
86 e8[ f]
87 \filler
90 \assertBeamQuant #'(2 . -1) #'(2 . 0)
91 f8[ g]
92 \filler
95 \assertBeamQuant #'(2 . 0) #'(2 . 1)
96 g8[ a]
97 \filler
99 \assertBeamQuant #'(3 . -1) #'(3 . 0)
100 a8[ b]
101 \filler
104 filler = \new Voice \relative {
105 \hideNotes
106 e4 e4.
109 % Ross, p122
110 primeSixteenths = \relative {
111 \stemUp
112 \assertBeamQuant #'(0 . -1) #'(0 . -1)
113 g16[ g]
114 \filler
115 \assertBeamQuant #'(0 . -1) #'(0 . -1)
116 a16[ a]
117 \filler
118 \assertBeamQuant #'(0 . -1) #'(0 . -1)
119 b16[ b]
120 \filler
121 \assertBeamQuant #'(0 . 0) #'(0 . 0)
122 c16[ c]
123 \filler
124 \assertBeamQuant #'(1 . -1) #'(1 . -1)
125 d16[ d]
126 \filler
127 \assertBeamQuant #'(1 . 0) #'(1 . 0)
128 e16[ e]
129 \filler
130 \assertBeamQuant #'(2 . -1) #'(2 . -1)
131 f16[ f]
132 \filler
133 \assertBeamQuant #'(2 . 0) #'(2 . 0)
134 g16[ g]
135 \filler
136 \assertBeamQuant #'(3 . -1) #'(3 . -1)
137 a16[ a]
138 \filler
139 \assertBeamQuant #'(3 . 0) #'(3 . 0)
140 b16[ b]
141 \filler
144 \new Voice { \primes \seconds \primeSixteenths }