]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/stem-cross-staff.ly
* input/mutopia/W.A.Mozart/mozart-hrn-3.ly: Mozart died in 1791
[lilypond.git] / input / test / stem-cross-staff.ly
index 39c5d93f24bd5720083a1f2ab7b9806a2699d44b..6c4dee3796297cdc99dd3e5592cd89a03feed40c 100644 (file)
@@ -1,30 +1,30 @@
-\version "1.9.1"
+\version "2.1.30"
 
 \header { texidoc = "@cindex Stem Cross Staff
-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. "
+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 { raggedright = ##t}
 }