beginchar(oct"377",.4em#,5cap#/7,dth#); "Gorgon*Iporrois*Diplis"; z0 = (.25w,-.2h); addto currentpicture also YPORROH; addto currentpicture also GOPGON shifted (.4w,.3h); pickup pencircle scaled pt; drawdot z0; drawdot z0 shifted (.3w,0); endchar;