Changeset 2049
- Timestamp:
- 2010-08-13T10:14:15+02:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/TOP_SRC/PISCES/par_pisces.F90
r2047 r2049 10 10 !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) 11 11 !!---------------------------------------------------------------------- 12 USE par_lobster, ONLY : jp_l pobster !: number of tracers in LOBSTER13 USE par_lobster, ONLY : jp_l pobster_2d !: number of 2D diag in LOBSTER14 USE par_lobster, ONLY : jp_l pobster_3d !: number of 3D diag in LOBSTER15 USE par_lobster, ONLY : jp_l pobster_trd !: number of biological diag in LOBSTER12 USE par_lobster, ONLY : jp_lobster !: number of tracers in LOBSTER 13 USE par_lobster, ONLY : jp_lobster_2d !: number of 2D diag in LOBSTER 14 USE par_lobster, ONLY : jp_lobster_3d !: number of 3D diag in LOBSTER 15 USE par_lobster, ONLY : jp_lobster_trd !: number of biological diag in LOBSTER 16 16 17 17 IMPLICIT NONE 18 18 19 INTEGER, PARAMETER :: jp_lp = jp_l pobster !: cumulative number of already defined TRC20 INTEGER, PARAMETER :: jp_lp_2d = jp_l pobster_2d !:21 INTEGER, PARAMETER :: jp_lp_3d = jp_l pobster_3d !:22 INTEGER, PARAMETER :: jp_lp_trd = jp_l pobster_trd !:19 INTEGER, PARAMETER :: jp_lp = jp_lobster !: cumulative number of already defined TRC 20 INTEGER, PARAMETER :: jp_lp_2d = jp_lobster_2d !: 21 INTEGER, PARAMETER :: jp_lp_3d = jp_lobster_3d !: 22 INTEGER, PARAMETER :: jp_lp_trd = jp_lobster_trd !: 23 23 24 24 #if defined key_pisces && defined key_kriest
Note: See TracChangeset
for help on using the changeset viewer.