Haskell Int Division Function