Minesweeper in Haskell