| 161 |  | #ifndef IS_MPI | 
| 162 |  | totMassUnconsMols_ = totMassUnconsMols_local; | 
| 163 |  | #else | 
| 164 | < | MPI::COMM_WORLD.Allreduce(&totMassUnconsMols_local, &totMassUnconsMols_, 1, | 
| 165 | < | MPI::REALTYPE, MPI::SUM); | 
| 164 | > | MPI_Allreduce(&totMassUnconsMols_local, &totMassUnconsMols_, 1, | 
| 165 | > | MPI_REALTYPE, MPI_SUM, MPI_COMM_WORLD); | 
| 166 |  | #endif | 
| 167 |  |  | 
| 168 |  | // creat zconsWriter | 
| 326 |  | #ifndef IS_MPI | 
| 327 |  | pzMovingMols = pzMovingMols_local; | 
| 328 |  | #else | 
| 329 | < | MPI::COMM_WORLD.Allreduce(&pzMovingMols_local, &pzMovingMols, 1, | 
| 330 | < | MPI::REALTYPE, MPI::SUM); | 
| 329 | > | MPI_Allreduce(&pzMovingMols_local, &pzMovingMols, 1, | 
| 330 | > | MPI_REALTYPE, MPI_SUM, MPI_COMM_WORLD); | 
| 331 |  | #endif | 
| 332 |  |  | 
| 333 |  | RealType vzMovingMols = pzMovingMols / (totMassMovingZMols_ + totMassUnconsMols_); | 
| 397 |  |  | 
| 398 |  | //calculate total z-constraint force | 
| 399 |  | #ifdef IS_MPI | 
| 400 | < | MPI::COMM_WORLD.Allreduce(&totalFZ_local, &totalFZ, 1, | 
| 401 | < | MPI::REALTYPE, MPI::SUM); | 
| 400 | > | MPI_Allreduce(&totalFZ_local, &totalFZ, 1, | 
| 401 | > | MPI_REALTYPE, MPI_SUM, MPI_COMM_WORLD); | 
| 402 |  | #else | 
| 403 |  | totalFZ = totalFZ_local; | 
| 404 |  | #endif | 
| 481 |  | #ifndef IS_MPI | 
| 482 |  | totalFZ = totalFZ_local; | 
| 483 |  | #else | 
| 484 | < | MPI::COMM_WORLD.Allreduce(&totalFZ_local, &totalFZ, 1, MPI::REALTYPE, | 
| 485 | < | MPI::SUM); | 
| 484 | > | MPI_Allreduce(&totalFZ_local, &totalFZ, 1, MPI_REALTYPE, | 
| 485 | > | MPI_SUM, MPI_COMM_WORLD); | 
| 486 |  | #endif | 
| 487 |  |  | 
| 488 |  | //modify the forces of unconstrained molecules | 
| 554 |  | #ifndef IS_MPI | 
| 555 |  | changed = changed_local; | 
| 556 |  | #else | 
| 557 | < | MPI::COMM_WORLD.Allreduce(&changed_local, &changed, 1, MPI::INT, MPI::SUM); | 
| 557 | > | MPI_Allreduce(&changed_local, &changed, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD); | 
| 558 |  | #endif | 
| 559 |  |  | 
| 560 |  | return (changed > 0); | 
| 567 |  | #ifndef IS_MPI | 
| 568 |  | havingFixed = havingFixed_local; | 
| 569 |  | #else | 
| 570 | < | MPI::COMM_WORLD.Allreduce(&havingFixed_local, &havingFixed, 1, | 
| 571 | < | MPI::INT, MPI::SUM); | 
| 570 | > | MPI_Allreduce(&havingFixed_local, &havingFixed, 1, | 
| 571 | > | MPI_INT, MPI_SUM, MPI_COMM_WORLD); | 
| 572 |  | #endif | 
| 573 |  |  | 
| 574 |  | return havingFixed > 0; | 
| 584 |  | #ifndef IS_MPI | 
| 585 |  | havingMoving = havingMoving_local; | 
| 586 |  | #else | 
| 587 | < | MPI::COMM_WORLD.Allreduce(&havingMoving_local, &havingMoving, 1, | 
| 588 | < | MPI::INT, MPI::SUM); | 
| 587 | > | MPI_Allreduce(&havingMoving_local, &havingMoving, 1, | 
| 588 | > | MPI_INT, MPI_SUM, MPI_COMM_WORLD); | 
| 589 |  | #endif | 
| 590 |  |  | 
| 591 |  | return havingMoving > 0; | 
| 600 |  | } | 
| 601 |  |  | 
| 602 |  | #ifdef IS_MPI | 
| 603 | < | MPI::COMM_WORLD.Allreduce(&totMassMovingZMols_local, &totMassMovingZMols_, | 
| 604 | < | 1, MPI::REALTYPE, MPI::SUM); | 
| 603 | > | MPI_Allreduce(&totMassMovingZMols_local, &totMassMovingZMols_, | 
| 604 | > | 1, MPI_REALTYPE, MPI_SUM, MPI_COMM_WORLD); | 
| 605 |  | #else | 
| 606 |  | totMassMovingZMols_ = totMassMovingZMols_local; | 
| 607 |  | #endif | 
| 648 |  | zTargetPos = com[whichDirection]; | 
| 649 |  | #else | 
| 650 |  | int whicProc = info_->getMolToProc(index); | 
| 651 | < | MPI::COMM_WORLD.Bcast(&zTargetPos, 1, MPI::REALTYPE, whicProc); | 
| 651 | > | MPI_Bcast(&zTargetPos, 1, MPI_REALTYPE, whicProc, MPI_COMM_WORLD); | 
| 652 |  | #endif | 
| 653 |  | return zTargetPos; | 
| 654 |  | } |