feat(2024): day6 part 2 slight optimization using Array.Parallel

vipentti · Dec 6, 2024 · 7097b92 · 7097b92
1 parent 79c9677
commit 7097b92
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/visp/examples/aoc2024/day6.visp b/visp/examples/aoc2024/day6.visp
@@ -125,8 +125,9 @@
   (let start (FindStart parsedInput))
   (let tests (->> (FindVisited parsedInput) (Set.remove start)))
   (->> tests
-      (Seq.filter #(RunScenario start %1 parsedInput))
-      (Seq.length)))
+      (Array.ofSeq)
+      (Array.Parallel.filter #(RunScenario start %1 parsedInput))
+      (Array.length)))
 
 ;; Implementation