1
0
Fork 0

remove types

This commit is contained in:
sloane 2023-12-09 21:36:01 -05:00
parent 58fd8f9a00
commit 25c512d694
No known key found for this signature in database

View file

@ -2,7 +2,6 @@
import Control.Monad (ap) import Control.Monad (ap)
parseInput :: String -> [[Integer]]
parseInput = map (map read . words) . lines parseInput = map (map read . words) . lines
solve str = show (part1', part2') solve str = show (part1', part2')
@ -23,7 +22,6 @@ next = sum . map last . differentiate
prev = foldl1 subtract . reverse . map head . differentiate prev = foldl1 subtract . reverse . map head . differentiate
main :: IO ()
main = do main = do
contents <- getContents contents <- getContents
putStrLn $ solve contents putStrLn $ solve contents