-\version "1.7.16"
+\version "2.16.0"
\header {
-texidoc = "Note head lines (eg glissando)
+ texidoc = "Note head lines (e.g. glissando)
run between centers of the note heads."
}
-\include "paper20.ly"
-\include "norsk.ly"
+su = { \change Staff = up}
+sd = { \change Staff = down}
-su = \notes{ \translator Staff = up}
-sd = \notes{ \translator Staff = down}
-\score {
- \context PianoStaff
- \notes <
- \context Staff = up {
- \property PianoStaff.connectArpeggios = ##t
- \showStaffSwitch
- \clef F
- c4 d \sd h a g8 f16 e32 d \su g2 \glissando a,4 \sd \break a2. \su g4 \glissando f1
- }
- \context Staff = down {
- \clef F s1*4
- }
- >
-\paper {
- linewidth = 8.0 \cm
-}
+\layout {
+ line-width = 8.0 \cm
}
-%% new-chords-done %%
+
+\context PianoStaff
+<<
+ \new Staff = "up" {
+ \override Glissando #'breakable = ##t
+ \set PianoStaff.connectArpeggios = ##t
+ \showStaffSwitch
+ \clef F
+ c4 d \sd b a g8 f16 e32 d \su g2 \glissando a,4 \sd \break a2. \su g4 \glissando f1
+ }
+ \new Staff = "down" {
+ \clef F s1*4
+ }
+>>
+