-#(ly:set-option 'old-relative)
\version "1.9.4"
\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."
}
-hairyChord = \context Staff \notes\relative c' <<
- \new Voice {
- \property Voice.Stem \override #'direction = #1
- \property Voice.NoteColumn \override #'horizontal-shift = #0
- e4\arpeggio
- }
-
- \new Voice {
- \property Voice.Stem \override #'direction = #1
- \property Voice.NoteColumn \override #'horizontal-shift = #1
- cis\arpeggio
- }
-
- \new Voice {
- \property Voice.Stem \override #'direction = #1
- \property Voice.NoteColumn \override #'horizontal-shift = #2
- ais\arpeggio
- }
-
- \new Voice {
- \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
+ <fis'' g d a>\arpeggio
+ <fis, g d a>\arpeggio
+ <fis'' g d a>\arpeggio
}
\paper {
raggedright = ##t