Simple minesweeper game in prolog