source:
branches/2010_and_older/dev_001_GM/NEMO/TOP_SRC/sms.F90
@
7655
Last change on this file since 7655 was 772, checked in by gm, 17 years ago | |
---|---|
|
|
File size: 1.8 KB |
Line | |
---|---|
1 | MODULE 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 | !! NEMO/TOP 1.0 , LOCEAN-IPSL (2005) |
9 | !! $Header:$ |
10 | !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) |
11 | !!---------------------------------------------------------------------- |
12 | #if defined key_top |
13 | !!---------------------------------------------------------------------- |
14 | !! 'key_top' TOP models |
15 | !!---------------------------------------------------------------------- |
16 | USE par_oce |
17 | USE par_trc |
18 | |
19 | IMPLICIT NONE |
20 | PUBLIC |
21 | |
22 | # if defined key_lobster |
23 | !!---------------------------------------------------------------------- |
24 | !! 'key_lobster' LOBSTER bio-model |
25 | !!---------------------------------------------------------------------- |
26 | # include "sms_lobster1.h90" |
27 | |
28 | # elif defined key_pisces |
29 | !!---------------------------------------------------------------------- |
30 | !! 'key_pisces' PISCES bio-model |
31 | !!---------------------------------------------------------------------- |
32 | # include "sms_pisces.h90" |
33 | |
34 | # endif |
35 | |
36 | #else |
37 | !!---------------------------------------------------------------------- |
38 | !! Empty module : No passive tracer |
39 | !!---------------------------------------------------------------------- |
40 | #endif |
41 | |
42 | !!====================================================================== |
43 | END MODULE sms |
Note: See TracBrowser
for help on using the repository browser.