Simple minesweeper game in haskell