Clojure Recursion with recur and loop