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

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

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

trunk/libf/phylmd/YOECUMF.h revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC trunk/libf/phylmd/YOECUMF.f90 revision 10 by guez, Fri Apr 18 14:45:53 2008 UTC
# Line 1  Line 1 
1  !  module yoecumf
2  ! $Header: /home/cvsroot/LMDZ4/libf/phylmd/YOECUMF.h,v 1.1.1.1 2004/05/19 12:53:07 lmdzadmin Exp $  
3  !    ! From phylmd/YOECUMF.h,v 1.1.1.1 2004/05/19 12:53:07
4  C     ----------------------------------------------------------------  
5  C*    *COMMON* *YOECUMF* - PARAMETERS FOR CUMULUS MASSFLUX SCHEME    ! PARAMETERS FOR CUMULUS MASSFLUX SCHEME
6  C     ----------------------------------------------------------------  
7  C    implicit none
8        COMMON /YOECUMF/  
9       L                 LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV,    LOGICAL          LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV
10       R                 ENTRPEN,ENTRSCV,ENTRMID,ENTRDD,CMFCTOP,    REAL ENTRPEN, ENTRSCV, ENTRMID, ENTRDD
11       R                 CMFCMAX,CMFCMIN,CMFDEPS,RHCDD,CPRCON    REAL CMFCTOP, CMFCMAX, CMFCMIN, CMFDEPS, RHCDD, CPRCON
12  C  
13        LOGICAL          LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV    !     M.TIEDTKE       E. C. M. W. F.      18/1/89
14        REAL ENTRPEN, ENTRSCV, ENTRMID, ENTRDD    !
15        REAL CMFCTOP, CMFCMAX, CMFCMIN, CMFDEPS, RHCDD, CPRCON    !     NAME      TYPE      PURPOSE
16  C    !     ----      ----      -------
17  *if (DOC,declared) <> 'UNKNOWN'    !
18  C*    *COMMON* *YOECUMF* - PARAMETERS FOR CUMULUS MASSFLUX SCHEME    !     LMFPEN    LOGICAL  TRUE IF PENETRATIVE CONVECTION IS SWITCHED ON
19  C    !     LMFSCV    LOGICAL  TRUE IF SHALLOW     CONVECTION IS SWITCHED ON
20  C     M.TIEDTKE       E. C. M. W. F.      18/1/89    !     LMFMID    LOGICAL  TRUE IF MIDLEVEL    CONVECTION IS SWITCHED ON
21  C    !     LMFDD     LOGICAL  TRUE IF CUMULUS DOWNDRAFT      IS SWITCHED ON
22  C     NAME      TYPE      PURPOSE    !     LMFDUDV   LOGICAL  TRUE IF CUMULUS FRICTION       IS SWITCHED ON
23  C     ----      ----      -------    !     ENTRPEN   REAL     ENTRAINMENT RATE FOR PENETRATIVE CONVECTION
24  C    !     ENTRSCV   REAL     ENTRAINMENT RATE FOR SHALLOW CONVECTION
25  C     LMFPEN    LOGICAL  TRUE IF PENETRATIVE CONVECTION IS SWITCHED ON    !     ENTRMID   REAL     ENTRAINMENT RATE FOR MIDLEVEL CONVECTION
26  C     LMFSCV    LOGICAL  TRUE IF SHALLOW     CONVECTION IS SWITCHED ON    !     ENTRDD    REAL     ENTRAINMENT RATE FOR CUMULUS DOWNDRAFTS
27  C     LMFMID    LOGICAL  TRUE IF MIDLEVEL    CONVECTION IS SWITCHED ON    !     CMFCTOP   REAL     RELAT. CLOUD MASSFLUX AT LEVEL ABOVE NONBUOYANC
28  C     LMFDD     LOGICAL  TRUE IF CUMULUS DOWNDRAFT      IS SWITCHED ON    !     CMFCMAX   REAL     MAXIMUM MASSFLUX VALUE ALLOWED FOR
29  C     LMFDUDV   LOGICAL  TRUE IF CUMULUS FRICTION       IS SWITCHED ON    !     CMFCMIN   REAL     MINIMUM MASSFLUX VALUE (FOR SAFETY)
30  C     ENTRPEN   REAL     ENTRAINMENT RATE FOR PENETRATIVE CONVECTION    !     CMFDEPS   REAL     FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS
31  C     ENTRSCV   REAL     ENTRAINMENT RATE FOR SHALLOW CONVECTION    !     RHCDD     REAL     RELATIVE SATURATION IN DOWNDRAFTS
32  C     ENTRMID   REAL     ENTRAINMENT RATE FOR MIDLEVEL CONVECTION    !     CPRCON    REAL     COEFFICIENTS FOR DETERMINING CONVERSION
33  C     ENTRDD    REAL     ENTRAINMENT RATE FOR CUMULUS DOWNDRAFTS    !                        FROM CLOUD WATER TO RAIN
34  C     CMFCTOP   REAL     RELAT. CLOUD MASSFLUX AT LEVEL ABOVE NONBUOYANC  
35  C     CMFCMAX   REAL     MAXIMUM MASSFLUX VALUE ALLOWED FOR  end module yoecumf
 C     CMFCMIN   REAL     MINIMUM MASSFLUX VALUE (FOR SAFETY)  
 C     CMFDEPS   REAL     FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS  
 C     RHCDD     REAL     RELATIVE SATURATION IN DOWNDRAFTS  
 C     CPRCON    REAL     COEFFICIENTS FOR DETERMINING CONVERSION  
 C                        FROM CLOUD WATER TO RAIN  
 *ifend  
 C     ----------------------------------------------------------------  
Legend:
Removed from v.3  
changed lines
  Added in v.10
  ViewVC Help
Powered by ViewVC 1.1.21