source:
NEMO/branches/2018/dev_r9956_ENHANCE05_ZAD_AIMP/src/TOP/C14/trcice_c14.F90
@
9957
| Last change on this file since 9957 was 9957, checked in by acc, 6 years ago | |
|---|---|
| File size: 1.1 KB | |
| Line | |
|---|---|
| 1 | MODULE trcice_c14 |
| 2 | !!====================================================================== |
| 3 | !! *** MODULE trcice_c14 *** |
| 4 | !!====================================================================== |
| 5 | USE par_trc ! TOP parameters |
| 6 | USE oce_trc ! Ocean variables |
| 7 | USE trc ! TOP variables |
| 8 | |
| 9 | IMPLICIT NONE |
| 10 | PRIVATE |
| 11 | |
| 12 | PUBLIC trc_ice_ini_c14 ! called by trcice.F90 module |
| 13 | |
| 14 | !!---------------------------------------------------------------------- |
| 15 | !! NEMO/TOP 3.3 , NEMO Consortium (2018) |
| 16 | !! $Id: trcice_c14b.F90 4990 2014-12-15 16:42:49Z timgraham $ |
| 17 | !! Software governed by the CeCILL licence (./LICENSE) |
| 18 | !!---------------------------------------------------------------------- |
| 19 | CONTAINS |
| 20 | |
| 21 | SUBROUTINE trc_ice_ini_c14 |
| 22 | !!---------------------------------------------------------------------- |
| 23 | !! *** trc_ice_c14b *** |
| 24 | !! |
| 25 | !!---------------------------------------------------------------------- |
| 26 | ! |
| 27 | ! |
| 28 | END SUBROUTINE trc_ice_ini_c14 |
| 29 | |
| 30 | !!====================================================================== |
| 31 | END MODULE trcice_c14 |
Note: See TracBrowser
for help on using the repository browser.
