RosettaCodeData/Task/Pascals-triangle/Clojure/pascals-triangle-4.clj

6 lines
117 B
Clojure

(def pascal
(iterate #(concat [1]
(map + % (rest %))
[1])
[1]))