white space changes

NOAA-GFDL · Sep 1, 2020 · bfbd95a · bfbd95a
1 parent 6164f63
commit bfbd95a
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/config_src/nuopc_driver/mom_cap.F90 b/config_src/nuopc_driver/mom_cap.F90
@@ -272,6 +272,7 @@ subroutine InitializeP0(gcomp, importState, exportState, clock, rc)
   if (isPresent .and. isSet) grid_attach_area=(trim(value)=="true")
   write(logmsg,*) grid_attach_area
   call ESMF_LogWrite('MOM_cap:GridAttachArea = '//trim(logmsg), ESMF_LOGMSG_INFO)
+
   call NUOPC_CompAttributeGet(gcomp, name='dbug_flag', value=value, isPresent=isPresent, isSet=isSet, rc=rc)
   if (ChkErr(rc,__LINE__,u_FILE_u)) return
   if (isPresent .and. isSet) then
@@ -528,7 +529,6 @@ subroutine InitializeAdvertise(gcomp, importState, exportState, clock, rc)
 
   restartfile = ""
   if (runtype == "initial") then
-
     if (cesm_coupled) then
       restartfile = "n"
     else
@@ -1444,6 +1444,7 @@ subroutine ModelAdvance(gcomp, rc)
        endif
       enddo
      endif
+
      if (dbug > 0) then
        call state_diagnose(importState,subname//':IS ',rc=rc)
        if (ChkErr(rc,__LINE__,u_FILE_u)) return

diff --git a/config_src/nuopc_driver/mom_cap_methods.F90 b/config_src/nuopc_driver/mom_cap_methods.F90
@@ -764,6 +764,7 @@ subroutine State_SetExport(state, fldname, isc, iec, jsc, jec, input, ocean_grid
   endif
 
 end subroutine State_SetExport
+
 subroutine state_diagnose(State, string, rc)
 
   ! ----------------------------------------------
-Original file line number
+Diff line change
@@ Expand Up @@
       endif
     end subroutine State_SetExport
     subroutine state_diagnose(State, string, rc)
       ! ----------------------------------------------
@@ Expand Down @@