Index: /issm/trunk-jpl/src/c/classes/FemModel.cpp
===================================================================
--- /issm/trunk-jpl/src/c/classes/FemModel.cpp	(revision 17139)
+++ /issm/trunk-jpl/src/c/classes/FemModel.cpp	(revision 17140)
@@ -563,5 +563,5 @@
 
 						/*Gather from all cpus*/
-						ISSM_MPI_Allreduce((void*)values,(void*)allvalues,nbe*nodesperelement,MPI_DOUBLE,MPI_SUM,MPI_COMM_WORLD);
+						ISSM_MPI_Allreduce((void*)values,(void*)allvalues,nbe*nodesperelement,ISSM_MPI_PDOUBLE,ISSM_MPI_SUM,IssmComm::GetComm());
 						xDelete<IssmDouble>(values);