%!PS-Adobe-3.0
%%BoundingBox: 1 1. 44. 44.
% Cookbook Example Program from First Printing, Revised 7 Jan 1985
% Program: Repeated Shapes     Number: 6
/inch {10 mul} def
/wedge
 { newpath
     0 0 moveto
     1 0 translate
     15 rotate
     0 15 sin translate
     0 0 15 sin -90 90 arc
   closepath
 } def
gsave
 2.25 inch 2.25 inch translate
 1.75 inch 1.75 inch scale
 0.02 setlinewidth
 2 1 13
  {13 div setgray
    gsave
      wedge
      gsave
        fill
      grestore
      0 setgray stroke
    grestore
    30 rotate
  } for
grestore

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.