New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 5760 for branches/2015/dev_r5721_CNRS9_NOC3_LDF/NEMOGCM/NEMO/OPA_SRC/TRA/trazdf_imp.F90 – NEMO

Ignore:
Timestamp:
2015-09-24T10:00:39+02:00 (9 years ago)
Author:
gm
Message:

#1593: LDF-ADV, step II.1: phasing the improvements/simplifications of diffusive trend: suppression of KPP

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2015/dev_r5721_CNRS9_NOC3_LDF/NEMOGCM/NEMO/OPA_SRC/TRA/trazdf_imp.F90

    r5758 r5760  
    1919   
    2020   !!---------------------------------------------------------------------- 
    21    !!   tra_zdf_imp : Update the tracer trend with the diagonal vertical part of the mixing tensor. 
    22    !!---------------------------------------------------------------------- 
    23    USE oce              ! ocean dynamics and tracers variables 
    24    USE dom_oce          ! ocean space and time domain variables  
    25    USE zdf_oce          ! ocean vertical physics variables 
    26    USE trc_oce          ! share passive tracers/ocean variables 
    27    USE domvvl           ! variable volume 
    28    USE ldftra           ! lateral mixing type 
    29    USE ldfslp           ! lateral physics: slope of diffusion 
    30    USE zdfddm           ! ocean vertical physics: double diffusion 
    31    USE traldf_iso_triad ! active tracers: Method of Stabilizing Correction 
     21   !!   tra_zdf_imp   : Update the tracer trend with the diagonal vertical part of the mixing tensor. 
     22   !!---------------------------------------------------------------------- 
     23   USE oce            ! ocean dynamics and tracers variables 
     24   USE dom_oce        ! ocean space and time domain variables  
     25   USE zdf_oce        ! ocean vertical physics variables 
     26   USE trc_oce        ! share passive tracers/ocean variables 
     27   USE domvvl         ! variable volume 
     28   USE ldftra         ! lateral mixing type 
     29   USE ldfslp         ! lateral physics: slope of diffusion 
     30   USE zdfddm         ! ocean vertical physics: double diffusion 
     31   USE traldf_triad  ! active tracers: Method of Stabilizing Correction 
    3232   ! 
    33    USE in_out_manager   ! I/O manager 
    34    USE lbclnk           ! ocean lateral boundary conditions (or mpp link) 
    35    USE lib_mpp          ! MPP library 
    36    USE wrk_nemo         ! Memory Allocation 
    37    USE timing           ! Timing 
     33   USE in_out_manager ! I/O manager 
     34   USE lbclnk         ! ocean lateral boundary conditions (or mpp link) 
     35   USE lib_mpp        ! MPP library 
     36   USE wrk_nemo       ! Memory Allocation 
     37   USE timing         ! Timing 
    3838 
    3939   IMPLICIT NONE 
Note: See TracChangeset for help on using the changeset viewer.