Changeset 4610 for trunk/NEMOGCM/NEMO/TOP_SRC/oce_trc.F90

Timestamp:

2014-03-31T15:19:34+02:00 (10 years ago)

Author:

cetlod

Message:

bugfix : Add the MLE and ztilde parameterisation for passive tracers transport, see ticket #1290

File:

• trunk/NEMOGCM/NEMO/TOP_SRC/oce_trc.F90 (modified) (2 diffs)

trunk/NEMOGCM/NEMO/TOP_SRC/oce_trc.F90

@@ -51 +51 @@
    USE dom_oce 
 
+   USE domvvl, ONLY : un_td, vn_td          !: thickness diffusion transport
+   USE domvvl, ONLY : ln_vvl_ztilde         !: ztilde vertical coordinate
+   USE domvvl, ONLY : ln_vvl_layer          !: level  vertical coordinate
 
    !* ocean fields: here now and after fields *
@@ -71 +74 @@
    USE oce , ONLY :   ssha    =>    ssha    !: sea surface height at t-point [m]   
    USE oce , ONLY :   l_traldf_rot => l_traldf_rot  !: rotated laplacian operator for lateral diffusion
-#if defined key_offline
-   USE oce , ONLY :   gtsu    =>    gtsu    !: t-, s- and rd horizontal gradient at u- and
-   USE oce , ONLY :   gtsv    =>    gtsv    !:
-   USE oce , ONLY :   gru     =>    gru     !:
-   USE oce , ONLY :   grv     =>    grv     !: 
-#endif
 
    !* surface fluxes *