Water collected between towers: Difference between revisions
Content added Content deleted
Line 904:
towerPools :: [Int] -> [(Int, Int)]
towerPools =
zipWith min . scanl1 max <*> scanr1 max >>= zipWith ((
main :: IO ()
|
Line 904:
towerPools :: [Int] -> [(Int, Int)]
towerPools =
zipWith min . scanl1 max <*> scanr1 max >>= zipWith ((
main :: IO ()
|