beginchar(oct"306",.8em#,5cap#/7,0dth#); "Gorgon Parestigmenon*Kentimata*oligou"; z0 = (.8w,.8h); addto currentpicture also OLIGON; addto currentpicture also KENTHMATA shifted (.2w,.3h); addto currentpicture also GOPGON shifted (.4w,.6h); pickup pencircle scaled pt; drawdot z0; endchar;