4 lines
101 B
Clojure
4 lines
101 B
Clojure
|
|
(defn flatten [x]
|
||
|
|
(filter (complement sequential?)
|
||
|
|
(rest (tree-seq sequential? seq x))))
|