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

Merge pull request #1126 from openmc-dev/temperature_interpolation

Browse source 
Hotfix: incomplete initialization of nu-fission
This commit is contained in:
Paul Romano 2018-11-26 21:26:04 -06:00 • committed by GitHub
commit bb9a767945
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/nuclide_header.F90
View file

@ -759,6 +759,7 @@ contains
! Calculate nu-fission cross section
do t = 1, n_temperature
if (this % fissionable) then
n_grid = size(this % grid(t) % energy)
do i = 1, n_grid
this % xs(t) % value(XS_NU_FISSION,i) = &
this % nu(this % grid(t) % energy(i), EMISSION_TOTAL) * &