Haskell Function Definition C