Removed unused variable in fission module.

This commit is contained in:
Paul Romano 2011-09-15 22:32:12 -04:00
parent 7d8610133b
commit 375af333db

View file

@ -60,7 +60,6 @@ contains
integer :: i ! loop index
integer :: NC ! number of polynomial coefficients
real(8) :: c ! polynomial coefficient
character(MAX_LINE_LEN) :: msg ! error message
if (nuc % nu_p_type == NU_NONE) then
! since no prompt or delayed data is present, this means all neutron