% most beautiful noteheads are pronounced, not circular,
% and not even symmetric.
-% These examples are inspired by [Wanske] [see literature list]
+% These examples are inspired by [Wanske], see literature list
fet_begingroup("balls");
def draw_brevis =
save beamheight, head_width;
save holeheight, stem_width;
- save serif_size;
+ save serif_size, serif_protrude;
head_width# = 2 interline#;
holeheight = 3 stafflinethickness;
2 beamheight + holeheight = noteheight;
serif_size = (holeheight - stafflinethickness)/2;
-
+ serif_protrude = 1.5 serif_size;
penpos1(stem_width, 0);
penpos2(stem_width, 0);
penpos3(beamheight, 90);
z3r = z2r + serif_size *(1,-1);
y4r = y3r;
x4r = head_width/2;
- z5l = z3l + serif_size * (-1,-1);
+ z5l = z3l + (-serif_size, -serif_protrude);
penlabels(1,2,3,4, 5);
fill z1r -- z1l -- z5r{down} .. z5l{up} .. z3l{right}
stafflinethickness#:=0.1 interline#;
stemthickness# := stafflinethickness#;
-ledgerlinethickness# := 1.5 stafflinethickness#;
+ledgerlinethickness# := 2 stafflinethickness#;
define_pixels(interline, stemthickness);
define_pixels(stafflinethickness,ledgerlinethickness);
%
% this is not a meta variable: it is related to absolute sizes.
%
+% According to [Wanske], only outside corners should be round
+%
numeric blot_diameter;
blot_diameter# = .4pt#;
define_pixels(blot_diameter);