Source

euler / clojure / util.clj

Full commit
1
2
3
4
5
6
;; util
;; John Paulett - June 8, 2009
;;
(ns util)
(defn sum-digits [number]
	(reduce + (for [c (str number)] (new Integer (str c)))))