]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/beam-quant-standard.ly
MusicXML: src-dir rather than srcdir.
[lilypond.git] / input / regression / beam-quant-standard.ly
1 \header {
2
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."
6   
7 }
8
9 \version "2.11.51"
10
11 \layout  {
12   ragged-right = ##t
13   #(define debug-beam-quanting #t)
14 }
15
16 filler = \new Voice \relative  {
17   \hideNotes
18   e4 e
19 }
20                                 % 
21
22 %%
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]
31   
32   \filler
33   
34   \assertBeamQuant #'(1 . 0)  #'(1 . 0)
35   e8[ e]
36   \filler
37   
38   
39   \assertBeamQuant #'(2 . -1)  #'(2 . -1)
40   f8[ f]
41   \filler
42   
43   
44   \assertBeamQuant #'(2 . 0)  #'(2 . 0)
45   g8[ g]
46   \filler
47   
48   
49   \assertBeamQuant #'(2 . 1)  #'(2 . 1)
50   a8[ a]
51   \filler
52   
53 %{
54   \once \override Beam #'inspect-quants = #'(2.2 . 2.2)
55   \assertBeamQuant 
56   a8[ a]
57   \filler
58   
59 %}
60   
61 }
62
63
64 seconds = \relative {
65   
66   \assertBeamQuant #'(0 . 0)  #'(0 . 1)
67   a8[ b]
68   \filler
69   
70
71   \assertBeamQuant #'(0 . 0)  #'(0 . 1)
72   b8[ c]
73   \filler
74   
75
76   \assertBeamQuant #'(0 . 0)  #'(0 . 1)
77   c8[ d]
78   \filler
79   
80   \assertBeamQuant #'(1 . -1)  #'(1 . 0)
81   d8[ e]
82   \filler
83   
84   
85   \assertBeamQuant #'(1 . 0)  #'(1 . 1)
86   e8[ f]
87   \filler
88   
89   
90   \assertBeamQuant #'(2 . -1)  #'(2 . 0)
91   f8[ g]
92   \filler
93   
94   
95   \assertBeamQuant #'(2 . 0)  #'(2 . 1)
96   g8[ a]
97   \filler
98
99   \assertBeamQuant #'(3 . -1)  #'(3 . 0)
100   a8[ b]
101   \filler
102 }
103
104 filler = \new Voice \relative  {
105   \hideNotes
106   e4 e4.
107 }
108
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
142 }
143
144 \new Voice { \primes \seconds \primeSixteenths }
145