(let loop ([i 1])
  (if (> i 10)
      0
      (+ i (loop (+ 1 i)))))