diff --git a/src/ace.f90 b/src/ace.f90 index 4bbaab0b1..8f42f9045 100644 --- a/src/ace.f90 +++ b/src/ace.f90 @@ -690,6 +690,7 @@ contains IDAT = XSS(LDIS + LOCC + 1) NR = XSS(LDIS + LOCC + 2) rxn % edist % law = LAW + rxn % edist % n_interp = NR ! allocate space for ENDF interpolation parameters if (NR > 0) then