Skip to content

Instantly share code, notes, and snippets.

@keyvanakbary

keyvanakbary/pi.clj

Last active August 29, 2015 14:14
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save keyvanakbary/1b9eb63d5f95afd81713 to your computer and use it in GitHub Desktop.
Save keyvanakbary/1b9eb63d5f95afd81713 to your computer and use it in GitHub Desktop.
Download ZIP
Nilakantha's series for calculating π
Raw
pi.clj
(defn nilakantha [iterations]
(loop [sum 3.0M
counter 0
sign +]
(if (>= counter (* 2 iterations))
sum
(recur
(sign sum
(/ 4.0M
(* (+ counter 2)
(+ counter 3)
(+ counter 4))))
(+ counter 2)
(if (= sign +) - +)))))
(println
(with-precision 10000
(nilakantha 150)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment