aUCBLogo Demos and Tests / kochcurve

to KochCurve [len 300]
   ifelse len < .5
   [   forward len
   ][
      (KochCurve len/3)
      left 60
      (KochCurve len/3)
      right 120
      (KochCurve len/3)
      left 60
      (KochCurve len/3)
   ]
end