beginchar(oct"216",em#,6cap#/7,dth#); "Ligature: cX";
 path p[];
 save ww,hh;

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

 x0 = 1.25ww; y0 = .1hh;
 x7 = 1.4ww;  y1 = .5hh;
 x1 = 1.2ww;
 x2 = 1.8ww;  y2 = hh;
 x3 = 1.75ww; y3 = .4hh;
 y7 = y4 = y5 = -dd;
 x5 = x6 = 2.9ww; 
 y6 = .9hh; x4 = 2.3ww;

 p0 = z0{z3-z1}..{z2-z0}z3..{z1-z3}z2..{z0-z2}z1..{z3-z1}z0; 
 z8 = point 1.8 of p0;
 p1 = z8..controls z4..{right}z5;
 p2 = z6--z7;

 pickup pencircle scaled b;
 draw p0;
 draw p1;
 draw p2;

 endchar;