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))