summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/fetamont/ffmchar_Thorn.mf
blob: b39e8a7a53e008228bedc15f9707bf2f57524c57 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
ffmchar("Thorn",14,ht#,0);
italcorr .7ht#*slant;
x1=leftstemloc+noise;
x2=leftstemloc+noise;
x4=.618[x1,w-x1]+noise;
x5=.618[x1,w-x1]+noise;
x6=.5[w-x1,lft w]+noise; 
bot y1=noise-o;
top y2=h+noise; 
y3=.764h+noise; 
y4=.764h+noise; 
y6=.5[y4,y5]+noise;
y5=.382h+noise;
y7=.382h+noise;
z3=whatever[z1,z2];
z7=whatever[z1,z2];
draw z1--z2;
draw z3--z4
 & half(z4,z4-z3,z6,-randup,z5,z7-z5)
 & z5--z7;
labels(1,2,3,4,5,6,7); 
endchar;