Minesweeper writtin in Haskell