beginchar(oct"006",.8em#,cap#,dth#); "Elafron"; picture ELAFRON, scELAFRON; transform t[]; z0 = (2w/5,1.7h/5); z1 = (6w/5,1.7h/5); z2 = (.5w,0); z3 = (.5w,h); t1 = identity reflectedabout(z0,z1) shifted (0,-.45cap) reflectedabout(z2,z3); addto currentpicture also PETACTH transformed t1; ELAFRON = currentpicture; clearit; addto currentpicture also scPETACTH transformed t1; scELAFRON = currentpicture; clearit; addto currentpicture also ELAFRON; endchar;