]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/note-line.ly
patch::: 1.3.134.jcn1
[lilypond.git] / input / regression / note-line.ly
1
2 \header {
3 texidoc = "Note head lines (eg glissando)
4 run between centers of the note heads.";
5 }
6
7 \include "paper20.ly"
8 \include "norsk.ly"
9
10 su = \notes{ \translator Staff = up}
11 sd = \notes{ \translator Staff = down}
12
13 \score {
14     \context PianoStaff
15         \notes <
16         \context Staff = up   {
17             \property PianoStaff.connectArpeggios = ##t
18             \showStaffSwitch
19             \clef F;
20             c4 d \sd h a g8 f16 e32 d \su g2 \glissando a,4 \sd \break a2. \su g4 \glissando f1
21         }
22         \context Staff = down {
23             \clef F; s1*4
24         }
25     >
26 \paper {
27     linewidth = 8.0 \cm;
28 }
29 }
30