Rock Paper Scissors game in Haskell