1 | ! |
---|
2 | ! $Header$ |
---|
3 | ! |
---|
4 | C ---------------------------------------------------------------- |
---|
5 | C* *COMMON* *YOECUMF* - PARAMETERS FOR CUMULUS MASSFLUX SCHEME |
---|
6 | C ---------------------------------------------------------------- |
---|
7 | C |
---|
8 | COMMON /YOECUMF/ |
---|
9 | L LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV, |
---|
10 | R ENTRPEN,ENTRSCV,ENTRMID,ENTRDD,CMFCTOP, |
---|
11 | R CMFCMAX,CMFCMIN,CMFDEPS,RHCDD,CPRCON |
---|
12 | C |
---|
13 | LOGICAL LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV |
---|
14 | REAL ENTRPEN, ENTRSCV, ENTRMID, ENTRDD |
---|
15 | REAL CMFCTOP, CMFCMAX, CMFCMIN, CMFDEPS, RHCDD, CPRCON |
---|
16 | c$OMP THREADPRIVATE(/YOECUMF/) |
---|
17 | C |
---|
18 | *if (DOC,declared) <> 'UNKNOWN' |
---|
19 | C* *COMMON* *YOECUMF* - PARAMETERS FOR CUMULUS MASSFLUX SCHEME |
---|
20 | C |
---|
21 | C M.TIEDTKE E. C. M. W. F. 18/1/89 |
---|
22 | C |
---|
23 | C NAME TYPE PURPOSE |
---|
24 | C ---- ---- ------- |
---|
25 | C |
---|
26 | C LMFPEN LOGICAL TRUE IF PENETRATIVE CONVECTION IS SWITCHED ON |
---|
27 | C LMFSCV LOGICAL TRUE IF SHALLOW CONVECTION IS SWITCHED ON |
---|
28 | C LMFMID LOGICAL TRUE IF MIDLEVEL CONVECTION IS SWITCHED ON |
---|
29 | C LMFDD LOGICAL TRUE IF CUMULUS DOWNDRAFT IS SWITCHED ON |
---|
30 | C LMFDUDV LOGICAL TRUE IF CUMULUS FRICTION IS SWITCHED ON |
---|
31 | C ENTRPEN REAL ENTRAINMENT RATE FOR PENETRATIVE CONVECTION |
---|
32 | C ENTRSCV REAL ENTRAINMENT RATE FOR SHALLOW CONVECTION |
---|
33 | C ENTRMID REAL ENTRAINMENT RATE FOR MIDLEVEL CONVECTION |
---|
34 | C ENTRDD REAL ENTRAINMENT RATE FOR CUMULUS DOWNDRAFTS |
---|
35 | C CMFCTOP REAL RELAT. CLOUD MASSFLUX AT LEVEL ABOVE NONBUOYANC |
---|
36 | C CMFCMAX REAL MAXIMUM MASSFLUX VALUE ALLOWED FOR |
---|
37 | C CMFCMIN REAL MINIMUM MASSFLUX VALUE (FOR SAFETY) |
---|
38 | C CMFDEPS REAL FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS |
---|
39 | C RHCDD REAL RELATIVE SATURATION IN DOWNDRAFTS |
---|
40 | C CPRCON REAL COEFFICIENTS FOR DETERMINING CONVERSION |
---|
41 | C FROM CLOUD WATER TO RAIN |
---|
42 | *ifend |
---|
43 | C ---------------------------------------------------------------- |
---|