input/regression/arpeggio-collision.ly

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