1 |
! |
module cvparam |
|
! $Header: /home/cvsroot/LMDZ4/libf/phylmd/cvparam.h,v 1.1.1.1 2004/05/19 12:53:08 lmdzadmin Exp $ |
|
|
! |
|
|
c------------------------------------------------------------ |
|
|
c Parameters for convectL: |
|
|
c (includes - microphysical parameters, |
|
|
c - parameters that control the rate of approach |
|
|
c to quasi-equilibrium) |
|
|
c - noff & minorig (previously in input of convect1) |
|
|
c------------------------------------------------------------ |
|
2 |
|
|
3 |
integer noff, minorig, nl, nlp, nlm |
! From LMDZ4/libf/phylmd/cvparam.h,v 1.1.1.1 2004/05/19 12:53:08 |
|
real elcrit, tlcrit |
|
|
real entp |
|
|
real sigs, sigd |
|
|
real omtrain, omtsnow, coeffr, coeffs |
|
|
real dtmax |
|
|
real cu |
|
|
real betad |
|
|
real alpha, damp |
|
|
real delta |
|
4 |
|
|
5 |
COMMON /cvparam/ noff, minorig, nl, nlp, nlm |
! Parameters for convectL: |
6 |
: ,elcrit, tlcrit |
! (includes - microphysical parameters, |
7 |
: ,entp, sigs, sigd |
! - parameters that control the rate of approach |
8 |
: ,omtrain, omtsnow, coeffr, coeffs |
! to quasi-equilibrium) |
9 |
: ,dtmax, cu, betad, alpha, damp, delta |
! - noff & minorig (previously in input of convect1) |
10 |
|
|
11 |
|
implicit none |
12 |
|
|
13 |
|
integer noff, minorig, nl, nlp, nlm |
14 |
|
real elcrit, tlcrit |
15 |
|
real entp |
16 |
|
real sigs, sigd |
17 |
|
real omtrain, omtsnow, coeffr, coeffs |
18 |
|
real dtmax |
19 |
|
real cu |
20 |
|
real betad |
21 |
|
real alpha, damp |
22 |
|
real delta |
23 |
|
|
24 |
|
end module cvparam |