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.

10 lines
223 B
Clojure

(require 'clojure.set)
(->> (slurp "./in")
clojure.string/split-lines
(map read-string)
((juxt set (comp set #(map (partial - 2020) %))))
(apply clojure.set/intersection)
(apply *)
(println))