summaryrefslogtreecommitdiff
path: root/dviware/quicspool/wbfonts/tromms.mf
diff options
context:
space:
mode:
Diffstat (limited to 'dviware/quicspool/wbfonts/tromms.mf')
-rw-r--r--dviware/quicspool/wbfonts/tromms.mf42
1 files changed, 42 insertions, 0 deletions
diff --git a/dviware/quicspool/wbfonts/tromms.mf b/dviware/quicspool/wbfonts/tromms.mf
new file mode 100644
index 0000000000..d42534fe28
--- /dev/null
+++ b/dviware/quicspool/wbfonts/tromms.mf
@@ -0,0 +1,42 @@
+% $Header: tromms.mf,v 1.1 88/01/15 13:13:12 simpson Rel $
+% $Log: tromms.mf,v $
+%Revision 1.1 88/01/15 13:13:12 simpson
+%initial release
+%
+%Revision 0.1 87/12/11 19:01:45 simpson
+%beta test
+%
+% This file contains special characters of ``math italic'' fonts
+% that actually are not supposed to be slanted.
+
+% The italic corrections are zero in all of these characters.
+
+cmchar "Less than sign";
+compute_spread(5/4x_height#,3/2x_height#);
+beginchar("<",14u#,v_center(spread#+rule_thickness#));
+italcorr h#*slant-u#;
+adjust_fit(0,0); pickup rule.nib;
+lft x2=hround 1.5u-eps; x1=x3=w-x2;
+y1-y3=spread; y2=.5[y1,y3]=math_axis;
+draw z1--z2--z3; % diagonals
+labels(1,2,3); endchar;
+
+cmchar "Virgule (slash)";
+beginchar(oct"016",9u#,body_height#,paren_depth#); % non-ASCII position
+italcorr body_height#*slant-.5u#;
+adjust_fit(0,0); pickup rule.nib;
+rt x1=hround(w-u)+eps; top y1=h+eps;
+lft x2=hround u-eps; bot y2=-d-eps;
+draw z1--z2; % diagonal
+penlabels(1,2); endchar;
+
+cmchar "Greater than sign";
+compute_spread(5/4x_height#,3/2x_height#);
+beginchar(">",14u#,v_center(spread#+rule_thickness#));
+italcorr math_axis#*slant-u#;
+adjust_fit(0,0); pickup rule.nib;
+rt x2=hround(w-1.5u)+eps; x1=x3=w-x2;
+y1-y3=spread; y2=.5[y1,y3]=math_axis;
+draw z1--z2--z3; % diagonals
+labels(1,2,3); endchar;
+