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.
sms.F90 in branches/dev_001_GM/NEMO/TOP_SRC – NEMO

source: branches/dev_001_GM/NEMO/TOP_SRC/sms.F90 @ 765

Last change on this file since 765 was 765, checked in by gm, 16 years ago

dev_001_GM - create 1 parameter module by tracers (CFC, LOBSTER, PISCES..) - never compiled

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 1.9 KB
Line 
1MODULE sms
2   !!======================================================================
3   !!                        ***  sms  ***
4   !! passive tracers :   set the passive tracers variables
5   !!======================================================================
6   !! History :    -   !  2004-03  (C. Ethe)  Free form and module
7   !!----------------------------------------------------------------------
8   !!----------------------------------------------------------------------
9   !! NEMO/TOP 1.0 , LOCEAN-IPSL (2005)
10   !! $Header:$
11   !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt)
12   !!----------------------------------------------------------------------
13#if defined key_passivetrc
14   !!----------------------------------------------------------------------
15   !!   'key_passivetrc'                                    Passive tracers
16   !!----------------------------------------------------------------------
17   USE par_oce
18   USE par_trc
19
20   IMPLICIT NONE
21   PUBLIC
22
23# if defined key_trc_lobster1
24   !!----------------------------------------------------------------------
25   !!   'key_trc_lobster1'                        LOBSTER1 biological model 
26   !!----------------------------------------------------------------------
27#  include "sms_lobster1.h90"
28
29# elif defined key_trc_pisces
30   !!----------------------------------------------------------------------
31   !!   'key_trc_pisces'                            PISCES biological model                 
32   !!----------------------------------------------------------------------
33#  include "sms_pisces.h90"
34
35# endif
36
37#else
38   !!----------------------------------------------------------------------
39   !!  Empty module :                                     No passive tracer
40   !!----------------------------------------------------------------------
41#endif
42
43   !!======================================================================
44END MODULE sms
Note: See TracBrowser for help on using the repository browser.