summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/fetamont/ffmchar_braceleft.mf
blob: 682795cadf3bfbf374334fc359c8372075312dda (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
ffmchar("braceleft",8,ht#,comma_depth#);
italcorr ht#*slant;
w-x1=leftstemloc-ho+noise;
w-x5=leftstemloc-ho+noise;
x2=leftstemloc+noise;
x4=leftstemloc+noise;
lft x3=eps+noise;
top y1=h+o+noise; 
bot y5=noise-o-d;
y3=.5[-d,h]+noise;
y2=.75[-d,h]+noise;
y4=.25[-d,h]+noise;
pair randira;
randira=randrt;
draw half(z1,-randrt,z2,-randup,z3,-randira);
draw half(z3,randira,z4,-randup,z5,randrt);
labels(1,2,3,4,5); 
endchar;