******** fig6.14 **********

	for(i=n/2; i>0; i-- )
		percolate_down( i );