updated for day 02

This commit is contained in:
Andrew Maier 2021-12-07 22:11:16 +01:00
parent 73c2fc7cd2
commit 9e699e94e0

View File

@ -1,4 +1,9 @@
module Main where module Main where
import Day02 (day02Part1, day02Part2)
main :: IO () main :: IO ()
main = putStrLn "Hello, Haskell!" main = do
input <- readFile "./data/input.txt"
putStrLn $ "Part 1: " <> day02Part1 input
putStrLn $ "Part 2: " <> day02Part2 input