input/test/stem-cross-staff.ly

   1 \version "2.1.28"
   2
   3 \header { texidoc = "@cindex Stem Cross Staff
   4 The chords which exceptionally cross staves may be produced by increasing
   5 the length of the stem in the lower stave, so it reaches the stem in the
   6 upper stave, or vice versa. "
   7 }
   8
   9 stemExtend = \once \override Stem  #'length = #22
  10
  11 %% following reqs 1.7.1 or better.
  12 noFlag = \once \override Stem  #'flag-style = #'no-flag
  13
  14
  15 \score { \notes
  16     \context  PianoStaff
  17         << \new Staff   {
  18             \stemDown
  19             \stemExtend
  20             f'4
  21             \stemExtend
  22             \noFlag
  23             f'8 }
  24           \new Staff {
  25               \clef bass
  26               a4 a8 }
  27           >>
  28
  29     \paper { raggedright = ##t}
  30 }
  31