Move write_tallies to C++

This commit is contained in:
Sterling Harper 2019-02-11 13:58:12 -05:00
parent ddaed7311b
commit 8bb0fa7791
6 changed files with 366 additions and 373 deletions

View file

@ -144,11 +144,6 @@ int openmc_simulation_finalize()
simulation::time_active.stop();
simulation::time_finalize.start();
#pragma omp parallel
{
simulation::filter_matches.clear();
}
// Deallocate Fortran variables, set tallies to inactive
for (auto& mat : model::materials) {
mat->mat_nuclide_index_.clear();
@ -165,6 +160,11 @@ int openmc_simulation_finalize()
// Write tally results to tallies.out
if (settings::output_tallies && mpi::master) write_tallies();
#pragma omp parallel
{
simulation::filter_matches.clear();
}
// Deactivate all tallies
for (int i = 1; i <= n_tallies; ++i) {
openmc_tally_set_active(i, false);