Commits

Steven! Ragnarök committed 58b20a8

I don't actually remember what this does or what it's for.

Comments (0)

Files changed (1)

sum_inner_func.clj

+(defn sum-down-from [x]
+  (let [current-sum 0]
+    ((fn sum-helper [sum x]
+      (if (pos? x)
+        (recur (+ sum x) (dec x))
+        sum)) current-sum x)))
+(println (sum-down-from 6))