crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-28 06:05:58 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Initialized n_interp on delayed neutron energy distributions. Closes gh-30.

Browse source
This commit is contained in:
Paul Romano 2011-08-28 13:48:21 -04:00
parent 481ac9acb4
commit d0d76a9947
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/cross_section.f90
View file

@ -431,6 +431,7 @@ contains
IDAT = XSS(LDIS + LOCC + 1)
NR = XSS(LDIS + LOCC + 2)
nuc % nu_d_edist(i) % law = LAW
nuc % nu_d_edist(i) % n_interp = NR
! allocate space for ENDF interpolation parameters
if (NR > 0) then