-#(ly:set-option 'old-relative)
-\version "1.9.0"
+\version "2.17.17"
\header {
-texidoc = "Arpeggio stays clear of accidentals and flipped note heads.
-Since Arpeggio engraver is Voice, it does nothing for voice collisions."
+texidoc = "Arpeggio stays clear of accidentals and flipped note heads."
+}
+\layout {
+ ragged-right = ##t
+ \context{
+ \Staff
+ connectArpeggios = ##t
+ \consists "Span_arpeggio_engraver"
+ }
}
-hairyChord = \context Staff \notes\relative c' <
- \context Voice=one {
- \property Voice.Stem \override #'direction = #1
- \property Voice.NoteColumn \override #'horizontal-shift = #0
- e4-\arpeggio
- }
-
- \context Voice=two {
- \property Voice.Stem \override #'direction = #1
- \property Voice.NoteColumn \override #'horizontal-shift = #1
- cis-\arpeggio
- }
-
- \context Voice=three {
- \property Voice.Stem \override #'direction = #1
- \property Voice.NoteColumn \override #'horizontal-shift = #2
- ais-\arpeggio
- }
-
- \context Voice=four {
- \property Voice.Stem \override #'direction = #-1
- \property Voice.NoteColumn \override #'horizontal-shift = #-1
- fis-\arpeggio
- }
->
-\score{
- \notes \transpose c c' {
- << fis'' g d a >>-\arpeggio
- << fis, g d a >>-\arpeggio
- << fis'' g d a >>-\arpeggio
- \hairyChord
- }
- \paper {
- raggedright = ##t
- \translator{
- \StaffContext
- connectArpeggios = ##t
- }
- }
+\transpose c c' {
+ <fis'' g d a>\arpeggio
+ <fis, g d a>\arpeggio
+ <fis'' g d a>\arpeggio
+ << { <e' a>\arpeggio } \\ { <g cis>\arpeggio } >>
}
-
-