day7: beautify ?

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 ))