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