Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
9 lines (7 sloc) 131 Bytes
(def square
(fn [n]
(* n n)))
(def add-squares
(fn [& list]
(apply + (map square list))))
(print (add-squares 1 2 5))