Skip to content

Instantly share code, notes, and snippets.

@rahulkmr

rahulkmr/gist:3182490

Created July 26, 2012 14:49
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save rahulkmr/3182490 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save rahulkmr/3182490 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.clj
(defn fact-iter [product counter max-count]
(if (> counter max-count)
product
(recur (* counter product) (inc counter) max-count)))
(defn factorial [n]
(fact-iter 1 1 n))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment