ajet/advent-of-code
1
0
Fork 0
mirror of https://github.com/Ajetski/advent-of-code.git synced 2025-09-30 09:23:17 -09:00
Code Issues Packages Projects Releases Wiki Activity

use better names

Browse Source
This commit is contained in:
Adam Jeniski 2023-12-02 01:19:36 -05:00
parent f8d81983cd
commit 20539f6005
1 changed files with 15 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
2023/src/day02.clj
View File

@ -19,24 +19,28 @@
;; part 1
(->> lines
(filter (fn [[_id states]]
(not (some
#(some (fn [[cnt color]]
(< (cube-counts color) cnt)) %)
states))))
(filter
(fn [[_id games]]
(not (some (fn [game]
(some (fn [[cnt color]]
(< (cube-counts color) cnt))
game))
games))))
(map (fn [[id]] (Integer/parseInt id)))
(reduce +))
;; part 2
(->> lines
(map (fn [[_id states]]
(reduce #(reduce (fn [acc [cnt color]]
(update acc color max cnt))
%1
%2)
(map (fn [[_id games]]
(reduce (fn [acc game]
(reduce (fn [inner-acc [cnt color]]
(update inner-acc color max cnt))
acc
game))
{"green" 0, "red" 0, "blue" 0}
states)))
games)))
(map #(* (% "green")
(% "red")
(% "blue")))
(reduce +))