bool Is_In_Grid (
		preserves Integer Row,
		preserves Integer Column,
		preserves Integer Value,
		alters Sudoku_Record& s1
	)
{
	Integer i,j;
	bool FOUND = false;

	if(Row <= 2){
		if(Column <= 2){
			FOUND = Check_Quad(0,0,Value,s1);		
		}//end if
		if(Column > 2 && Column <= 5){
			FOUND = Check_Quad(0,3,Value,s1);
		}//end if
		if(Column > 5 && Column <= 8){
			FOUND = Check_Quad(0,6,Value,s1);
		}//end if
	}// end if
	
	if(Row > 2 && Row <= 5){
		if(Column <= 2){
			FOUND = Check_Quad(3,0,Value,s1);
		}//end if
		if(Column > 2 && Column <= 5){
			FOUND = Check_Quad(3,3,Value,s1);
		}//end if
		if(Column > 5 && Column <= 8){
			FOUND = Check_Quad(3,6,Value,s1);
		}//end if
	}// end if

	if(Row > 5 && Row <= 8){
		if(Column <= 2){
			FOUND = Check_Quad(6,0,Value,s1);
		}//end if
		if(Column > 2 && Column <= 5){
			FOUND = Check_Quad(6,3,Value,s1);
		}//end if
		if(Column > 5 && Column <= 8){
			FOUND = Check_Quad(6,6,Value,s1);
		}//end if
	}// end if


	return (FOUND);
} //Is_In_Grid