diff --git a/day02/app/Main.hs b/day02/app/Main.hs
index 65ae4a0..26437fb 100644
--- a/day02/app/Main.hs
+++ b/day02/app/Main.hs
@@ -1,4 +1,9 @@
 module Main where
 
+import Day02 (day02Part1, day02Part2)
+ 
 main :: IO ()
-main = putStrLn "Hello, Haskell!"
+main = do
+  input <- readFile "./data/input.txt"
+  putStrLn $ "Part 1: " <> day02Part1 input
+  putStrLn $ "Part 2: " <> day02Part2 input