4 texidoc="@cindex Trills
5 Document trills, pralls and turns."
13 title="Marques des agr\\'ements et leur signification"
14 composer="D'Anglebert"
19 invisible = \property Voice.NoteHead \override #'transparent = ##t
20 visible = \property Voice.NoteHead \revert #'transparent
22 % Ugly hack to get reasonable position of the pincé and Cheute
24 \property Voice.scriptHorizontal = ##t
25 \property Voice.Script \override #'padding = #0.3
26 \property Voice.Script \override #'extra-offset = #'(-.6 . 0)
27 % Avoid collision with the dots of dotted notes
28 \property Voice.Dots \override #'extra-X-extent = #'(-0.7 . 0)
31 \property Voice.scriptHorizontal \unset
32 \property Voice.Dots \revert #'padding
33 \property Voice.Script \revert #'padding
34 \property Voice.Script \revert #'extra-offset
41 \context Staff=upper \notes\relative c'' {
50 d4-\turn b4.-\downprall
54 <\context Voice=upper{\voiceOne d4}
55 \context Voice=lower{\voiceTwo
56 \property Voice.Script \override #'extra-offset = #'(-0.8 . 2.0)
59 %{ FIXME \comma does not exist
70 <{c2}{s4 \invisible d1*1/4 ( \visible }> e2-)
71 <{a,2}{s4 \invisible b1*1/4 ( \visible }> d2-)
72 <{a2}{s4 \invisible b1*1/4 ( \visible }> d2-)
76 \context Lyrics=one \lyrics {
83 _4 "sans tremblement"2
90 "Coul\\'e Sur 2 notes"1
95 \context Lyrics=two \lyrics {
104 \context Staff=lower \notes\relative c'' {
105 % autobeamer has som problems here
106 d32-[ \repeat unfold 3 { c d } c-]
107 d8 ~ d32-[\repeat unfold 3 { d32 } c-]
108 d32 c b c \repeat unfold 4 { d32 c }
109 b32 c d c \repeat unfold 4 { d32 c }
110 c32-[-( b a16 b c-)-]
111 b32-[ \repeat unfold 5 { c d32 } c-]