You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
16 lines
312 B
Clojure
16 lines
312 B
Clojure
3 years ago
|
(require '[clojure.string :as str])
|
||
|
|
|
||
|
3 years ago
|
(->> (str/split-lines (slurp "./in"))
|
||
|
|
(map
|
||
|
|
(fn [line]
|
||
|
|
(as-> line $
|
||
|
|
(str/split $ #" ")
|
||
|
|
(subvec $ 11 15)
|
||
|
|
(filter #(.contains [2 3 4 7] (count %)) $)
|
||
|
|
(count $)
|
||
|
|
)))
|
||
|
|
(apply +)
|
||
|
|
(println)
|
||
|
|
)
|
||
|
3 years ago
|
|