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 14072 for NEMO/trunk/src/OCE/TRA/traldf.F90 – NEMO

Ignore:
Timestamp:
2020-12-04T08:48:38+01:00 (3 years ago)
Author:
laurent
Message:

Merging branch "2020/dev_r13648_ASINTER-04_laurent_bulk_ice", ticket #2369

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/OCE/TRA/traldf.F90

    r13982 r14072  
    22   !!====================================================================== 
    33   !!                       ***  MODULE  traldf  *** 
    4    !! Ocean Active tracers : lateral diffusive trends  
     4   !! Ocean Active tracers : lateral diffusive trends 
    55   !!===================================================================== 
    66   !! History :  9.0  ! 2005-11  (G. Madec)  Original code 
    7    !!  NEMO      3.0  ! 2008-01  (C. Ethe, G. Madec)  merge TRC-TRA  
     7   !!  NEMO      3.0  ! 2008-01  (C. Ethe, G. Madec)  merge TRC-TRA 
    88   !!            3.7  ! 2013-12  (G. Madec) remove the optional computation from T & S anomaly profiles and traldf_bilapg 
    99   !!             -   ! 2013-12  (F. Lemarie, G. Madec)  triad operator (Griffies) + Method of Stabilizing Correction 
     
    3737   PRIVATE 
    3838 
    39    PUBLIC   tra_ldf        ! called by step.F90  
    40    PUBLIC   tra_ldf_init   ! called by nemogcm.F90  
     39   PUBLIC   tra_ldf        ! called by step.F90 
     40   PUBLIC   tra_ldf_init   ! called by nemogcm.F90 
    4141 
    4242   !!---------------------------------------------------------------------- 
    4343   !! NEMO/OCE 4.0 , NEMO Consortium (2018) 
    44    !! $Id$  
     44   !! $Id$ 
    4545   !! Software governed by the CeCILL license (see ./LICENSE) 
    4646   !!---------------------------------------------------------------------- 
     
    5050      !!---------------------------------------------------------------------- 
    5151      !!                  ***  ROUTINE tra_ldf  *** 
    52       !!  
     52      !! 
    5353      !! ** Purpose :   compute the lateral ocean tracer physics. 
    5454      !!---------------------------------------------------------------------- 
     
    120120      !!---------------------------------------------------------------------- 
    121121      !!                  ***  ROUTINE tra_ldf_init  *** 
    122       !!  
     122      !! 
    123123      !! ** Purpose :   Choice of the operator for the lateral tracer diffusion 
    124124      !! 
    125125      !! ** Method  :   set nldf_tra from the namtra_ldf logicals 
    126126      !!---------------------------------------------------------------------- 
    127       INTEGER ::   ioptio, ierr   ! temporary integers  
     127      INTEGER ::   ioptio, ierr   ! temporary integers 
    128128      !!---------------------------------------------------------------------- 
    129129      ! 
Note: See TracChangeset for help on using the changeset viewer.