Changeset 1661 for XIOS/dev/dev_trunk_omp/src/policy.cpp

Timestamp:

05/15/19 17:19:08 (5 years ago)

Author:

yushan

Message:

MARK: branch merged with trunk @1660. Test (test_complete, test_remap) on ADA with IntelMPI and _usingEP/_usingMPI as switch.

File:

• XIOS/dev/dev_trunk_omp/src/policy.cpp (modified) (1 diff)

XIOS/dev/dev_trunk_omp/src/policy.cpp

@@ -16 +16 @@
 namespace xios
 {
-///*!
-//  Calculate MPI communicator for each level of hierarchy.
-//  \param[in] mpiCommRoot MPI communicator of the level 0 (usually communicator of all clients)
-//  \param[in] levels number of level in hierarchy
-//*/
-//void DivideCommByTwo::computeMPICommLevel(const MPI_Comm& mpiCommRoot, int levels)
-//{
-//  int nbProc;
-//  MPI_Comm_size(mpiCommRoot,&nbProc);
-//  if (levels > nbProc) levels = std::log10(nbProc) * 3.3219; // log2(x) = log2(10) * log10(x); stupid C++98
-//  else if (1 > levels) levels = 1;
-//
-//  commLevel_.push_back(mpiCommRoot);
-//  divideMPICommLevel(mpiCommRoot, levels);
-//}
-//
-///*!
-//  Divide each MPI communicator into sub-communicator. Recursive function
-//  \param [in] mpiCommLevel MPI communicator of current level
-//  \param [in] level current level
-//*/
-//void DivideCommByTwo::divideMPICommLevel(const MPI_Comm& mpiCommLevel, int level)
-//{
-//  int clientRank;
-//  MPI_Comm_rank(mpiCommLevel,&clientRank);
-//
-//   --level;
-//  if (0 < level)
-//  {
-//   int color = clientRank % 2;
-//   commLevel_.push_back(MPI_Comm());
-//   MPI_Comm_split(mpiCommLevel, color, 0, &(commLevel_.back()));
-//   divideMPICommLevel(commLevel_.back(), level);
-//  }
-//}
+
 
 DivideAdaptiveComm::DivideAdaptiveComm(const MPI_Comm& mpiComm)