diff --git a/7/solution.hs b/7/solution.hs index f290227..3bfa7fd 100644 --- a/7/solution.hs +++ b/7/solution.hs @@ -42,9 +42,6 @@ getOperators2 x concat' :: (Show a, Read a) => a -> a -> a concat' x y = read ((show x) ++ (show y)) ---solve2 :: [(Int, Int)] -> Int ---solve2 x = sum $ (\(x, y) -> map (\z -> z * (count z y)) x) $ unzip x - main :: IO() main = do fileinp <- readFile "input.txt"