[Haskell-cafe] Simple game: a monad for each player