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