module Part1 where import Commons getSummary :: [Pattern] -> [Int] getSummary = map (\ p -> getVerticalReflection 1 0 p + 100 * getHorizontalReflection 1 0 p)