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.
-
-staff_space#:=staffsize#/(stafflines-1);
+%
+% The design size of a staff should really be the
+% staff_space, but we use staffsize for historical reasons.
+%
+staff_space# = staffsize#/(stafflines-1);
% measuring on pocket scores turns out: stafflinethickness is
-% independent on staff size, and generally 0.5 pt.
-stafflinethickness# :=0.5 pt#;
+% largely independent on staff size, and generally about 0.5 pt.
+%
+% by request of WL, we tune down the blackness a little
+% for increased contrast with beams.
+
+%% !! synchronize with paper.scm
+stafflinethickness# = 0.3 pt# + 0.04 staff_space#;
+
+%
+% The following tunes the general blackness of the glyphs.
+%
+linethickness# = stafflinethickness#; %% 0.5 pt#;
%
% bigger puff_up_factor, relatively thicker stafflines.
% 20 pt = puff_up_factor 0.
% 10 pt = puff_up_factor 1
%
-puff_up_factor = (stafflinethickness# - 0.1 staff_space#) / (.1 staff_space#);
+puff_up_factor = (linethickness# - 0.1 staff_space#) / (0.1 staff_space#);
ledgerlinethickness# := 2 stafflinethickness#;
define_pixels(staff_space, stemthickness);
-define_pixels(stafflinethickness,ledgerlinethickness);
-
-%
-% Hand-engraved music often has balls extending above and below
-% the lines. If you like that, modify overdone heads (unit:
-% stafflinethickness)
-%
+define_pixels(stafflinethickness, ledgerlinethickness, linethickness);
-numeric overdone_heads;
-overdone_heads = 0.0;
%
% Because of the engraving/stamping process, no traditional
define_pixels(blot_diameter);
+
+