Badly formed error message in modal_aer_opt.F90 #7877
Description
This error condition around line 1172:
! if (nerr_dopaer >= nerrmax_dopaer) then
if (dopaer(i) < -1.e-10_r8) then
write(iulog,*) '*** halting in '//subname//' after nerr_dopaer =', nerr_dopaer
call endrun('exit from '//subname)
end if
Has 2 issues: The error condition changed but not the message.
the message needs to have the word ERROR in it. Not "halting".
Around line 1579 there's a similar error condition
if (nerr_dopaer >= nerrmax_dopaer .or. dopaer(i) < -1.e-10_r8) then
write(iulog,*) '*** halting in '//subname//' after nerr_dopaer =', nerr_dopaer
call endrun()
end if
Again, it should have the word "ERROR" and the message doesn't match the condition.