Changeset 2333 for XIOS/dev/dev_ym/XIOS_COUPLING/src/client.cpp
- Timestamp:
- 06/13/22 17:04:55 (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/dev/dev_ym/XIOS_COUPLING/src/client.cpp
r2332 r2333 115 115 { 116 116 MPI_Comm_dup(localComm,&clientComm) ; 117 MPI_Comm_dup(localComm,&intraComm_) ; 118 119 if (CXios::usingServer) 120 { 121 MPI_Comm_rank(intraComm_,&rank_) ; 122 } 123 117 124 } 118 125 … … 244 251 245 252 } 246 247 253 MPI_Bcast(&error,1,MPI_INT,0,clientComm) ; 248 254 … … 263 269 MPI_Intercomm_merge(interComm,high, &intraComm ) ; 264 270 high=false ; 271 if (i==pos) { 272 interComm_=interComm ; 273 } 265 274 } 266 275 xiosGlobalComm=intraComm ; … … 308 317 high=false ; 309 318 } 319 if (i==pos) { 320 interComm_=interComm ; // NOT TESTED ! 321 } 310 322 } 311 323 xiosGlobalComm=intraComm ; … … 459 471 if (!oasisEnddef) ERROR("void CClient::callOasisEnddef(void)", <<"Function xios_oasis_enddef called but variable <call_oasis_enddef> is set to false."<<endl 460 472 <<"Variable <call_oasis_enddef> must be set to true"<<endl) ; 461 if ( CXios::isServer)473 if (!CXios::isClient) // != isServer (change recently ) 462 474 // Attached mode 463 475 {
Note: See TracChangeset
for help on using the changeset viewer.