beginchar(oct"015",.4em#,.5cap#,0dth#); "A Xromatiki Fthora";
picture CR;
 path p[];
 z0 = (.5w,.5h);
 x1 = w - x2 = -.2w;
 y1 = y2 = y0 = y5; 
 x3 = w - x4 = -.22w;
 y3 = .3h;
 y4 = .7h;

 pickup pencircle scaled .8pt;
 p1 = flex(z3,z1,z0) & flex(z0,z2,z4);
 p2 = p1 rotatedabout(z0,-5);
 p3 = fullcircle scaled Diam shifted (z0);
 draw p2;
 draw p3;
 CR = currentpicture;
 endchar;