1 % #(ly:set-point-and-click 'line-column)
3 longgrace = \override Stem #'stroke-style = #'()
4 endlonggrace = \revert Stem #'stroke-style
5 ritenuto = \markup { \italic "rit." }
10 #(ly:export (make-event-chord (list (make-span-event 'CrescendoEvent START))))
11 \set crescendoText = \markup { \italic \bold "cresc." }
12 \set crescendoSpanner = #'dashed-line
16 %% TODO: a better mechanism for tweaking Grace settings.
19 startGraceMusic = \sequential {
21 \override Beam #'space-function
22 = #(lambda (beam mult) (* 0.8 0.8))
23 \override Beam #'thickness = #(* 0.384 (/ 0.6 0.48))
26 stopGraceMusic= \sequential {
27 \revert Beam #'thickness
28 \revert Beam #'space-function
36 midiInstrument = #"french horn"
37 %% try to mimic Breitkopf
38 RehearsalMark \override #'padding = #1
39 MultiMeasureRest \override #'padding = #0.5
40 restNumberThreshold = #1
42 RehearsalMark \override #'font-series = #'bold
43 RehearsalMark \override #'font-size = #6
45 Beam \override #'thickness = #0.6
46 Beam \override #'space-function = #(lambda (beam mult) 0.8)
47 Slur \override #'beautiful = #0.3
51 minimumVerticalExtent = #'(-4.5 . 4.5)
53 % #(define fonts my-sheet)