2024/src/day19.clj

@@ -22,7 +22,8 @@
                (mapv (constantly 0) puzzle))
        last))
 
-(let [[w _ & p] (input-manager/get-input 2024 19)]
+(let [[w _ & p]
+      (input-manager/get-input 2024 19)]
   (def words (into #{} (str/split w #", ")))
   (def puzzles p))
 
@@ -44,5 +45,5 @@
   (valid-combination-count #{"word"} "word")    ; 1
 
   (increment-counts-for-matching-words #{"wo" "or" "w" "rd" "d"} "word" [0 0 0 0] 0) ; [1 1 0 0]
-  (valid-combination-count #{"wo" "or" "w" "rd" "d"} "word") ; 2, because ("wo" "r" "d") and ("w" "or" "d")
+  (valid-combination-count #{"wo" "or" "w" "rd" "d"} "word") ; 2, because ("wo" "r" "d") and ("w")
   )