diff options
Diffstat (limited to 'dviware/quicspool/wwfonts/tromms.mf')
-rw-r--r-- | dviware/quicspool/wwfonts/tromms.mf | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/dviware/quicspool/wwfonts/tromms.mf b/dviware/quicspool/wwfonts/tromms.mf new file mode 100644 index 0000000000..75cc7c5b9d --- /dev/null +++ b/dviware/quicspool/wwfonts/tromms.mf @@ -0,0 +1,42 @@ +% $Header: tromms.mf,v 1.1 88/01/15 13:15:27 simpson Rel $ +% $Log: tromms.mf,v $ +%Revision 1.1 88/01/15 13:15:27 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; + |