Changeset 1239 for trunk/NEMO/TOP_SRC/TRP

Timestamp:

2008-12-31T10:35:35+01:00 (16 years ago)

Author:

ctlod

Message:

this version allows to stabilize the computation of En production term, see ticket: #281

File:

• trunk/NEMO/TOP_SRC/TRP/trctrp_ctl.F90 (modified) (1 diff)

trunk/NEMO/TOP_SRC/TRP/trctrp_ctl.F90

@@ -249 +249 @@
       ! ... vertical mixing
       ! time stepping scheme (N.B. TKE && KPP scheme => force the use of implicit scheme)
-#if defined key_zdftke || defined key_zdfkpp
+#if defined key_zdftke || defined key_zdftke2 || defined key_zdfkpp
       l_trczdf_exp = .FALSE.          ! use implicit scheme
       l_trczdf_imp = .TRUE.