RosettaCodeData/Task/Flatten-a-list/Clojure/flatten-a-list-2.clj
2023-07-01 13:44:08 -04:00

3 lines
101 B
Clojure

(defn flatten [x]
(filter (complement sequential?)
(rest (tree-seq sequential? seq x))))