diff --git a/src/cmfd_input.F90 b/src/cmfd_input.F90 index 74e74690d3..da7578af12 100644 --- a/src/cmfd_input.F90 +++ b/src/cmfd_input.F90 @@ -210,6 +210,9 @@ contains ! point t to tally variable t => tallies(i) + ! set reset property + if (reset_) t % reset = .true. + ! allocate arrays for number of bins and stride in scores array allocate(t % n_filter_bins(N_FILTER_TYPES)) allocate(t % stride(N_FILTER_TYPES)) diff --git a/src/xml-fortran/templates/cmfd_t.xml b/src/xml-fortran/templates/cmfd_t.xml index f99a8c4d14..7a23a12da7 100644 --- a/src/xml-fortran/templates/cmfd_t.xml +++ b/src/xml-fortran/templates/cmfd_t.xml @@ -16,5 +16,6 @@ +