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;