%!PS-Adobe-3.0 EPSF-3.0
%%BoundingBox: -150 -150 150 150


/secteur {newpath
               0 0 moveto
               Radius i 1 sub cos mul
               0 0 Radius i 1 sub i 1 add arc
               closepath
               } def
0 0 translate
/CM {28.45 mul} bind def
/Radius {radius CM} def
/radius 5 def

0 1 360 {/i exch def /HUE i 360 div def
       secteur
       HUE 1 1  sethsbcolor fill} for
% [email protected]

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.