(let loop ((i 0))
    (when (< i 5)
        (let loop2 ((j i))
            (when (< j 3)
                (display (+ i j))
                (loop2 (+ j 1)))
            (loop (+ i 1)))))

;; i believe this should work
(loop [i 0]
  (when (< i 5)
    (loop [j i]
      (when (< j 3)
        (print (+ i j))
        (recur (inc j))))
    (recur (inc i))))