tidy up

ufs-community · Feb 7, 2025 · 2c6baca · 2c6baca
1 parent 3db9646
commit 2c6baca
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/sorc/ocnice_prep.fd/ocniceprep.F90 b/sorc/ocnice_prep.fd/ocniceprep.F90
@@ -275,7 +275,7 @@ program ocniceprep
      if (.not. do_ocnprep) then
         ! -----------------------------------------------------------------------------
         ! QC the source ice files after packing. Not every possible inconsistency is
-        ! but these are those known to create issues in the coupled model
+        ! checked but these are those known to create issues in the coupled model
         ! -----------------------------------------------------------------------------
 
         do n = 1,nbilin3d
@@ -311,7 +311,6 @@ program ocniceprep
            call remapRH(k,src_field=bilin3d(:,k,:), dst_field=rgb3d(:,k,:), hmask=mask3d(k,:),rc=rc)
            if (chkerr(rc,__LINE__,u_FILE_u)) call ESMF_Finalize(endflag=ESMF_END_ABORT)
         else
-
            call remapRH(src_field=bilin3d(:,k,:), dst_field=rgb3d(:,k,:),rc=rc)
            if (chkerr(rc,__LINE__,u_FILE_u)) call ESMF_Finalize(endflag=ESMF_END_ABORT)
         end if