Changeset 1231 for XIOS/dev/XIOS_DEV_CMIP6/src
- Timestamp:
- 07/28/17 14:28:45 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/dev/XIOS_DEV_CMIP6/src/client.cpp
r1180 r1231 149 149 { 150 150 MPI_Status status ; 151 MPI_Comm_rank(intraComm,&rank ) ;151 MPI_Comm_rank(intraComm,&rank_) ; 152 152 153 153 oasis_get_intercomm(interComm,CXios::xiosCodeId) ; 154 if (rank ==0) MPI_Recv(&serverLeader,1, MPI_INT, 0, 0, interComm, &status) ;154 if (rank_==0) MPI_Recv(&serverLeader,1, MPI_INT, 0, 0, interComm, &status) ; 155 155 MPI_Bcast(&serverLeader,1,MPI_INT,0,intraComm) ; 156 156
Note: See TracChangeset
for help on using the changeset viewer.