Rock Scissors Paper game, written in Haskell