summaryrefslogtreecommitdiff
path: root/fonts/utilities/t1install/toil/toil.mf2
blob: 4cdb64f6fd2543f2c8e1049d6b52ef60e66d57c8 (plain)
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
THIS IS AN INCLUDE FILE No. 2 FOR TOILB.AWK
%This file belongs to the TOIL package : Ten plik nale/zy do pakietu TOIL
%This package is public domain         : Pakiet stanowi dobro powszechne
%For more info see `0TOILENG.LIC'      : Wi/ecej informacji w ,,0TOILPOL.LIC''
%============================================================================
% INITIALIZATION:
if not string mode: % unless user's will is different
 mode:=tfm_mode;    % set our private mode, defined above
fi
mode_setup;
displaying:=0; % we're never displaying
font_coding_scheme enc_kind;
font_identifier jobname;
font_size 10pt#; % i.e., |designsize=10pt#|
u#:=if known XS: XS* fi \\ 1/18designsize;
font_normal_space 6u#;
font_normal_stretch 3u#;
font_normal_shrink 2u#;
font_quad 18u#;
font_extra_space 2u#;
font_x_height XHEIGHT;
afm_slant:=SLANT;
user_slant:=if known IA: sind(IA)/cosd(IA) else: 0 fi;
% |fontdimen1| should contain the resulting slant:
res_slant:=xpart(up slanted afm_slant slanted user_slant);
font_slant res_slant;
if known math_rule: fontdimen 8: math_rule; fi
if known math_axis: fontdimen 22: math_axis; fi
numeric show_skipping; % default is not showing
% --------------------------------