diff --git a/src/intercycle.F90 b/src/intercycle.F90 index 50301927ce..44c2cbf1f9 100644 --- a/src/intercycle.F90 +++ b/src/intercycle.F90 @@ -299,7 +299,7 @@ contains t => tallies(i) n = t % n_total_bins - m = t % n_macro_bins + m = t % n_score_bins n_bins = n*m allocate(tally_temp(n,m))