beginchar(oct"215",em#,6cap#/7,0); "Ligature: OY";
 path p[];
 save ww,hh;

 ww = w/5; hh = h/3;
 b := .2ww;

 x0 = x5 = 2.5ww;
 y1 = y2 = .5hh;
 y3 = y4 = 1.7hh;
 y0 = .1hh; y5 = .5[y0,y3];
 x1 = 5ww - x2 = 1.8ww;
 x3 = 5ww - x4 = 1.7ww;
 p0 = z0..z1..z5..z2..cycle;
 z6 = point 1.6 of p0;
 z7 = point 2.4 of p0;
 y8 = y10 = .25[y6,y3];
 y9 = .5[y6,y8];
 x8 = x6; x9 = x5; x10 = x7;

p1 = z3{z6-z3}..controls z6..{right}z5{right}..controls z7..{z4-z7}z4
{z7-z4}..z10..z9..z8..{z3-z6}z3..cycle;

 pickup pencircle scaled b;
 draw p0;
 filldraw p1;

 endchar;