DCarper · August 25, 2012 16:29
diff --git a/gistfile1.clj b/gistfile1.clj
 (def square (fn [n] (* n n)))

 (def sum-squares
 	(fn [& args](
 		(+ (map square args ))
 	))
 )

 (prn "squares: " (map square [1 2 3 4]))
 (prn "hardcoded sum of squares:" (apply + (map square [1 2 3 4])))

 (prn "sum-squares:" (sum-squares 1 2 3 4))
	(def square (fn [n] (* n n)))

	(def sum-squares
	(fn [& args](
	(+ (map square args ))
	))
	)

	(prn "squares: " (map square [1 2 3 4]))
	(prn "hardcoded sum of squares:" (apply + (map square [1 2 3 4])))

	(prn "sum-squares:" (sum-squares 1 2 3 4))