year2020/day1/part1.clj


1
2
3
4
5
6
7
8
9

(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))