Last change
on this file was
1999,
checked in by Laurent Fairhead, 10 years ago
|
Merged trunk changes r1920:1997 into testing branch
|
-
Property copyright set to
Name of program: LMDZ Creation date: 1984 Version: LMDZ5 License: CeCILL version 2 Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539 See the license file in the root directory
-
Property svn:eol-style set to
native
-
Property svn:keywords set to
Author Date Id Revision
|
File size:
1.1 KB
|
Line | |
---|
1 | !------------------------------------------------------------ |
---|
2 | ! Parameters for convectL, iflag_con=3: |
---|
3 | ! (includes - microphysical parameters, |
---|
4 | ! - parameters that control the rate of approach |
---|
5 | ! to quasi-equilibrium) |
---|
6 | ! - noff & minorig (previously in input of convect1) |
---|
7 | !------------------------------------------------------------ |
---|
8 | |
---|
9 | integer noff, minorig, nl, nlp, nlm |
---|
10 | real sigdz, spfac |
---|
11 | integer flag_epKEorig,flag_wb |
---|
12 | real pbcrit, ptcrit |
---|
13 | real elcrit, tlcrit |
---|
14 | real omtrain |
---|
15 | real dtovsh, dpbase, dttrig |
---|
16 | real dtcrit, tau, beta, alpha, alpha1 |
---|
17 | real wbmax |
---|
18 | real delta |
---|
19 | real betad |
---|
20 | |
---|
21 | COMMON /cv3param/ noff, minorig, nl, nlp, nlm & |
---|
22 | , sigdz, spfac & |
---|
23 | ,flag_epKEorig & |
---|
24 | ,pbcrit, ptcrit & |
---|
25 | ,elcrit, tlcrit & |
---|
26 | ,omtrain & |
---|
27 | ,dtovsh, dpbase, dttrig & |
---|
28 | ,dtcrit, tau, beta, alpha, alpha1 & |
---|
29 | ,flag_wb,wbmax & |
---|
30 | ,delta, betad |
---|
31 | !$OMP THREADPRIVATE(/cv3param/) |
---|
32 | |
---|
Note: See
TracBrowser
for help on using the repository browser.