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