Changeset 13590 for issm/trunk-jpl/src/c/modules/ThicknessAcrossGradientx/ThicknessAcrossGradientx.cpp
- Timestamp:
- 10/10/12 20:56:09 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/modules/ThicknessAcrossGradientx/ThicknessAcrossGradientx.cpp
r13073 r13590 28 28 /*Sum all J from all cpus of the cluster:*/ 29 29 #ifdef _HAVE_MPI_ 30 MPI_Reduce (&J,&J_sum,1,MPI_DOUBLE,MPI_SUM,0, MPI_COMM_WORLD);31 MPI_Bcast(&J_sum,1,MPI_DOUBLE,0, MPI_COMM_WORLD);30 MPI_Reduce (&J,&J_sum,1,MPI_DOUBLE,MPI_SUM,0,IssmComm::GetComm() ); 31 MPI_Bcast(&J_sum,1,MPI_DOUBLE,0,IssmComm::GetComm()); 32 32 J=J_sum; 33 33 #endif
Note:
See TracChangeset
for help on using the changeset viewer.