[hs] Solve 2019_04

This commit is contained in:
Joscha 2020-11-03 22:56:31 +00:00
parent 4044d6aabf
commit ab7c7ce0bf
2 changed files with 41 additions and 0 deletions

View file

@ -5,6 +5,7 @@ import Options.Applicative
import Aoc.Y2019.A01
import Aoc.Y2019.A02
import Aoc.Y2019.A03
import Aoc.Y2019.A04
data Settings = Settings
{ function :: FilePath -> IO ()
@ -16,6 +17,7 @@ solutions = subparser $ mconcat $ map (\(name, func) -> command name (info (pure
[ ("2019_01", solve201901)
, ("2019_02", solve201902)
, ("2019_03", solve201903)
, ("2019_04", solve201904)
]
parser :: Parser Settings