Haskell Function Overloading Example