diff options
| author | Clyne Sullivan <clyne@bitgloo.com> | 2022-11-30 19:55:31 -0500 |
|---|---|---|
| committer | Clyne Sullivan <clyne@bitgloo.com> | 2022-11-30 19:55:31 -0500 |
| commit | 8d43e37df99f280377bed90284d6ac2428334804 (patch) | |
| tree | 3a5042c9af29da52b4bac38fd78b3ccde77a1dbc /year2021/day8/part1.clj | |
| parent | 66ed0b9d27850dc653abc8baa75884f3de311bfa (diff) | |
move 2021 days to folder; update README
Diffstat (limited to 'year2021/day8/part1.clj')
| -rw-r--r-- | year2021/day8/part1.clj | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/year2021/day8/part1.clj b/year2021/day8/part1.clj new file mode 100644 index 0000000..fe06fdf --- /dev/null +++ b/year2021/day8/part1.clj @@ -0,0 +1,15 @@ +(require '[clojure.string :as str]) + +(->> (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) + ) + |