]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-din-code.mf
Run `make grand-replace'.
[lilypond.git] / mf / feta-din-code.mf
index 599396248d0a869e91e043e877003c24a2fa3ff9..ea6569acda54847eddb99fff4883a5e57d5c0a83 100644 (file)
@@ -4,7 +4,7 @@
 %
 % source file of the Feta (not the Font-En-Tja) music font
 %
-% (c) 1997--2005 Jan Nieuwenhuizen <janneke@gnu.org>
+% (c) 1997--2008 Jan Nieuwenhuizen <janneke@gnu.org>
 
 
 ex# := (dynamic_design_size / 2.4) * pt#;
@@ -187,7 +187,7 @@ fet_beginchar ("dynamic f", "f");
        penpos8 (bulb_thick, 160);
        x8l = x7l - 1/10 ex;
 
-       z7l = whatever [z8r,z8l];
+       z7l = whatever [z8r, z8l];
 
        penpos9 (bulb_thick, 135);
        x9r = 0.1 [x8l, x8r];
@@ -349,14 +349,14 @@ slant := ypart (dir (slant_angle));
 
 code := 111;
 
-fet_beginchar("dynamic p", "p")
+fet_beginchar ("dynamic p", "p")
        % TODO: w really is 13/12 ex
        %       but should do kerning
 
        save twiddle_thick, stem_thick, cheek_thick, cheek_width;
        save fill_up, straigh_len;
        save serif, dishing_angle, p, tmp;
-       save cheek_medium, left_serif_protude, right_serif_protude;
+       save cheek_medium, left_serif_protrude, right_serif_protrude;
        save lower_overshoot;
        save blot_t, corner_t;
        path serif, p;
@@ -375,8 +375,8 @@ fet_beginchar("dynamic p", "p")
        stem_thick = 2/6 ex;
        cheek_thick = 13/32 ex;
        cheek_width = 0.72 ex;
-       left_serif_protude = 18/60 ex;
-       right_serif_protude= 15/60 ex;
+       left_serif_protrude = 18/60 ex;
+       right_serif_protrude = 15/60 ex;
 
        currenttransform := currenttransform slanted slant;
 
@@ -453,8 +453,8 @@ fet_beginchar("dynamic p", "p")
 
        pickup pencircle scaled serif_thick;
 
-       lft x11 = -left_serif_protude;
-       rt x10 = stem_thick + right_serif_protude;
+       lft x11 = -left_serif_protrude;
+       rt x10 = stem_thick + right_serif_protrude;
        bot y10 = bot y11 = -descender;
 
        z15 = z6l + up * fill_up;
@@ -657,7 +657,7 @@ fet_beginchar ("dynamic m", "m");
        y6l = 23/80 ex + ypart center;
        z6l = 1.6 [z3l, z3r] + whatever * idir;
 
-       penpos7 (i_thick ,0);
+       penpos7 (i_thick0);
        y7 = 0;
        z7l = z5l + whatever * idir;
 
@@ -685,11 +685,11 @@ fet_beginchar ("dynamic r", "r");
        save twiddle_thick, attach_len, overshoot, taille;
        pair base_point;
 
-       set_char_box (0, .75 ex#, 0, 1ex#);
+       set_char_box (0, .75 ex#, 0, ex#);
 
        stem_thick =.26 ex;
        bulb_diam = .30 ex;
-       twiddle_thick= 1.1 serif_thick;
+       twiddle_thick = 1.1 serif_thick;
        overshoot = .5 serif_thick;
        taille = -0.3 serif_thick;
        attach_len + bulb_diam / 2 + stem_thick = w;