From 13c4d3ccddce0c991d3c2f989554022e45e62701 Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Fri, 4 Sep 2015 12:32:26 +0700 Subject: [PATCH] Write number of particles/batches in summary file for fixed source --- src/hdf5_summary.F90 | 21 ++++++++++----------- 1 file changed, 10 insertions(+), 11 deletions(-) diff --git a/src/hdf5_summary.F90 b/src/hdf5_summary.F90 index e8f566c434..3b28e885d6 100644 --- a/src/hdf5_summary.F90 +++ b/src/hdf5_summary.F90 @@ -33,23 +33,22 @@ contains ! Write header information call hdf5_write_header(file_id) - ! Write eigenvalue information + ! Write number of particles + call write_dataset(file_id, "n_particles", n_particles) + call write_dataset(file_id, "n_batches", n_batches) + call write_attribute_string(file_id, "n_particles", & + "description", "Number of particles per generation") + call write_attribute_string(file_id, "n_batches", & + "description", "Total number of batches") + + ! Write eigenvalue information if (run_mode == MODE_EIGENVALUE) then - - ! Write number of particles - call write_dataset(file_id, "n_particles", n_particles) - - ! Use H5LT interface to write n_batches, n_inactive, and n_active - call write_dataset(file_id, "n_batches", n_batches) + ! write number of inactive/active batches and generations/batch call write_dataset(file_id, "n_inactive", n_inactive) call write_dataset(file_id, "n_active", n_active) call write_dataset(file_id, "gen_per_batch", gen_per_batch) ! Add description of each variable - call write_attribute_string(file_id, "n_particles", & - "description", "Number of particles per generation") - call write_attribute_string(file_id, "n_batches", & - "description", "Total number of batches") call write_attribute_string(file_id, "n_inactive", & "description", "Number of inactive batches") call write_attribute_string(file_id, "n_active", &