beginchar(oct"022",.4em#,.5cap#,0dth#); "Spathi"; picture DCT; path p[]; y1 = y0 = y2 = .5h; x1 = -.2w; x0 = .5w; x2 = 1.2w; x3 = .9w; y3 = 19h/50; x4 = x5 = 4w/5; y4 = 3.5h/5; y5 = 1.5h/5; pickup pencircle scaled .8pt; p1 = fullcircle scaled Diam shifted (z0); p2 = z1..controls z2..z3; p3 = z4--z5; draw p1; draw p2; draw p3; DCT = currentpicture; endchar;