From e7d2527230dc7b64ca78dee1e891a56788bc0577 Mon Sep 17 00:00:00 2001
From: Denise Worthen <denise.worthen@noaa.gov>
Date: Sun, 7 Apr 2024 09:49:30 -0400
Subject: [PATCH] fix indenting

---
 cicecore/drivers/nuopc/cmeps/ice_import_export.F90 | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/cicecore/drivers/nuopc/cmeps/ice_import_export.F90 b/cicecore/drivers/nuopc/cmeps/ice_import_export.F90
index 47ec5db93..47abb0373 100644
--- a/cicecore/drivers/nuopc/cmeps/ice_import_export.F90
+++ b/cicecore/drivers/nuopc/cmeps/ice_import_export.F90
@@ -1774,9 +1774,9 @@ subroutine state_setexport_4d(state, fldname, input, index, lmask, ifrac, ungrid
              end do
           else
              do j = jlo, jhi
-             do i = ilo, ihi
-                n = n+1
-                dataPtr1d(n) = input(i,j,index,iblk)
+                do i = ilo, ihi
+                   n = n+1
+                   dataPtr1d(n) = input(i,j,index,iblk)
                 end do
              end do
           end if