stafflines = 5;
+% [reuter] URG! This is not always true. One of the effects of
+% keeping this a constant is that, for notation with less stafflines,
+% stafflinethickness gets too small.
-interline#:=staffsize#/(stafflines-1);
+staff_space#:=staffsize#/(stafflines-1);
-% URG!
-% font_x_height ( interline# );
-%
-% [D.K.Roush & J.S.Gourlay] say this should be 0.072
-% We know better
-% generally, the "blackness" of most chars depends on this.
-%
-stafflinethickness#:=0.1 interline#;
-stemthickness# := stafflinethickness#;
+% measuring on pocket scores turns out: stafflinethickness is
+% independent on staff size, and generally 0.5 pt.
+stafflinethickness# :=0.5 pt#;
+
+stemthickness# := 1.3 stafflinethickness#;
ledgerlinethickness# := 2 stafflinethickness#;
-define_pixels(interline, stemthickness);
+define_pixels(staff_space, 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
-%
+% FIXME: According to [Wanske], only outside corners should be round
+% I don't think we do this anywhere -- jcn
numeric blot_diameter;
-blot_diameter# = .4pt#;
+blot_diameter# = .35 pt#;
+if (blot_diameter# * hppp) < 1:
+ blot_diameter# := 1/hppp;
+fi
+if (blot_diameter# * vppp) < 1:
+ blot_diameter# := 1/vppp;
+fi
define_pixels(blot_diameter);
+
+