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 772 for branches/dev_001_GM/NEMO/TOP_SRC/LOBSTER/par_lobster.F90 – NEMO

Ignore:
Timestamp:
2007-12-17T12:59:33+01:00 (17 years ago)
Author:
gm
Message:

dev_001_GM - change the name of cpp key to key_top, key_lobster, key_pisces, key_kriest and the corresponding lk_

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/dev_001_GM/NEMO/TOP_SRC/LOBSTER/par_lobster.F90

    r771 r772  
    1414   PUBLIC 
    1515 
    16 #if defined key_trc_lobster1 
     16#if defined key_lobster 
    1717   !!--------------------------------------------------------------------- 
    18    !!   'key_trc_lobster1'   :                               LOBSTER model 
     18   !!   'key_lobster'   :                                LOBSTER bio-model 
    1919   !!--------------------------------------------------------------------- 
    20    LOGICAL, PUBLIC, PARAMETER ::   lk_trc_lobster = .TRUE.    !: LOBSTER flag  
     20   LOGICAL, PUBLIC, PARAMETER ::   lk_lobster    = .TRUE.    !: LOBSTER flag  
    2121   INTEGER, PUBLIC, PARAMETER ::   jp_lobster     =  6        !: number of LOBSTER tracers 
    2222   INTEGER, PUBLIC, PARAMETER ::   jp_lobster_2d  = 19        !: additional 2d output arrays ('key_trc_diaadd') 
     
    4040   !!   Default                                           No LOBSTER model 
    4141   !!--------------------------------------------------------------------- 
    42    LOGICAL, PUBLIC, PARAMETER ::   lk_trc_lobster = .FALSE.   !: LOBSTER flag  
     42   LOGICAL, PUBLIC, PARAMETER ::   lk_lobster    = .FALSE.   !: LOBSTER flag  
    4343   INTEGER, PUBLIC, PARAMETER ::   jp_lobster     =  0        !: No LOBSTER tracers 
    4444   INTEGER, PUBLIC, PARAMETER ::   jp_lobster_2d  =  0        !: No LOBSTER additional 2d output arrays  
Note: See TracChangeset for help on using the changeset viewer.