summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/drm/drmscap.mf
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/drm/drmscap.mf')
-rw-r--r--Master/texmf-dist/fonts/source/public/drm/drmscap.mf19
1 files changed, 15 insertions, 4 deletions
diff --git a/Master/texmf-dist/fonts/source/public/drm/drmscap.mf b/Master/texmf-dist/fonts/source/public/drm/drmscap.mf
index 4efcbdc0844..00a4faaa532 100644
--- a/Master/texmf-dist/fonts/source/public/drm/drmscap.mf
+++ b/Master/texmf-dist/fonts/source/public/drm/drmscap.mf
@@ -152,7 +152,6 @@ z.j=z.i-(ssslant,2lserw);
z.k=z.j+(lserh,lserw);
enddef;
-%beginchar("i",0.28em#+2ss#,ex#,0); "The Letter I";
beginchar("i",2ss#+thickstroke#+0.2u#,ex#,0); "The Letter I";
z1 = (ss+lserw,lserh);
@@ -682,7 +681,7 @@ llserif(1,12,13,14,26)(1);
urserif(4,15,16,17,27)(1);
ulserif(3,18,19,20,28)(1);
-fill z5--z4..z16..z16--z17--z20--z19..z18..z3--z1..z12..z13--z14--z6--z7..z29..z30--z5--cycle;
+fill z5--z4..z16..z16--z17--z20--z19..z18..z3--z1..z12..z13--z14--z6--z7..z29..z30--z5--z4..cycle;
lowl := currentpicture;
@@ -717,8 +716,11 @@ draw z21--z24;
llserif(1,12,13,14,26)(1);
ulserif(3,18,19,20,28)(1);
+y11 := y9;
+y29 := y30;
+
fill
-z1--z3..z18..z19--z20--z8--z10---z11..{left}z9--z4--z16--z21..z23..z24--z27..z25..z22--z17--z5--z30{right}..z29---z7--z6--z14--z13..z12..z1..cycle;
+z1--z3..z18..z19--z20--z8--z10---z11--z9--z4--z16--z21..z23..z24--z27..z25..z22--z17--z5--z30--z29---z7--z6--z14--z13..z12..z1..cycle;
lowe := currentpicture;
@@ -754,7 +756,10 @@ llserif(1,12,13,14,26)(1);
lrserif(5,31,32,33,34)(1);
ulserif(3,18,19,20,28)(1);
-fill z5--z17--z22..z25..z27--z24..z23..z21--z16--z4--z9..z11..z10--z8--z20--z19..z18..z3--z1..z12..z13--z14--z33--z32..z31..z5..cycle;
+y4 := y9 := y11;
+
+fill
+z5--z17--z22..z25..z27--z24..z23..z21--z16--z4--z9--z11..z10--z8--z20--z19..z18..z3--z1..z12..z13--z14--z33--z32..z31..z5--z17--cycle;
penlabels(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51);
@@ -833,6 +838,12 @@ z12 = z4 shifted (-lserw,thinstroke);
lftdownsideserif(0,5,6);
upsideserif(4,7,8);
+if (y6 > y9):
+ y6 := y9;
+fi
+if (y8 < y12):
+ y8 := y12;
+fi
fill z1--z0--z5..z6..z9--z10--z3--z4--z7..z8..z12--z11--z1--cycle;