input/bugs/arpeggio-collision.ly

   1
   2 hairyChord = \context Staff \notes\relative c' <
   3     \context Voice=one {
   4         \property Voice.Stem \push #'direction = #1
   5          \property Voice.NoteColumn \push #'horizontal-shift = #0
   6          e4\arpeggio
   7     }
   8
   9     \context Voice=two {
  10          \property Voice.Stem \push #'direction = #1
  11          \property Voice.NoteColumn \push #'horizontal-shift = #1
  12          cis\arpeggio
  13          }
  14
  15     \context Voice=three {
  16         \property Voice.Stem \push #'direction = #1
  17         \property Voice.NoteColumn \push #'horizontal-shift = #2
  18         ais\arpeggio
  19         }
  20
  21     \context Voice=four {
  22         \property Voice.Stem \push #'direction = #-1
  23         \property Voice.NoteColumn \push #'horizontal-shift = #-1
  24         fis\arpeggio
  25         }
  26 >
  27
  28
  29 \score{
  30     \notes \transpose c'' {
  31         \context Voice < fis''-\arpeggio g  d a >
  32         \context Voice < fis,-\arpeggio g  d a >
  33         \context Voice < fis''-\arpeggio g  d a >
  34         \hairyChord
  35         }
  36     \paper {
  37         linewidth = -1.;
  38         \translator{
  39             \StaffContext
  40             connectArpeggios = ##t
  41         }
  42         }
  43 }