%!PS Gurari squares %%BoundingBox: -200 -40 200 125 %%Creator: cgl %%CreationDate: June 20 1996 %%EndProlog %300 500 translate /r 50 def 0 0 moveto 90 rotate 50{r 0 rmoveto 1 1 4{0 r rlineto 90 rotate}for -30 rotate .9 .9 scale }repeat stroke showpage