An ultimate tic-tac-toe game written in Haskell