OilfieldToolsNet/opm-simulators
4
0
Fork 0
mirror of https://github.com/OPM/opm-simulators.git synced 2026-09-05 04:40:19 -05:00
Code Issues Packages Projects Releases Wiki Activity

barrier before and after MPI_Broadcast in non-production runs.

Browse Source 
This helps with debugging as for some OpenMPI versions communication
might interfere with other communications if there are bugs.
This commit is contained in:
Markus Blatt
2020-12-07 16:32:33 +01:00
parent 901327ac54
commit 6f4fa114c1
1 changed files with 10 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
opm/simulators/wells/ParallelWellInfo.hpp
+10 -1
View File
@@ -136,8 +136,17 @@ public:
template<class T> template<class T>
T broadcastFirstPerforationValue(const T& t) const T broadcastFirstPerforationValue(const T& t) const
{ {
T res=t; T res = t;
#ifndef NDEBUG
assert(rankWithFirstPerf_ >= 0 && rankWithFirstPerf_ < comm_->size());
// At least on some OpenMPI version this might broadcast might interfere
// with other communication if there are bugs
comm_->barrier();
#endif
comm_->broadcast(&res, 1, rankWithFirstPerf_); comm_->broadcast(&res, 1, rankWithFirstPerf_);
#ifndef NDEBUG
comm_->barrier();
#endif
return res; return res;
} }