use nexttime rather than currtime to trigger budget output

ESCOMP · May 9, 2021 · ea047bb · ea047bb
1 parent 13e347a
commit ea047bb
Show file tree

Hide file tree

Showing 2 changed files with 133 additions and 122 deletions.
diff --git a/mediator/med.F90 b/mediator/med.F90
@@ -2435,7 +2435,7 @@ subroutine DataInitialize(gcomp, rc)
        !---------------------------------------
        call med_diag_init(gcomp, rc)
        if (ChkErr(rc,__LINE__,u_FILE_u)) return
-       call med_diag_zero(gcomp, mode='all', rc=rc)
+       call med_diag_zero('all', rc=rc)
        if (ChkErr(rc,__LINE__,u_FILE_u)) return
 
        !---------------------------------------