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