use better names

2023/src/day02.clj

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