Changeset 11523 for NEMO/branches/2019/ENHANCE-02_ISF_nemo/src/OCE/TRA/traisf.F90

Timestamp:

2019-09-10T13:17:42+02:00 (5 years ago)

Author:

mathiot

Message:

ENHANCE-02_ISF: rm debug print + simplification + rm remaining old namelist parameter (ticket #2142))

File:

• NEMO/branches/2019/ENHANCE-02_ISF_nemo/src/OCE/TRA/traisf.F90 (modified) (1 diff)

NEMO/branches/2019/ENHANCE-02_ISF_nemo/src/OCE/TRA/traisf.F90

@@ -61 +61 @@
       IF ( ll_isfcpl ) THEN
          !
-         IF ( kt == nit000 ) CALL tra_isf_cpl(risfcpl_tsc, tsa)
+!         IF ( kt == nit000 ) CALL tra_isf_cpl(risfcpl_tsc, tsa)
          !
          ! ensure 0 trend due to unconservation of the ice shelf coupling