phylmd/CV_routines/cvparam.f

module cvparam

  ! From LMDZ4/libf/phylmd/cvparam.h,v 1.1.1.1 2004/05/19 12:53:08

  ! Parameters for convectL:
  ! (includes - microphysical parameters, 
  !                     - parameters that control the rate of approach 
  !               to quasi-equilibrium)
  !                     - noff & minorig (previously in input of convect1)

  implicit none

  integer noff, minorig, nl, nlp, nlm
  real elcrit, tlcrit
  real entp
  real sigs, sigd
  real omtrain, omtsnow, coeffr, coeffs
  real dtmax
  real cu
  real betad
  real alpha, damp
  real delta

end module cvparam
1	guez	52	module cvparam
2	guez	3
3	guez	52	! From LMDZ4/libf/phylmd/cvparam.h,v 1.1.1.1 2004/05/19 12:53:08
4	guez	3
5	guez	52	! Parameters for convectL:
6			! (includes - microphysical parameters,
7			! - parameters that control the rate of approach
8			! to quasi-equilibrium)
9			! - noff & minorig (previously in input of convect1)
10	guez	3
11	guez	52	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