ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/OpenMD/trunk/src/math/ParallelRandNumGen.cpp
(Generate patch)

Comparing trunk/src/math/ParallelRandNumGen.cpp (file contents):
Revision 1793 by gezelter, Fri Aug 31 21:16:10 2012 UTC vs.
Revision 1796 by gezelter, Mon Sep 10 18:38:44 2012 UTC

# Line 55 | Line 55 | namespace OpenMD {
55  
56   #ifdef IS_MPI
57      const int masterNode = 0;
58 <    MPI_Bcast(&seed, 1, MPI_UNSIGNED_LONG, masterNode, MPI_COMM_WORLD);
58 >    MPI::COMM_WORLD.Bcast(&seed, 1, MPI::UNSIGNED_LONG, masterNode);
59   #endif
60  
61      if (seed != oneSeed) {
# Line 67 | Line 67 | namespace OpenMD {
67  
68      int nProcessors;
69   #ifdef IS_MPI
70 <    MPI_Comm_size( MPI_COMM_WORLD, &nProcessors);
71 <    MPI_Comm_rank( MPI_COMM_WORLD, &myRank_);
70 >    nProcessors = MPI::COMM_WORLD.Get_size();
71 >    myRank_ = MPI::COMM_WORLD.Get_rank();
72   #else
73      nProcessors = 1;
74      myRank_ = 0;
# Line 88 | Line 88 | namespace OpenMD {
88      std::vector<uint32> bigSeed;
89      int nProcessors;
90   #ifdef IS_MPI
91 <    const int masterNode = 0;
92 <    MPI_Comm_size( MPI_COMM_WORLD, &nProcessors);
93 <    MPI_Comm_rank( MPI_COMM_WORLD, &myRank_);
91 >    nProcessors = MPI::COMM_WORLD.Get_size();
92 >    myRank_ = MPI::COMM_WORLD.Get_rank();
93   #else
94      nProcessors = 1;
95      myRank_ = 0;
# Line 107 | Line 106 | namespace OpenMD {
106      unsigned long seed = oneSeed;
107   #ifdef IS_MPI
108      const int masterNode = 0;
109 <    MPI_Bcast(&seed, 1, MPI_UNSIGNED_LONG, masterNode, MPI_COMM_WORLD);
109 >    MPI::COMM_WORLD.Bcast(&seed, 1, MPI::UNSIGNED_LONG, masterNode);
110   #endif
111      if (seed != oneSeed) {
112        sprintf(painCave.errMsg,
# Line 136 | Line 135 | namespace OpenMD {
135        size = bigSeed.size();
136  
137   #ifdef IS_MPI
138 <      MPI_Bcast(&size, 1, MPI_INT, masterNode, MPI_COMM_WORLD);        
139 <      MPI_Bcast(&bigSeed[0], size, MPI_UNSIGNED_LONG, masterNode, MPI_COMM_WORLD);
138 >      MPI::COMM_WORLD.Bcast(&size, 1, MPI::INT, masterNode);
139 >      MPI::COMM_WORLD.Bcast(&bigSeed[0], size, MPI::UNSIGNED_LONG, masterNode);
140      }else {
141 <      MPI_Bcast(&size, 1, MPI_INT, masterNode, MPI_COMM_WORLD);        
141 >      MPI::COMM_WORLD.Bcast(&size, 1, MPI::INT, masterNode);
142        bigSeed.resize(size);
143 <      MPI_Bcast(&bigSeed[0], size, MPI_UNSIGNED_LONG, masterNode, MPI_COMM_WORLD);
143 >      MPI::COMM_WORLD.Bcast(&bigSeed[0], size, MPI::UNSIGNED_LONG, masterNode);
144      }
145   #endif
146      

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines