Cosmetics

2023-12-12 00:11:31 +01:00 · 2023-12-12 00:11:31 +01:00 · db50deea96
parent 26cec0dba3
commit db50deea96
1 changed files with 1 additions and 1 deletions
--- a/day10b/src/Main.hs
+++ b/day10b/src/Main.hs
@ -47,7 +47,7 @@ main = do
        <$> (($ start) <$> ([first, second] <*> [(-1 +), (1 +)])) 

  let path = 
-        ((start, 0b1111) :)
+        ((start, pipeStart) :)
        . takeWhile ((/= start) . fst) 
        . tail 
        $ iterate (head . filter ((/= 0) . snd) . findAdj) (start, pipeStart)