source:
trunk/NEMO/OFF_SRC/ZDF/zdf_oce.F90
@
765
Last change on this file since 765 was 719, checked in by ctlod, 17 years ago | |
---|---|
|
|
File size: 1.4 KB |
Rev | Line | |
---|---|---|
[325] | 1 | MODULE zdf_oce |
2 | !!====================================================================== | |
3 | !! *** MODULE zdf_oce *** | |
4 | !! Ocean physics : define vertical mixing variables | |
5 | !!===================================================================== | |
6 | ||
7 | !!---------------------------------------------------------------------- | |
8 | !! zdf_init : initialization, namelist read, and parameters control | |
9 | !!---------------------------------------------------------------------- | |
[343] | 10 | !! OPA 9.0 , LOCEAN-IPSL (2005) |
[719] | 11 | !! $Header$ |
[343] | 12 | !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt |
13 | !!---------------------------------------------------------------------- | |
[325] | 14 | !! * Modules used |
15 | USE par_oce ! mesh and scale factors | |
16 | ||
17 | IMPLICIT NONE | |
18 | PRIVATE | |
19 | ||
20 | !! * Share Module variables | |
21 | ||
22 | REAL(wp), PUBLIC :: & !!: namzdf vertical diffusion | |
23 | avt0 = 1.e-5_wp !: vertical eddy diffusivity (m2/s) | |
24 | ||
25 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj,jpk) :: & !: | |
26 | avt !: vertical diffusivity coeff. at w-point | |
27 | ||
28 | REAL(wp), PUBLIC, DIMENSION(jpk) :: & !: | |
29 | avtb !: background profile of avm and avt | |
30 | ||
31 | LOGICAL, PUBLIC :: & !: | |
32 | ln_zdfnpc = .FALSE. !: convection: non-penetrative convection flag | |
33 | ||
34 | !!====================================================================== | |
35 | END MODULE zdf_oce |
Note: See TracBrowser
for help on using the repository browser.