From a1e00aa53cb3002b98bb0776ef9a9151c1022683 Mon Sep 17 00:00:00 2001 From: Bryan Herman Date: Mon, 7 Nov 2011 09:38:57 -0500 Subject: [PATCH] had second scattering moment and changed it to first scattering moment --- src/cmfd_utils.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cmfd_utils.f90 b/src/cmfd_utils.f90 index 6c591d3437..205d95842a 100644 --- a/src/cmfd_utils.f90 +++ b/src/cmfd_utils.f90 @@ -211,7 +211,7 @@ contains ! set macro_bins t % macro_bins(1) % scalar = MACRO_FLUX t % macro_bins(2) % scalar = MACRO_TOTAL - t % macro_bins(3) % scalar = MACRO_SCATTER_2 + t % macro_bins(3) % scalar = MACRO_SCATTER_1 else if (i == 2) then