Author Anonymous
 Title (undefined)
 Created at Sun Apr 19 20:19:39 UTC 2015
import Prelude hiding (max)

max :: Int -> Int -> Int
max x y
 | x > y     = x
 | otherwise = y

maxThree :: Int -> Int -> Int -> Int
maxThree x y z = max (max x y) z

maxFour :: Int -> Int -> Int -> Int -> Int
maxFour x y z k = max (maxThree x y z) k
Result
Not in scope: ‛example’
Perhaps you meant ‛sample’ (imported from Diagrams.Prelude)