2 % generic paper parameters
4 paperfile
= \papersize +
".ly";
9 interline
= \staffheight / 4.0;
12 % thickness of stafflines
13 staffline
= \interline / 10.0;
15 beam
_thickness
= 0.52 * (\interline -
\staffline);
16 interbeam
= (2.0 * \interline -
\beam_thickness) / 2.0;
17 interbeam
4 = (3.0 * \interline -
\beam_thickness) / 3.0;
21 % poor man's array size
24 stem
_length
0 = 3.5*\interline;
25 stem
_length
1 = 2.5 * \interline;
26 stem
_length
2 = 2.0 * \interline;
27 stem
_length
3 = 1.5 * \interline;
30 minimum
_stem
_length
0 = 0.0;
% not used
31 minimum
_stem
_length
1 = 1.5 * \interline;
32 minimum
_stem
_length
2 = 1.25 * \interline;
33 minimum
_stem
_length
3 = 1.0 * \interline;
35 % stems in unnatural (forced) direction should be shortened,
36 % according to [Roush & Gourlay]. Their suggestion to knock off
37 % a whole staffspace seems a bit drastical: we'll do half.
39 forced
_stem
_shorten
0 = 0.5 * \interline;
40 forced
_stem
_shorten
1 = \forced_stem_shorten0;
41 forced
_stem
_shorten
2 = \forced_stem_shorten1;
42 forced
_stem
_shorten
3 = \forced_stem_shorten2;
44 % there are several ways to calculate the direction of a beam
46 % * MAJORITY : number count of up or down notes
47 % * MEAN : mean centre distance of all notes
48 % * MEDIAN : mean centre distance weighted per note
50 % enum Dir_algorithm { DOWN=-1, UP=1, MAJORITY=2, MEAN, MEDIAN };
58 beam
_dir
_algorithm
= \MAJORITY;
60 % catch suspect beam slopes, set slope to zero if
61 % outer stem is lengthened more than
62 beam
_lengthened
= 0.2 * \interline;
63 % and slope is running away steeper than
64 beam
_steep
_slope
= 0.2 / 1.0;
66 % OSU: suggested gap = ss / 5;
67 slur
_x
_gap
= \interline / 5.0;
68 slur
_x
_minimum
= 2.0 * \interline;
69 slur
_slope
_damping
= 0.5;
70 tie
_x
_minimum
= \slur_x_minimum;
71 tie
_x
_gap
= \slur_x_gap;
72 tie
_slope
_damping
= 0.3;
74 % ugh: rename to bow (in bezier.cc and fonts.doc too...)
75 % slur_thickness = 1.8 * \staffline;
76 slur
_thickness
= 1.4 * \staffline;
77 slur
_height
_limit
= \staffheight;
79 % mmm, try bit flatter slurs
80 % slur_ratio = 1.0 / 3.0;
82 slur
_clip
_ratio
= 1.2;
83 slur
_clip
_height
= 3.0 * \staffheight;
84 slur
_clip
_angle
= 100.0;
88 notewidth
= (\quartwidth +
\wholewidth) / 2.0;
91 barsize
= \staffheight;
92 rulethickness
= \staffline;
93 stemthickness
= \staffline;
96 gourlay
_energybound
= 100000.;
98 The following bounds the number of measures
99 on a line. Decreasing it greatly reduces computation time
101 gourlay_maxmeasures = 10.;
102 castingalgorithm = \Gourlay;
103 \include "engraver.ly";