A tictactoe game in haskell