%!PS EPSF
%%Title: Bentley's double loop
%%Creator: cgl (inspired  by Bentleyj)
%%CreationDate: May 30 1996
%%BoundingBox: -100 -105  100 105
%%EndProlog
10{1 1 10{100 0 moveto
         gsave
         dup 36 mul rotate
         100 0 lineto stroke
         grestore
  } for
  36 rotate
} repeat
showpage