X-Git-Url: https://git.njae.me.uk/?a=blobdiff_plain;f=advent06%2FMain.hs;h=27fc18a56cd76baf5d0127666aad24cd4eafd7ab;hb=5906e1d8d0723d8c7e3d97c3a29988723efe2f71;hp=6b3777132e3408122f37e83f4a213a588b872b02;hpb=cf21b8024fdea08072210b7d0ab0230789538928;p=advent-of-code-21.git diff --git a/advent06/Main.hs b/advent06/Main.hs index 6b37771..27fc18a 100644 --- a/advent06/Main.hs +++ b/advent06/Main.hs @@ -9,7 +9,7 @@ type Shoal = M.IntMap Integer main :: IO () main = do text <- readFile "data/advent06.txt" - let fish = map (read @Int) $ splitOn "," text + let fish = map read $ splitOn "," text let shoal = mkShoal fish let generations = iterate generation shoal print $ part1 generations