A TicTacToe implementation in Haskell