12 lines
282 B
Haskell
12 lines
282 B
Haskell
module Main where
|
|
|
|
import Commons
|
|
import Part1
|
|
import Part2
|
|
|
|
main = do doc <- parse
|
|
let part1Res = sum (Part1.getCalibrationValues doc)
|
|
putStrLn (show (part1Res))
|
|
let part2Res = sum (Part2.getCalibrationValues doc)
|
|
putStrLn (show (part2Res))
|