input/regression/arpeggio-collision.ly

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