wrong length

glguy · Dec 18, 2024 · 2dd1bf1 · 2dd1bf1
1 parent 6d375ef
commit 2dd1bf1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/solutions/src/2024/18.hs b/solutions/src/2024/18.hs
@@ -31,7 +31,7 @@ main =
     print cost
     let input'       = reverse input
         isBlocking i = isNothing (search (drop i input'))
-        (x,y)        = input' !! binSearchLargest isBlocking 0 1024
+        (x,y)        = input' !! binSearchLargest isBlocking 0 (length input' - 1024)
     putStrLn (show x ++ "," ++ show y)
 
 -- | Find the minimum cost to go from one side of the maze to the other, if there is one.