]> git.donarmstrong.com Git - lilypond.git/blob - input/test/slur-attachment.ly
release: 1.3.145
[lilypond.git] / input / test / slur-attachment.ly
1
2
3 fragment = \notes {
4   \property Voice.Slur \set #'direction = #1
5   \property Voice.Stem \set #'length = #5.5
6   g''8(g)g4
7   g4(g8)g
8   \property Voice.Slur \set #'attachment = #'(stem . stem)
9   g8(g)g4
10   g4(g8)g
11 }
12
13 \paper { linewidth = -1.; } 
14
15 \score {
16   \notes\relative c \fragment
17   \paper { }  
18 }