Index: ../trunk-jpl/src/c/toolkits/petsc/patches/MatMultPatch.cpp
===================================================================
--- ../trunk-jpl/src/c/toolkits/petsc/patches/MatMultPatch.cpp	(revision 13602)
+++ ../trunk-jpl/src/c/toolkits/petsc/patches/MatMultPatch.cpp	(revision 13603)
@@ -49,7 +49,10 @@
 	int lower_row,upper_row,range;
 	int result=1;
 	int sumresult;
-	extern int num_procs;
+	int num_procs2;
+	
+	/*recover num_procs2:*/
+	MPI_Comm_size(comm,&num_procs2);
 
 	MatGetLocalSize(A,&local_m,&local_n);;
 	VecGetLocalSize(x,&range);;
@@ -59,7 +62,7 @@
 	/*synchronize result: */
 	MPI_Reduce (&result,&sumresult,1,MPI_INT,MPI_SUM,0,comm );
 	MPI_Bcast(&sumresult,1,MPI_INT,0,comm);                
-	if (sumresult!=num_procs){
+	if (sumresult!=num_procs2){
 		result=0;
 	}
 	else{