Support the official NUOPC Verbosity strings "off", "low", "high", "m…

…ax" for compliance.
climbfuji · Aug 30, 2019 · c3ec2c4 · c3ec2c4
1 parent 71a4c82
commit c3ec2c4
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/module_MEDIATOR.F90 b/src/module_MEDIATOR.F90
@@ -922,7 +922,8 @@ subroutine InitializeP0(gcomp, importState, exportState, clock, rc)
     if (ESMF_LogFoundError(rcToCheck=rc, msg=ESMF_LOGERR_PASSTHRU, &
       line=__LINE__, file=__FILE__)) return  ! bail out
     dbug_flag = ESMF_UtilString2Int(value, &
-      specialStringList=(/"min","max"/), specialValueList=(/0,255/), rc=rc)
+      specialStringList=(/"off","low","high","max"/), &
+      specialValueList=(/0,1,100,255/), rc=rc)
     if (ESMF_LogFoundError(rcToCheck=rc, msg=ESMF_LOGERR_PASSTHRU, &
       line=__LINE__, file=__FILE__)) return  ! bail out
     write(msgString,'(A,i6)') trim(subname)//' dbug_flag = ',dbug_flag