input/regression/arpeggio-collision.ly

   1 #(ly:set-option 'old-relative)
   2 \version "1.9.1"
   3
   4 \header  {
   5 texidoc = "Arpeggio stays clear of accidentals and flipped note heads.
   6 Since Arpeggio engraver is Voice, it does nothing for voice collisions."
   7 }
   8
   9 hairyChord = \context Staff \notes\relative c' <
  10     \context Voice=one {
  11         \property Voice.Stem \override #'direction = #1
  12          \property Voice.NoteColumn \override #'horizontal-shift = #0
  13          e4\arpeggio
  14     }
  15
  16     \context Voice=two {
  17          \property Voice.Stem \override #'direction = #1
  18          \property Voice.NoteColumn \override #'horizontal-shift = #1
  19          cis\arpeggio
  20          }
  21
  22     \context Voice=three {
  23         \property Voice.Stem \override #'direction = #1
  24         \property Voice.NoteColumn \override #'horizontal-shift = #2
  25         ais\arpeggio
  26         }
  27
  28     \context Voice=four {
  29         \property Voice.Stem \override #'direction = #-1
  30         \property Voice.NoteColumn \override #'horizontal-shift = #-1
  31         fis\arpeggio
  32         }
  33 >
  34
  35
  36 \score{
  37     \notes \transpose c c' {
  38         << fis'' g  d a >>\arpeggio
  39         << fis, g  d a >>\arpeggio
  40         << fis'' g  d a >>\arpeggio
  41         \hairyChord
  42         }
  43     \paper {
  44         raggedright = ##t
  45         \translator{
  46             \StaffContext
  47             connectArpeggios = ##t
  48         }
  49         }
  50 }
  51
  52