(let loop (fun (i) {
  (print i)
  (loop (+ i 1)) }))

(loop 0)