(turtles)

(move-offset -200 0)

(define (draw-koch level len)
  (if (= level 0)
      (draw len)
      (begin (draw-koch (- level 1) (/ len 3))
             (turn 60)
             (draw-koch (- level 1) (/ len 3))
             (turn -120)
             (draw-koch (- level 1) (/ len 3))
             (turn 60)
             (draw-koch (- level 1) (/ len 3)))))

(draw-koch 5 400)