beginchar(oct"360",.8em#,cap#,1.5dth#); "Gorgon*Apostrofou*Diplis";
z0 = (.6w,-.3h);
 addto currentpicture also APOCTROFOC; 
 addto currentpicture also GOPGON shifted (.1w,.6h);  
 pickup pencircle scaled pt;
 drawdot z0;
 drawdot z0 shifted (-.2w,0);
endchar;