remove types
This commit is contained in:
parent
58fd8f9a00
commit
25c512d694
1 changed files with 0 additions and 2 deletions
|
@ -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
|
||||||
|
|
Loading…
Reference in a new issue