day7: beautify ?

This commit is contained in:
Arranun 2019-12-08 00:44:42 +01:00
parent db092a272a
commit 6cb104199c

View File

@ -5,7 +5,6 @@ import Data.Either as Either
main = do
software <- getList <$> getContents
--let output = operation state state 0 input []
let combs = getComb [5,6,7,8,9]
--mapM putStrLn(map show combs)
putStrLn(show $ List.maximum ( map (\x-> part2 ( prepareAmps x software) 0 ) combs ))