Very simple JoKenPo game in Haskell for learning purposes