diff --git a/2020/day17/day17.hs b/2020/day17/day17.hs index c20b113..53e0b4d 100644 --- a/2020/day17/day17.hs +++ b/2020/day17/day17.hs @@ -11,6 +11,7 @@ main = do input <- lines <$> readFile "input" let a = toVec input _ = a :: [V4 Int] +-- _ = a :: [V3 Int] print $ day17 a day17 = length . flip (!!) 6 . iterate step