/[lmdze]/trunk/libf/phylmd/YOECUMF.f90
ViewVC logotype

Annotation of /trunk/libf/phylmd/YOECUMF.f90

Parent Directory Parent Directory | Revision Log Revision Log


Revision 10 - (hide annotations)
Fri Apr 18 14:45:53 2008 UTC (16 years, 1 month ago) by guez
File size: 1526 byte(s)
Added NetCDF directory "/home/guez/include" in "g95.mk" and
"nag_tools.mk".

Added some "intent" attributes in "PVtheta", "advtrac", "caladvtrac",
"calfis", "diagedyn", "dissip", "vlspltqs", "aeropt", "ajsec",
"calltherm", "clmain", "cltrac", "cltracrn", "concvl", "conema3",
"conflx", "fisrtilp", "newmicro", "nuage", "diagcld1", "diagcld2",
"drag_noro", "lift_noro", "SUGWD", "physiq", "phytrac", "radlwsw", "thermcell".

Removed the case "ierr == 0" in "abort_gcm"; moved call to "histclo"
and messages for end of run from "abort_gcm" to "gcm"; replaced call
to "abort_gcm" in "leapfrog" by exit from outer loop.

In "calfis": removed argument "pp" and variable "unskap"; changed
"pksurcp" from scalar to rank 2; use "pressure_var"; rewrote
computation of "zplev", "zplay", "ztfi", "pcvgt" using "dyn_phy";
added computation of "pls".

Removed unused variable in "dynredem0".

In "exner_hyb": changed "dellta" from scalar to rank 1; replaced call
to "ssum" by call to "sum"; removed variables "xpn" and "xps";
replaced some loops by array expressions.

In "leapfrog": use "pressure_var"; deleted variables "p", "longcles".

Converted common blocks "YOECUMF", "YOEGWD" to modules.

Removed argument "pplay" in "cvltr", "diagetpq", "nflxtr".

Created module "raddimlw" from include file "raddimlw.h".

Corrected call to "new_unit" in "test_disvert".

1 guez 10 module yoecumf
2    
3     ! From phylmd/YOECUMF.h,v 1.1.1.1 2004/05/19 12:53:07
4    
5     ! PARAMETERS FOR CUMULUS MASSFLUX SCHEME
6    
7     implicit none
8    
9     LOGICAL LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV
10     REAL ENTRPEN, ENTRSCV, ENTRMID, ENTRDD
11     REAL CMFCTOP, CMFCMAX, CMFCMIN, CMFDEPS, RHCDD, CPRCON
12    
13     ! M.TIEDTKE E. C. M. W. F. 18/1/89
14     !
15     ! NAME TYPE PURPOSE
16     ! ---- ---- -------
17     !
18     ! LMFPEN LOGICAL TRUE IF PENETRATIVE CONVECTION IS SWITCHED ON
19     ! LMFSCV LOGICAL TRUE IF SHALLOW CONVECTION IS SWITCHED ON
20     ! LMFMID LOGICAL TRUE IF MIDLEVEL CONVECTION IS SWITCHED ON
21     ! LMFDD LOGICAL TRUE IF CUMULUS DOWNDRAFT IS SWITCHED ON
22     ! LMFDUDV LOGICAL TRUE IF CUMULUS FRICTION IS SWITCHED ON
23     ! ENTRPEN REAL ENTRAINMENT RATE FOR PENETRATIVE CONVECTION
24     ! ENTRSCV REAL ENTRAINMENT RATE FOR SHALLOW CONVECTION
25     ! ENTRMID REAL ENTRAINMENT RATE FOR MIDLEVEL CONVECTION
26     ! ENTRDD REAL ENTRAINMENT RATE FOR CUMULUS DOWNDRAFTS
27     ! CMFCTOP REAL RELAT. CLOUD MASSFLUX AT LEVEL ABOVE NONBUOYANC
28     ! CMFCMAX REAL MAXIMUM MASSFLUX VALUE ALLOWED FOR
29     ! CMFCMIN REAL MINIMUM MASSFLUX VALUE (FOR SAFETY)
30     ! CMFDEPS REAL FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS
31     ! RHCDD REAL RELATIVE SATURATION IN DOWNDRAFTS
32     ! CPRCON REAL COEFFICIENTS FOR DETERMINING CONVERSION
33     ! FROM CLOUD WATER TO RAIN
34    
35     end module yoecumf

Properties

Name Value
svn:eol-style native

  ViewVC Help
Powered by ViewVC 1.1.21