/N 21 def .1 setlinewidth /les_points O 5.5 N 0 genpolyreg def %% le napperon /i 0 def N { les_points i getp /M defpoint les_points {M 1 trait} papply /i i 1 add store } repeat /str 20 string def setTimesItalic (n) xmax xmin add 2 div .5 sub ymin text setTimes ( = ) show N str cvs show