OilfieldToolsNet/LBPM
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fixed a really dumb bug in MPI reduction of MPI component averages

Browse Source
This commit is contained in:
James E McClure 2015-08-18 10:33:02 -04:00
parent 033f8bddb3
commit 3b5fb7793c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
common/TwoPhase.h
View File

@ -808,7 +808,7 @@ void TwoPhase::ComponentAverages(){
MPI_DOUBLE,MPI_SUM,MPI_COMM_WORLD);
for (int b=0; b<NumberComponents_NWP; b++){
for (int idx=0; idx<BLOB_AVG_COUNT; idx++) ComponentAverages_NWP(b,idx)=RecvBuffer(b,idx);
for (int idx=0; idx<BLOB_AVG_COUNT; idx++) ComponentAverages_NWP(idx,b)=RecvBuffer(idx,b);
}
for (int b=0; b<NumberComponents_NWP; b++){
if (ComponentAverages_NWP(VOL,b) > 0.0){