| 1 | ! |
|---|
| 2 | ! $Id: YOECUMF.h 1907 2013-11-26 13:10:46Z dcugnet $ |
|---|
| 3 | ! |
|---|
| 4 | ! ATTENTION!!!!: ce fichier include est compatible format fixe/format libre |
|---|
| 5 | ! veillez n'utiliser que des ! pour les commentaires |
|---|
| 6 | ! et bien positionner les & des lignes de continuation |
|---|
| 7 | ! (les placer en colonne 6 et en colonne 73) |
|---|
| 8 | ! |
|---|
| 9 | ! ---------------------------------------------------------------- |
|---|
| 10 | !* *COMMON* *YOECUMF* - PARAMETERS FOR CUMULUS MASSFLUX SCHEME |
|---|
| 11 | ! ---------------------------------------------------------------- |
|---|
| 12 | ! |
|---|
| 13 | COMMON /YOECUMF/ & |
|---|
| 14 | & LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV, & |
|---|
| 15 | & ENTRPEN,ENTRSCV,ENTRMID,ENTRDD,CMFCTOP, & |
|---|
| 16 | & CMFCMAX,CMFCMIN,CMFDEPS,RHCDD,CPRCON |
|---|
| 17 | |
|---|
| 18 | LOGICAL LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV |
|---|
| 19 | REAL ENTRPEN, ENTRSCV, ENTRMID, ENTRDD |
|---|
| 20 | REAL CMFCTOP, CMFCMAX, CMFCMIN, CMFDEPS, RHCDD, CPRCON |
|---|
| 21 | !$OMP THREADPRIVATE(/YOECUMF/) |
|---|
| 22 | ! |
|---|
| 23 | !*if (DOC,declared) <> 'UNKNOWN' |
|---|
| 24 | !* *COMMON* *YOECUMF* - PARAMETERS FOR CUMULUS MASSFLUX SCHEME |
|---|
| 25 | ! |
|---|
| 26 | ! M.TIEDTKE E. C. M. W. F. 18/1/89 |
|---|
| 27 | ! |
|---|
| 28 | ! NAME TYPE PURPOSE |
|---|
| 29 | ! ---- ---- ------- |
|---|
| 30 | ! |
|---|
| 31 | ! LMFPEN LOGICAL TRUE IF PENETRATIVE CONVECTION IS SWITCHED ON |
|---|
| 32 | ! LMFSCV LOGICAL TRUE IF SHALLOW CONVECTION IS SWITCHED ON |
|---|
| 33 | ! LMFMID LOGICAL TRUE IF MIDLEVEL CONVECTION IS SWITCHED ON |
|---|
| 34 | ! LMFDD LOGICAL TRUE IF CUMULUS DOWNDRAFT IS SWITCHED ON |
|---|
| 35 | ! LMFDUDV LOGICAL TRUE IF CUMULUS FRICTION IS SWITCHED ON |
|---|
| 36 | ! ENTRPEN REAL ENTRAINMENT RATE FOR PENETRATIVE CONVECTION |
|---|
| 37 | ! ENTRSCV REAL ENTRAINMENT RATE FOR SHALLOW CONVECTION |
|---|
| 38 | ! ENTRMID REAL ENTRAINMENT RATE FOR MIDLEVEL CONVECTION |
|---|
| 39 | ! ENTRDD REAL ENTRAINMENT RATE FOR CUMULUS DOWNDRAFTS |
|---|
| 40 | ! CMFCTOP REAL RELAT. CLOUD MASSFLUX AT LEVEL ABOVE NONBUOYANC |
|---|
| 41 | ! CMFCMAX REAL MAXIMUM MASSFLUX VALUE ALLOWED FOR |
|---|
| 42 | ! CMFCMIN REAL MINIMUM MASSFLUX VALUE (FOR SAFETY) |
|---|
| 43 | ! CMFDEPS REAL FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS |
|---|
| 44 | ! RHCDD REAL RELATIVE SATURATION IN DOWNDRAFTS |
|---|
| 45 | ! CPRCON REAL COEFFICIENTS FOR DETERMINING CONVERSION |
|---|
| 46 | ! FROM CLOUD WATER TO RAIN |
|---|
| 47 | !*ifend |
|---|
| 48 | ! ---------------------------------------------------------------- |
|---|