]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/cluster-style.ly
Merge branch 'stable'
[lilypond.git] / input / regression / cluster-style.ly
1
2
3 \version "2.12.0"
4 \header {
5   texidoc = "Clusters behave well across line breaks."
6 }
7
8 \layout { ragged-right = ##t }
9
10 fragment = \relative c' {
11   <e d'>4
12   <g a>4 
13   <e a>4
14 }
15
16 <<
17   \time 2/4 
18   \new Staff {
19     \override ClusterSpanner #'style = #'ramp
20     \makeClusters \fragment
21     r4
22     \override ClusterSpanner #'style = #'leftsided-stairs
23     \makeClusters \fragment
24     r4
25     \override ClusterSpanner #'style = #'rightsided-stairs
26     \makeClusters \fragment
27     r4
28     \override ClusterSpanner #'style = #'centered-stairs
29     \makeClusters \fragment
30     }
31   
32 >>
33
34