natto1784/aoc2024
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

day 20: minor fix

Browse Source 
Signed-off-by: Amneesh Singh <natto@weirdnatto.in>
This commit is contained in:
Amneesh Singh
2024-12-20 22:27:24 +05:30
parent ee4f6772c5
commit 2d87d98ffe
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/Day20.hs
View File

@@ -40,7 +40,7 @@ nCheats path n =
j <- [i + 100 .. l - 1], j <- [i + 100 .. l - 1],
let d = manhattan (path IM.! i) (path IM.! j), let d = manhattan (path IM.! i) (path IM.! j),
d <= n, d <= n,
100 <= j - i - d + 1 100 <= j - i - d
] ]
main :: IO () main :: IO ()