Updating tallies.xml

This commit is contained in:
Jose Salcedo Perez 2018-05-28 13:24:30 +00:00
parent 0af6b4bee0
commit 6a53e61c96

View file

@ -1075,17 +1075,17 @@ contains
! Determine index in NuclideMicroXS % reaction array
select case (score_bin)
case (N_2N)
m = 1
case (N_3N)
m = 2
case (N_4N)
m = 3
case (N_GAMMA)
m = 4
case (N_P)
case (N_3N)
m = 5
case (N_A)
case (N_4N)
m = 6
case (N_GAMMA)
m = 1
case (N_P)
m = 2
case (N_A)
m = 3
end select
if (i_nuclide > 0) then