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 2025 for branches/DEV_r2006_merge_TRA_TRC/NEMO/OPA_SRC/par_oce.F90 – NEMO

Ignore:
Timestamp:
2010-07-29T13:00:46+02:00 (14 years ago)
Author:
cetlod
Message:

Define 4D T/S arrays and tracer index, see ticket:693

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/DEV_r2006_merge_TRA_TRC/NEMO/OPA_SRC/par_oce.F90

    r1647 r2025  
    178178#endif 
    179179 
     180   INTEGER, PUBLIC, PARAMETER :: jpts   = 2    !: Number of active tracers ( T & S ) 
     181   INTEGER, PUBLIC, PARAMETER :: jp_tem = 1    !: indice for temperature 
     182   INTEGER, PUBLIC, PARAMETER :: jp_sal = 2    !: indice for salinity 
     183 
    180184   !!--------------------------------------------------------------------- 
    181185   !! Domain Matrix size 
Note: See TracChangeset for help on using the changeset viewer.