Changeset 7364 for branches/2016

Timestamp:

2016-11-29T11:31:53+01:00 (7 years ago)

Author:

clem

Message:

make the option Cd-Lupkes restartable

File:

• branches/2016/dev_CNRS_AGRIF_2016/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_lim.F90 (modified) (2 diffs)

branches/2016/dev_CNRS_AGRIF_2016/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_lim.F90

@@ -150 +150 @@
          ! utau_ice, vtau_ice : surface ice stress (U- & V-points)   [N/m2]
          !-----------------------------------------------------------------
+                                      CALL sbc_lim_bef         ! Store previous ice values
          SELECT CASE( kblk )
             CASE( jp_ana     )   ;    CALL ana_ice_tau                              ! analytic formulation            
@@ -170 +171 @@
          numit = numit + nn_fsbc                  ! Ice model time step
          !                                                   
-                                      CALL sbc_lim_bef         ! Store previous ice values
                                       CALL sbc_lim_diag0       ! set diag of mass, heat and salt fluxes to 0
                                       CALL lim_rst_opn( kt )   ! Open Ice restart file