Merge branch 'sealvlponds' into sealevelponds. Fix restart issue.

ESCOMP · Jan 6, 2025 · bc8fa22 · bc8fa22
2 parents 0ef2aa0 + a700cf9
commit bc8fa22
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/configuration/driver/icedrv_InitMod.F90 b/configuration/driver/icedrv_InitMod.F90
@@ -112,6 +112,8 @@ subroutine icedrv_initialize
       call init_restart         ! initialize restart variables
       call init_history_therm   ! initialize thermo history variables
 
+      if (tr_pond_sealvl) call icepack_init_sealvlpnd   ! sealvl ponds
+
       if (restart) &
          call init_shortwave    ! initialize radiative transfer
 
@@ -157,8 +159,6 @@ subroutine icedrv_initialize
       if (tr_aero .or. tr_zaero)  call faero_default    ! default values
       if (skl_bgc .or. z_tracers) call get_forcing_bgc  ! biogeochemistry
 
-      if (tr_pond_sealvl) call icepack_init_sealvlpnd   ! sealvl ponds
-
       if (.not. restart) &
          call init_shortwave    ! initialize radiative transfer using current swdn