[hs] Make cli fancier

This commit is contained in:
Joscha 2020-12-06 11:06:51 +00:00
parent 75fa851ff5
commit 55bc09948b
9 changed files with 56 additions and 36 deletions

View file

@ -37,4 +37,4 @@ solver values = do
putStrLn $ show y1 ++ " * " ++ show y2 ++ " * " ++ show y3 ++ " = " ++ show (y1 * y2 * y3)
day :: Day
day = dayParse "2020_01" parser solver
day = dayParse parser solver