We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent fa3646e commit 08a828bCopy full SHA for 08a828b
setparm.f90
@@ -311,9 +311,12 @@ subroutine setparm
311
write(*,*) '********************************************************'
312
write(*,*) ' Unsupported setup in large-scale vertical advection'
313
write(*,*) ' Please confirm subsidence 1d or 3d fields.'
314
+ write(*,*) ' Setting both doadvinic and doadvbg to false.'
315
316
end if
- call task_abort()
317
+ !call task_abort()
318
+ doadvinic = .false.
319
+ doadvbg = .false.
320
321
else if (doadvinic.and.doadvbg) then
322
if (masterproc) then
0 commit comments