Print-Increment Function

pi.clj

(defn pi
  ([] (pi 0))
  ([x] (println x) #(pi (+ x 1))))

; result
=> (((((((pi)))))))
0
1
2
3
4
5
6

pi.rb

pi = ->x = 0 do
  puts x
  ->{ pi[x + 1] }
end

# result
> pi[][][][][][][]
0
1
2
3
4
5
6