]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/cluster.ly
(conv): dashes rule.
[lilypond.git] / input / regression / cluster.ly
1 #(ly:set-option 'old-relative)
2 \version "1.9.1"
3 \header {
4     texidoc = "Clusters are a device to denote that a complete range of
5 notes is to be played."
6 }
7
8 fragment =\notes \relative c' {
9          c4 f4 <<e d'>>4
10          <<g a>>8 <<e a>> a4 c2 <<d b>>4 e4 
11          c4 }
12
13 \score {
14  \notes <
15      \context Staff = SA \fragment
16      \context Staff = SB \apply #notes-to-clusters \fragment
17      >
18  \paper { raggedright = ##t }
19 }
20
21
22