crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-27 21:55:41 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Change MPI_REAL8 -> MPI_DOUBLE in state_point.cpp (Thanks to Cliff Dugal, CNL)

Browse source
This commit is contained in:
Paul Romano 2019-08-21 08:39:38 -05:00
parent a0bff1194f
commit b767b2adb0
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/state_point.cpp
View file

@ -742,7 +742,7 @@ void write_tally_results_nr(hid_t file_id)
} else {
// Receive buffer not significant at other processors
#ifdef OPENMC_MPI
MPI_Reduce(values.data(), nullptr, values.size(), MPI_REAL8, MPI_SUM,
MPI_Reduce(values.data(), nullptr, values.size(), MPI_DOUBLE, MPI_SUM,
0, mpi::intracomm);
#endif
}