Add Day 3, Puzzle 1 solution

2025-12-03 20:20:07 +01:00
parent 32687cdfdd
commit c93dbadb5a
3 changed files with 31 additions and 0 deletions
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -2,6 +2,7 @@ module Main (main) where

 import Day01 (day01_1, day01_2)
 import Day02 (day02_1, day02_2)
+import Day03 (day03_1)
 import System.Environment (getArgs)

 main :: IO ()
@@ -18,9 +19,13 @@ main = do
    "2" : _ -> do
      day02_1
      day02_2
+    "3" : "1" : _ -> day03_1
+    "3" : _ -> do
+      day03_1
    "all" : _ -> do
      day01_1
      day01_2
      day02_1
      day02_2
+      day03_1
    _ -> error "Not implemented"