Using Modulus Operator In Haskell