crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-27 21:55:41 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Fixed n_groups in count_fission_sites.

Browse source
This commit is contained in:
Paul Romano 2012-03-29 17:05:43 -04:00
parent eab4610851
commit c663e27b1e
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/mesh.F90
View file

@ -189,7 +189,7 @@ contains
! Determine number of energies in group structure
if (present(energies)) then
n_groups = size(energies)
n_groups = size(energies) - 1
else
n_groups = 1
end if