[hs] Solve 2019_02
This commit is contained in:
parent
277c4109b8
commit
e05a194943
4 changed files with 114 additions and 0 deletions
|
|
@ -3,6 +3,7 @@ module Main where
|
|||
import Options.Applicative
|
||||
|
||||
import Aoc.Y2019.A01
|
||||
import Aoc.Y2019.A02
|
||||
|
||||
data Settings = Settings
|
||||
{ function :: FilePath -> IO ()
|
||||
|
|
@ -12,6 +13,7 @@ data Settings = Settings
|
|||
solutions :: Parser (FilePath -> IO ())
|
||||
solutions = subparser $ mconcat $ map (\(name, func) -> command name (info (pure func) mempty))
|
||||
[ ("2019_01", solve201901)
|
||||
, ("2019_02", solve201902)
|
||||
]
|
||||
|
||||
parser :: Parser Settings
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue