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 497 for trunk/NEMO/OFF_SRC/LDF/ldftra_oce.F90 – NEMO

Ignore:
Timestamp:
2006-09-12T13:03:53+02:00 (18 years ago)
Author:
opalod
Message:

nemo_v1_update_064:CE:re-organization of coordinate definition and scale factors

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMO/OFF_SRC/LDF/ldftra_oce.F90

    r343 r497  
    4545      l_traldf_iso_zps                 !: iso-neutral laplacian (partial steps) 
    4646 
    47 #if defined key_traldf_c3d 
     47#if defined key_traldf_c3d || defined key_off_degrad 
    4848   REAL(wp), PUBLIC, DIMENSION(jpi,jpj,jpk) ::   &  !: ** 3D coefficients ** 
    4949#elif defined key_traldf_c2d 
    … …  
    6363   LOGICAL, PUBLIC, PARAMETER ::   lk_traldf_eiv   = .TRUE.   !: eddy induced velocity flag 
    6464       
    65 # if defined key_traldf_c3d 
     65# if defined key_traldf_c3d || defined key_off_degrad 
    6666   REAL(wp), PUBLIC, DIMENSION(jpi,jpj,jpk) ::   &  !: ** 3D coefficients ** 
    6767# elif defined key_traldf_c2d 
Note: See TracChangeset for help on using the changeset viewer.