Skip to content

Commit

Permalink
Changed comment to be in accordance with the coding
Browse files Browse the repository at this point in the history
  • Loading branch information
whaeck committed Feb 6, 2018
1 parent e18cc6c commit 438620f
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/thermr.f90
Original file line number Diff line number Diff line change
Expand Up @@ -1792,8 +1792,8 @@ subroutine calcem(temp,itemp,iold,inew,ne,nex)

!--use free-gas s(alpha,beta).
200 continue
! the beta grid is fixed to 30 beta values (previously only the first 9)
! following an issue with Fe56 from ENDF/B-VIII.0b7 - a better solution
! the beta grid is fixed to 45 beta values (previously only the first 9)
! following an issue with Fe56 and H1 from ENDF/B-VIII.0 - a better solution
! would be to contruct the grid adaptatively based on emax and tempr
nalpha=1
nbeta=45
Expand Down

0 comments on commit 438620f

Please sign in to comment.