-\version "1.7.7"
+\version "2.2.0"
-\header {
- texidoc = "Cross staff stems
-
-Unfortunately, there is no support for putting chords across staves.
-You can get this result by increasing the length of the stem in the
-lower stave so it reaches the stem in the upper stave, or vice versa.
-
-@cindex Cross staff stems
-@cindex Stems, cross staff
-
-"
+\header { texidoc = "@cindex Stem Cross Staff
+The chords which exceptionally cross staves may be produced by increasing
+the length of the stem in the lower stave, so it reaches the stem in the
+upper stave, or vice versa. "
}
-stemExtend = \once \property Voice.Stem \override #'length = #22
+stemExtend = \once \override Stem #'length = #22
%% following reqs 1.7.1 or better.
-noFlag = \once \property Voice.Stem \override #'flag-style = #'no-flag
+noFlag = \once \override Stem #'flag-style = #'no-flag
\score { \notes
\context PianoStaff
- < \context Staff = up {
+ << \new Staff {
\stemDown
\stemExtend
f'4
\stemExtend
\noFlag
f'8 }
- \context Staff = down {
+ \new Staff {
\clef bass
a4 a8 }
- >
+ >>
- \paper { linewidth = -1.0 }
+ \paper { raggedright = ##t}
}
-%% new-chords-done %%
+