This commit is contained in:
Paul Romano 2018-11-12 14:06:25 -06:00
parent 8280946b7c
commit f4e4304b13

View file

@ -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.