2 #(set-global-staff-size 17)
5 texidoc = "Default flag styles: '(), 'mensural and 'no-flag.
6 Compare all three methods to print them: (1) C++ default implementation,
7 (2) Scheme implementation using the 'style grob property and
8 (3) setting the 'flag property explicitly to the desired Scheme function.
9 All three systems should be absolutely identical."
16 % test notes, which will be shown in different style:
17 testnotes = { \autoBeamOff
18 c'8 d'16 c'32 d'64 \acciaccatura {c'8} d'64
19 c''8 d''16 c''32 d''64 \acciaccatura {c''8} d''64
22 % Old settings: style set to default, 'mensural, 'no-flag; using the
23 % default C++ function ly:stem::calc-stem
25 \override Score.RehearsalMark.self-alignment-X = #LEFT
28 \mark "Default flags (C++)"
31 \mark "Symbol: 'mensural (C++)"
32 \override Flag.style = #'mensural
35 \mark "Symbol: 'no-flag (C++)"
36 \override Flag.style = #'no-flag
40 % The same, but using the Scheme implementation of default-flag
42 \override Score.RehearsalMark.self-alignment-X = #LEFT
45 \override Flag.stencil = #default-flag
47 \mark "Default flags (Scheme)"
50 \mark "Symbol: 'mensural (Scheme)"
51 \override Flag.style = #'mensural
54 \mark "Symbol: 'no-flag (Scheme)"
55 \override Flag.style = #'no-flag
59 % New scheme functions: normal-flag, mensural-flag, no-flag
61 \override Score.RehearsalMark.self-alignment-X = #LEFT
64 \mark "Function: normal-flag"
65 \override Flag.stencil = #normal-flag
68 \mark "Function: mensural-flag"
69 \override Flag.stencil = #mensural-flag
72 \mark "Function: no-flag"
73 \override Flag.stencil = #no-flag