source:
NEMO/branches/UKMO/NEMO_4.0.4_mirror/src/TOP/MY_TRC/trcnam_my_trc.F90
Last change on this file was 14075, checked in by cguiavarch, 4 years ago | |
---|---|
File size: 1.7 KB |
Rev | Line | |
---|---|---|
[2038] | 1 | MODULE trcnam_my_trc |
2 | !!====================================================================== | |
3 | !! *** MODULE trcnam_my_trc *** | |
[3680] | 4 | !! TOP : initialisation of some run parameters for MY_TRC bio-model |
[2038] | 5 | !!====================================================================== |
[7646] | 6 | !! History : ! 2007 (C. Ethe, G. Madec) Original code |
7 | !! ! 2016 (C. Ethe, T. Lovato) Revised architecture | |
[2038] | 8 | !!---------------------------------------------------------------------- |
9 | !! trc_nam_my_trc : MY_TRC model initialisation | |
10 | !!---------------------------------------------------------------------- | |
11 | USE oce_trc ! Ocean variables | |
12 | USE par_trc ! TOP parameters | |
13 | USE trc ! TOP variables | |
14 | ||
15 | IMPLICIT NONE | |
16 | PRIVATE | |
17 | ||
18 | PUBLIC trc_nam_my_trc ! called by trcnam.F90 module | |
19 | ||
20 | !!---------------------------------------------------------------------- | |
[9598] | 21 | !! NEMO/TOP 4.0 , NEMO Consortium (2018) |
[14075] | 22 | !! $Id$ |
[10068] | 23 | !! Software governed by the CeCILL license (see ./LICENSE) |
[2038] | 24 | !!---------------------------------------------------------------------- |
25 | ||
26 | CONTAINS | |
27 | ||
28 | SUBROUTINE trc_nam_my_trc | |
29 | !!---------------------------------------------------------------------- | |
30 | !! *** trc_nam_my_trc *** | |
31 | !! | |
32 | !! ** Purpose : read MY_TRC namelist | |
33 | !! | |
34 | !!---------------------------------------------------------------------- | |
35 | ! | |
36 | IF(lwp) WRITE(numout,*) | |
37 | IF(lwp) WRITE(numout,*) ' trc_nam_my_trc : read MY_TRC namelists' | |
38 | IF(lwp) WRITE(numout,*) ' ~~~~~~~~~~~~~~~' | |
39 | ! | |
40 | END SUBROUTINE trc_nam_my_trc | |
41 | ||
42 | !!====================================================================== | |
43 | END MODULE trcnam_my_trc |
Note: See TracBrowser
for help on using the repository browser.