summaryrefslogtreecommitdiff
path: root/fonts/byzfonts/XAP_diuf/X042_diesis.mf
blob: cbf716582c99dab9055f858405bbc87aabc9f187 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
beginchar(oct"042",.4em#,.5cap#,0dth#); "Apli Diesi";
picture QUOTA;
 path p[];

 z0 = (w/2,h/2);
 x1 = w - x2 = .5curve_sidebar;
 y1 = .1h; y2 = .9h;
 z3 = .35[z0,z1];
 z4 = .35[z0,z2];

 pickup pencircle scaled .8pt;
 p1 = fullcircle scaled Diam shifted (z0);
 p2 = z4--z2;
 draw p1;
 draw p2;
 QUOTA = currentpicture;
 endchar;