A program that tests properties of disk on a percolated grid