RPN calc in haskell