Tic Tac Toe written in Haskell