Add 2019 day 4

This commit is contained in:
Xavier Morel
2019-12-08 19:54:33 +01:00
parent dc7c4d3ce0
commit 5ba85e0ddb
2 changed files with 34 additions and 0 deletions

View File

@@ -8,6 +8,7 @@ import System.Environment
import Day1
import Day2
import Day3
import Day4
-- TODO Better way?
load :: [String] -> IO ()
@@ -15,6 +16,7 @@ load [] = putStrLn "Usage: script [day]"
load ("1":_) = day1
load ("2":_) = day2
load ("3":_) = day3
load ("4":_) = day4
load _ = putStrLn "Unavailable date"
dayPicker :: IO ()