/[lmdze]/trunk/phylmd/Conflx/YOECUMF.f
ViewVC logotype

Diff of /trunk/phylmd/Conflx/YOECUMF.f

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/Conflx/YOECUMF.f90 revision 70 by guez, Mon Jun 24 15:39:52 2013 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, version 1.1.1.1 2004/05/19 12:53:07
4  C     ----------------------------------------------------------------  
5  C*    *COMMON* *YOECUMF* - PARAMETERS FOR CUMULUS MASSFLUX SCHEME    ! M. Tiedtke, ECMWF, 18th Jan. 1989
6  C     ----------------------------------------------------------------    ! Parameters for cumulus massflux scheme
7  C  
8        COMMON /YOECUMF/    implicit none
9       L                 LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV,  
10       R                 ENTRPEN,ENTRSCV,ENTRMID,ENTRDD,CMFCTOP,    LOGICAL LMFPEN ! PENETRATIVE CONVECTION SWITCHED ON
11       R                 CMFCMAX,CMFCMIN,CMFDEPS,RHCDD,CPRCON    logical LMFSCV ! SHALLOW CONVECTION SWITCHED ON
12  C    logical LMFMID ! MIDLEVEL CONVECTION SWITCHED ON
13        LOGICAL          LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV    logical LMFDD ! CUMULUS DOWNDRAFT SWITCHED ON
14        REAL ENTRPEN, ENTRSCV, ENTRMID, ENTRDD    logical LMFDUDV ! CUMULUS FRICTION SWITCHED ON
15        REAL CMFCTOP, CMFCMAX, CMFCMIN, CMFDEPS, RHCDD, CPRCON    REAL ENTRPEN ! ENTRAINMENT RATE FOR PENETRATIVE CONVECTION
16  C    real ENTRSCV ! ENTRAINMENT RATE FOR SHALLOW CONVECTION
17  *if (DOC,declared) <> 'UNKNOWN'    real ENTRMID ! ENTRAINMENT RATE FOR MIDLEVEL CONVECTION
18  C*    *COMMON* *YOECUMF* - PARAMETERS FOR CUMULUS MASSFLUX SCHEME    real ENTRDD ! ENTRAINMENT RATE FOR CUMULUS DOWNDRAFTS
19  C    REAL CMFCTOP ! RELAT. CLOUD MASSFLUX AT LEVEL ABOVE NONBUOYANC
20  C     M.TIEDTKE       E. C. M. W. F.      18/1/89    real CMFCMAX ! MAXIMUM MASSFLUX VALUE ALLOWED FOR
21  C    real CMFCMIN ! MINIMUM MASSFLUX VALUE (FOR SAFETY)
22  C     NAME      TYPE      PURPOSE    real CMFDEPS ! FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS
23  C     ----      ----      -------    real RHCDD ! RELATIVE SATURATION IN DOWNDRAFTS
24  C    real CPRCON ! COEFFICIENTS FOR DETERMINING CONVERSION FROM CLOUD WATER TO RAIN
25  C     LMFPEN    LOGICAL  TRUE IF PENETRATIVE CONVECTION IS SWITCHED ON  
26  C     LMFSCV    LOGICAL  TRUE IF SHALLOW     CONVECTION IS SWITCHED ON  contains
27  C     LMFMID    LOGICAL  TRUE IF MIDLEVEL    CONVECTION IS SWITCHED ON  
28  C     LMFDD     LOGICAL  TRUE IF CUMULUS DOWNDRAFT      IS SWITCHED ON    SUBROUTINE flxsetup
29  C     LMFDUDV   LOGICAL  TRUE IF CUMULUS FRICTION       IS SWITCHED ON  
30  C     ENTRPEN   REAL     ENTRAINMENT RATE FOR PENETRATIVE CONVECTION      ! This routine defines disposable parameters for massflux scheme.
31  C     ENTRSCV   REAL     ENTRAINMENT RATE FOR SHALLOW CONVECTION  
32  C     ENTRMID   REAL     ENTRAINMENT RATE FOR MIDLEVEL CONVECTION      !--------------------------------------------------------
33  C     ENTRDD    REAL     ENTRAINMENT RATE FOR CUMULUS DOWNDRAFTS  
34  C     CMFCTOP   REAL     RELAT. CLOUD MASSFLUX AT LEVEL ABOVE NONBUOYANC      ENTRPEN = 1E-4 ! ENTRAINMENT RATE FOR PENETRATIVE CONVECTION
35  C     CMFCMAX   REAL     MAXIMUM MASSFLUX VALUE ALLOWED FOR      ENTRSCV = 3E-4 ! ENTRAINMENT RATE FOR SHALLOW CONVECTION
36  C     CMFCMIN   REAL     MINIMUM MASSFLUX VALUE (FOR SAFETY)      ENTRMID = 1E-4 ! ENTRAINMENT RATE FOR MIDLEVEL CONVECTION
37  C     CMFDEPS   REAL     FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS      ENTRDD = 2E-4 ! ENTRAINMENT RATE FOR DOWNDRAFTS
38  C     RHCDD     REAL     RELATIVE SATURATION IN DOWNDRAFTS      CMFCTOP = 0.33 ! RELATIVE CLOUD MASSFLUX AT LEVEL ABOVE NONBUO LEVEL
39  C     CPRCON    REAL     COEFFICIENTS FOR DETERMINING CONVERSION      CMFCMAX = 1. ! MAXIMUM MASSFLUX VALUE ALLOWED FOR UPDRAFTS ETC
40  C                        FROM CLOUD WATER TO RAIN      CMFCMIN = 1E-10 ! MINIMUM MASSFLUX VALUE (FOR SAFETY)
41  *ifend      CMFDEPS = 0.3 ! FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS
42  C     ----------------------------------------------------------------      CPRCON = 2E-4 ! CONVERSION FROM CLOUD WATER TO RAIN
43    
44        RHCDD = 1.
45        ! relative saturation in downdrafts (no longer used) (formulation
46        ! implies saturation)
47    
48        LMFPEN = .TRUE.
49        LMFSCV = .TRUE.
50        LMFMID = .TRUE.
51        LMFDD = .TRUE.
52        LMFDUDV = .TRUE.
53    
54      END SUBROUTINE flxsetup
55    
56    end module yoecumf
Legend:
Removed from v.3  
changed lines
  Added in v.70
  ViewVC Help
Powered by ViewVC 1.1.21