diff --git a/src/endf.F90 b/src/endf.F90 index 0d458a0ab6..58b5549972 100644 --- a/src/endf.F90 +++ b/src/endf.F90 @@ -257,7 +257,7 @@ contains else retval = (MT >= MISC .and. MT /= 27) end if - elseif (MT < 200) then + elseif (MT <= 200) then retval = (.not. is_disappearance(MT)) else retval = .false.