]> git.donarmstrong.com Git - lilypond.git/blob - input/test/no-stem-extend.ly
* lily/lily-guile.cc (type_check_assignment): if
[lilypond.git] / input / test / no-stem-extend.ly
1 \version "1.5.68"
2 \header {
3  texidoc = "Don't extend stems to cetner line."
4 }
5
6 \score { 
7   \context Voice \notes\relative c {
8         \context Staff <
9                 \context Voice = "a" { 
10                         f2 f8 g a b 
11                         \property Voice.Stem \set #'no-stem-extend = ##t
12                         f2 f8 g a b
13                 }
14                 \context Voice = "b" { 
15                         c''2 c8 b a g
16                         \property Voice.Stem \set #'no-stem-extend = ##t
17                         c2 c8 b a g
18                 }
19         >
20         
21   }
22   \paper { }  
23   \midi { }
24 }