blob: dc10eef459dac5500472b9f89abfacb279858628 (
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
31
32
33
34
35
36
37
38
|
%% This file is public domain.
%% Originally written 1998, Ivan A Derzhanski.
%% Notice added by Clea F. Rees 2009/01/06.
%%
% eiadfi10.mf: Irish Funny Italic 10 point
if unknown cmbase: input cmbase fi
font_identifier:="EIADFI";
design_size := 10;
font_size design_size*pt#;
input c-cmff;
u#:=(21*(design_size/10))/36pt#; % unit width
crisp#:=(11*(design_size/10))/36pt#; % diameter of serif corners
hair#:=(11*(design_size/10))/36pt#; % lowercase hairline breadth
stem#:=(17*(design_size/10))/36pt#; % lowercase stem breadth
curve#:=(21*(design_size/10))/36pt#; % lowercase curve breadth
ess#:=(23*(design_size/10))/36pt#; % breadth in middle of lowercase s
flare#:=(25*(design_size/10))/36pt#; % diameter of bulbs or breadth of terminals
cap_hair#:=(15*(design_size/10))/36pt#; % uppercase hairline breadth
cap_stem#:=(25*(design_size/10))/36pt#; % uppercase stem breadth
cap_curve#:=(27*(design_size/10))/36pt#; % uppercase curve breadth
cap_ess#:=(29*(design_size/10))/36pt#; % breadth in middle of uppercase s
vair#:=(15*(design_size/10))/36pt#; % vertical diameter of hairlines
bar#:=(18*(design_size/10))/36pt#; % lowercase bar thickness
slab#:=(21*(design_size/10))/36pt#; % serif and arm thickness
cap_bar#:=(23*(design_size/10))/36pt#; % uppercase bar thickness
cap_band#:=(18*(design_size/10))/36pt#; % uppercase thickness above/below lobes
slant:=+.1; % tilt ratio $(\Delta x/\Delta y)$
generate gaelach % switch to the driver file
|
