beginchar(oct"261",1.4em#,.9cap#,2dth#); "Oligon*Petastis+Pausis"; z0 = (1.9h,0); addto currentpicture also PETACTH; addto currentpicture also OLIGON shifted (0,.6h); addto currentpicture also BAPEIA shifted (.6w,-.2h); pickup pencircle scaled pt; drawdot z0; endchar;