beginchar(oct"063",.8em#,.7cap#,dth#); "Gorgon*Elafrou*Diplis"; z0 = (.4w,-.3h); addto currentpicture also GOPGON shifted (.45w,.6h); addto currentpicture also ELAFRON; pickup pencircle scaled pt; drawdot z0; drawdot z0 shifted (.2w,0); endchar;