]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/beam-quant-standard.ly
* lily/default-actions.cc (Module): new file. default
[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.4.0"
10
11 \layout  {
12     raggedright = ##t
13     #(define debug-beam-quanting #t)
14
15       }
16
17 filler = \new Voice \relative  {
18     \hideNotes
19     e4 e
20 }
21
22
23 %%
24 %% Ross p108--112
25 primes = \relative {
26     \time 3/4 
27     \assertBeamQuant #'(0 . 0)  #'(0 . 0)
28     c8[ c]
29     \filler
30     \assertBeamQuant #'(1 . -1)  #'(1 . -1)
31     d8[ d]
32      
33     \filler
34      
35     \assertBeamQuant #'(1 . 0)  #'(1 . 0)
36     e8[ e]
37     \filler
38      
39      
40     \assertBeamQuant #'(2 . -1)  #'(2 . -1)
41     f8[ f]
42     \filler
43      
44      
45     \assertBeamQuant #'(2 . 0)  #'(2 . 0)
46     g8[ g]
47     \filler
48      
49      
50     \assertBeamQuant #'(2 . 1)  #'(2 . 1)
51     a8[ a]
52     \filler
53       
54 %{
55     \once \override Beam #'inspect-quants = #'(2.2 . 2.2)
56     \assertBeamQuant 
57     a8[ a]
58     \filler
59     
60 %}
61     
62 }
63
64
65 seconds = \relative {
66     
67     \assertBeamQuant #'(0 . 0)  #'(0 . 1)
68     a8[ b]
69     \filler
70      
71
72     \assertBeamQuant #'(0 . 0)  #'(0 . 1)
73     b8[ c]
74     \filler
75      
76
77     \assertBeamQuant #'(0 . 0)  #'(0 . 1)
78     c8[ d]
79     \filler
80      
81     \assertBeamQuant #'(1 . -1)  #'(1 . 0)
82     d8[ e]
83     \filler
84      
85      
86     \assertBeamQuant #'(1 . 0)  #'(1 . 1)
87     e8[ f]
88     \filler
89      
90      
91     \assertBeamQuant #'(2 . -1)  #'(2 . 0)
92     f8[ g]
93     \filler
94      
95      
96     \assertBeamQuant #'(2 . 0)  #'(2 . 1)
97     g8[ a]
98     \filler
99
100     \assertBeamQuant #'(3 . -1)  #'(3 . 0)
101     a8[ b]
102     \filler
103 }
104
105 filler = \new Voice \relative  {
106     \hideNotes
107     e4 e4.
108 }
109
110 % Ross, p122 
111 primeSixteenths = \relative {
112     \stemUp
113     \assertBeamQuant #'(0 . -1)  #'(0 . -1)
114     g16[ g]
115     \filler
116     \assertBeamQuant #'(0 . -1)  #'(0 . -1)
117     a16[ a]
118     \filler
119     \assertBeamQuant #'(0 . -1)  #'(0 . -1)
120     b16[ b]
121     \filler
122     \assertBeamQuant #'(0 . 0)  #'(0 . 0)
123     c16[ c]
124     \filler
125     \assertBeamQuant #'(1 . -1)  #'(1 . -1)
126     d16[ d]
127     \filler
128     \assertBeamQuant #'(1 . 0)  #'(1 . 0)
129     e16[ e]
130     \filler
131     \assertBeamQuant #'(2 .  -1)  #'(2 . -1)
132     f16[ f]
133     \filler
134     \assertBeamQuant #'(2 . 0)  #'(2 . 0)
135     g16[ g]
136     \filler
137     \assertBeamQuant #'(3 . -1)  #'(3 . -1)
138     a16[ a]
139     \filler
140     \assertBeamQuant #'(3 . 0)  #'(3 . 0)
141     b16[ b]
142     \filler
143 }
144
145 \new Voice { \primes \seconds \primeSixteenths }
146