diff --git a/day7.hs b/day7.hs index 65e81b0..1d920b4 100644 --- a/day7.hs +++ b/day7.hs @@ -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 ))