// module Max1 import "Prelude" myMax :: Ord a => a -> a -> a myMax = max -- // module Max2 import "Prelude" myMax :: Ord a => a -> a -> a -> a myMax a b c = max a (max b c) -- import "Prelude" import "Max1" import "Max2" main = myMax (1 :: Integer) 2 3 + myMax (3 :: Integer) 2 1 + myMax 4 2 :: Integer -- 10