a simple calculator with haskell