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/sms.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/sms.F90

    r765 r772  
    66   !! History :    -   !  2004-03  (C. Ethe)  Free form and module 
    77   !!---------------------------------------------------------------------- 
    8    !!---------------------------------------------------------------------- 
    98   !! NEMO/TOP 1.0 , LOCEAN-IPSL (2005)  
    109   !! $Header:$  
    1110   !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) 
    1211   !!---------------------------------------------------------------------- 
    13 #if defined key_passivetrc 
     12#if defined key_top 
    1413   !!---------------------------------------------------------------------- 
    15    !!   'key_passivetrc'                                    Passive tracers 
     14   !!   'key_top'                                                TOP models 
    1615   !!---------------------------------------------------------------------- 
    1716   USE par_oce 
    … …  
    2120   PUBLIC 
    2221 
    23 # if defined key_trc_lobster1 
     22# if defined key_lobster 
    2423   !!---------------------------------------------------------------------- 
    25    !!   'key_trc_lobster1'                        LOBSTER1 biological model   
     24   !!   'key_lobster'                                     LOBSTER bio-model   
    2625   !!---------------------------------------------------------------------- 
    2726#  include "sms_lobster1.h90" 
    2827 
    29 # elif defined key_trc_pisces 
     28# elif defined key_pisces 
    3029   !!---------------------------------------------------------------------- 
    31    !!   'key_trc_pisces'                            PISCES biological model                   
     30   !!   'key_pisces'                                       PISCES bio-model                   
    3231   !!---------------------------------------------------------------------- 
    3332#  include "sms_pisces.h90" 
Note: See TracChangeset for help on using the changeset viewer.