diff --git a/src/output.F90 b/src/output.F90 index becb61c65e..6c2c5cdbe7 100644 --- a/src/output.F90 +++ b/src/output.F90 @@ -1319,7 +1319,7 @@ contains if (confidence_intervals) then ! Calculate t-value for confidence intervals alpha = ONE - CONFIDENCE_LEVEL - t_value = t_percentile(ONE - alpha/TWO, global_tallies(K_ANALOG) % n_realizations - 1) + t_value = t_percentile(ONE - alpha/TWO, n_realizations - 1) ! Adjust sum_sq global_tallies(:) % sum_sq = t_value * global_tallies(:) % sum_sq diff --git a/src/tally_header.F90 b/src/tally_header.F90 index 29e21c9d91..6948d943d1 100644 --- a/src/tally_header.F90 +++ b/src/tally_header.F90 @@ -40,7 +40,6 @@ module tally_header type TallyScore integer :: n_events = 0 - integer :: n_realizations = 0 real(8) :: value = 0. real(8) :: sum = 0. real(8) :: sum_sq = 0.