1 |
! |
module cv_param |
2 |
! $Header: /home/cvsroot/LMDZ4/libf/phylmd/cv_routines.F,v 1.1.1.1 2004/05/19 12:53:08 lmdzadmin Exp $ |
|
3 |
! |
! From LMDZ4/libf/phylmd/cvparam.h,v 1.1.1.1 2004/05/19 12:53:08 |
4 |
SUBROUTINE cv_param(nd) |
! and LMDZ4/libf/phylmd/cv_routines.F, version 1.1.1.1, 2004/05/19 12:53:08 |
5 |
use cvparam |
|
6 |
implicit none |
! Parameters for convectL: includes microphysical parameters, and |
7 |
|
! parameters that control the rate of approach to quasi-equilibrium. |
8 |
!------------------------------------------------------------ |
|
9 |
! Set parameters for convectL |
use dimphy, only: klev |
10 |
! (includes microphysical parameters and parameters that |
|
11 |
! control the rate of approach to quasi-equilibrium) |
implicit none |
12 |
!------------------------------------------------------------ |
|
13 |
|
integer, parameter:: noff= 2, minorig= 2, nl=klev-noff, nlp=nl+1, nlm=nl-1 |
14 |
! *** ELCRIT IS THE AUTOCONVERSION THERSHOLD WATER CONTENT (gm/gm) *** |
! noff: integer limit for convection (klev-noff) |
15 |
! *** TLCRIT IS CRITICAL TEMPERATURE BELOW WHICH THE AUTO- *** |
! minorig: First level of convection |
16 |
! *** CONVERSION THRESHOLD IS ASSUMED TO BE ZERO *** |
real, parameter:: elcrit=0.0011, tlcrit=-55. |
17 |
! *** (THE AUTOCONVERSION THRESHOLD VARIES LINEARLY *** |
! ELCRIT IS THE AUTOCONVERSION THERSHOLD WATER CONTENT (gm/gm) |
18 |
! *** BETWEEN 0 C AND TLCRIT) *** |
! TLCRIT IS CRITICAL TEMPERATURE BELOW WHICH THE AUTO- |
19 |
! *** ENTP IS THE COEFFICIENT OF MIXING IN THE ENTRAINMENT *** |
! CONVERSION THRESHOLD IS ASSUMED TO BE ZERO |
20 |
! *** FORMULATION *** |
! (THE AUTOCONVERSION THRESHOLD VARIES LINEARLY |
21 |
! *** SIGD IS THE FRACTIONAL AREA COVERED BY UNSATURATED DNDRAFT *** |
! BETWEEN 0 C AND TLCRIT) |
22 |
! *** SIGS IS THE FRACTION OF PRECIPITATION FALLING OUTSIDE *** |
real, parameter:: entp=1.5 |
23 |
! *** OF CLOUD *** |
! ENTP IS THE COEFFICIENT OF MIXING IN THE ENTRAINMENT |
24 |
! *** OMTRAIN IS THE ASSUMED FALL SPEED (P/s) OF RAIN *** |
! FORMULATION |
25 |
! *** OMTSNOW IS THE ASSUMED FALL SPEED (P/s) OF SNOW *** |
real, parameter:: sigs=0.12, sigd=0.05 |
26 |
! *** COEFFR IS A COEFFICIENT GOVERNING THE RATE OF EVAPORATION *** |
! SIGD IS THE FRACTIONAL AREA COVERED BY UNSATURATED DNDRAFT |
27 |
! *** OF RAIN *** |
! SIGS IS THE FRACTION OF PRECIPITATION FALLING OUTSIDE |
28 |
! *** COEFFS IS A COEFFICIENT GOVERNING THE RATE OF EVAPORATION *** |
! OF CLOUD |
29 |
! *** OF SNOW *** |
real, parameter:: omtrain=50., omtsnow=5.5, coeffr=1., coeffs=0.8 |
30 |
! *** CU IS THE COEFFICIENT GOVERNING CONVECTIVE MOMENTUM *** |
! OMTRAIN IS THE ASSUMED FALL SPEED (P/s) OF RAIN |
31 |
! *** TRANSPORT *** |
! OMTSNOW IS THE ASSUMED FALL SPEED (P/s) OF SNOW |
32 |
! *** DTMAX IS THE MAXIMUM NEGATIVE TEMPERATURE PERTURBATION *** |
! COEFFR IS A COEFFICIENT GOVERNING THE RATE OF EVAPORATION |
33 |
! *** A LIFTED PARCEL IS ALLOWED TO HAVE BELOW ITS LFC *** |
! OF RAIN |
34 |
! *** ALPHA AND DAMP ARE PARAMETERS THAT CONTROL THE RATE OF *** |
! COEFFS IS A COEFFICIENT GOVERNING THE RATE OF EVAPORATION |
35 |
! *** APPROACH TO QUASI-EQUILIBRIUM *** |
! OF SNOW |
36 |
! *** (THEIR STANDARD VALUES ARE 0.20 AND 0.1, RESPECTIVELY) *** |
real, parameter:: dtmax=0.9 |
37 |
! *** (DAMP MUST BE LESS THAN 1) *** |
! DTMAX IS THE MAXIMUM NEGATIVE TEMPERATURE PERTURBATION |
38 |
|
! A LIFTED PARCEL IS ALLOWED TO HAVE BELOW ITS LFC |
39 |
integer nd |
real, parameter:: cu=0.70 |
40 |
|
! CU IS THE COEFFICIENT GOVERNING CONVECTIVE MOMENTUM |
41 |
! noff: integer limit for convection (nd-noff) |
! TRANSPORT |
42 |
! minorig: First level of convection |
real, parameter:: betad=10. |
43 |
|
real, parameter:: alpha=0.2, damp=0.1 |
44 |
noff = 2 |
! ALPHA AND DAMP ARE PARAMETERS THAT CONTROL THE RATE OF |
45 |
minorig = 2 |
! APPROACH TO QUASI-EQUILIBRIUM |
46 |
|
! (THEIR STANDARD VALUES ARE 0.20 AND 0.1, RESPECTIVELY) |
47 |
nl=nd-noff |
! (DAMP MUST BE LESS THAN 1) |
48 |
nlp=nl+1 |
real, parameter:: delta=0.01 |
49 |
nlm=nl-1 |
|
50 |
|
end module cv_param |
|
elcrit=0.0011 |
|
|
tlcrit=-55.0 |
|
|
entp=1.5 |
|
|
sigs=0.12 |
|
|
sigd=0.05 |
|
|
omtrain=50.0 |
|
|
omtsnow=5.5 |
|
|
coeffr=1.0 |
|
|
coeffs=0.8 |
|
|
dtmax=0.9 |
|
|
! |
|
|
cu=0.70 |
|
|
! |
|
|
betad=10.0 |
|
|
! |
|
|
damp=0.1 |
|
|
alpha=0.2 |
|
|
! |
|
|
delta=0.01 ! cld |
|
|
! |
|
|
return |
|
|
end |
|