From c6a10fd971b98a38b3cfb3bd2879302d5d38dbb1 Mon Sep 17 00:00:00 2001 From: "denise.worthen" Date: Wed, 24 Mar 2021 16:43:35 -0600 Subject: [PATCH] clean up comment --- mediator/med.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mediator/med.F90 b/mediator/med.F90 index fa157fe4..74073e86 100644 --- a/mediator/med.F90 +++ b/mediator/med.F90 @@ -627,7 +627,7 @@ subroutine InitializeP0(gcomp, importState, exportState, clock, rc) write(msgString,'(A,i6)') trim(subname)//': Mediator dbug_flag is ',dbug_flag call ESMF_LogWrite(trim(msgString), ESMF_LOGMSG_INFO) - ! Obtain dststatus_print setting if present; otherwise use default value in med_constants + ! Obtain dststatus_print setting if present call NUOPC_CompAttributeGet(gcomp, name='dststatus_print', value=cvalue, isPresent=isPresent, isSet=isSet, rc=rc) if (ChkErr(rc,__LINE__,u_FILE_u)) return if (isPresent .and. isSet) dststatus_print=(trim(cvalue)=="true")