MODULE par_trc_trp !!====================================================================== !! *** par_trc_trp *** !! passive tracers : set the number of passive tracers !!====================================================================== !! History : !! 9.0 ! 04-03 (C. Ethe) Orignal !!---------------------------------------------------------------------- !! TOP 1.0, LOCEAN-IPSL (2005) !! $Header$ !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt !!---------------------------------------------------------------------- #if defined key_passivetrc !!--------------------------------------------------------------------- !! 'key_passivetrc' : Passive tracer !!--------------------------------------------------------------------- IMPLICIT NONE PUBLIC !! jptra : number of passive tracers !! jpdia2d : additional 2d output !! jpdia3d : additional 3d output #if defined key_trc_lobster1 !!--------------------------------------------------------------------- !! 'key_trc_lobster1' : LOBSTER1 Source Minus Sink model !!--------------------------------------------------------------------- INTEGER, PUBLIC, PARAMETER :: jptra = 6 #if defined key_trc_diaadd INTEGER, PUBLIC, PARAMETER :: jpdia2d = 19 INTEGER, PUBLIC, PARAMETER :: jpdia3d = 3 #endif #elif defined key_cfc !!--------------------------------------------------------------------- !! 'key_cfc' : CFC Source Minus Sink model !!--------------------------------------------------------------------- INTEGER, PUBLIC, PARAMETER :: jptra = 2 #if defined key_trc_diaadd INTEGER, PUBLIC, PARAMETER :: jpdia2d = 1 INTEGER, PUBLIC, PARAMETER :: jpdia3d = 1 #endif #elif defined key_trc_pisces !!--------------------------------------------------------------------- !! 'key_trc_pisces' : PISCES Source Minus Sink model !!--------------------------------------------------------------------- INTEGER, PUBLIC, PARAMETER :: jptra = 24 #if defined key_trc_diaadd INTEGER, PUBLIC, PARAMETER :: jpdia2d = 13 INTEGER, PUBLIC, PARAMETER :: jpdia3d = 11 #endif #else !!--------------------------------------------------------------------- !! 'default' : temperature and salinity as passive tracers !!--------------------------------------------------------------------- INTEGER, PUBLIC, PARAMETER :: jptra = 2 #if defined key_trc_diaadd INTEGER, PUBLIC, PARAMETER :: jpdia2d = 1 INTEGER, PUBLIC, PARAMETER :: jpdia3d = 1 #endif #endif #else !!====================================================================== !! Empty module : No passive tracer !!====================================================================== #endif END MODULE par_trc_trp