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

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

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

trunk/libf/phylmd/YOECUMF.f90 revision 10 by guez, Fri Apr 18 14:45:53 2008 UTC trunk/libf/phylmd/Conflx/YOECUMF.f90 revision 64 by guez, Wed Aug 29 14:47:17 2012 UTC
# Line 1  Line 1 
1  module yoecumf  module yoecumf
2    
3    ! From phylmd/YOECUMF.h,v 1.1.1.1 2004/05/19 12:53:07    ! From phylmd/YOECUMF.h, version 1.1.1.1 2004/05/19 12:53:07
4    
5    ! PARAMETERS FOR CUMULUS MASSFLUX SCHEME    ! M. Tiedtke, E. C. M. W. F., 18th Jan. 1989
6      ! Parameters for cumulus massflux scheme
7    
8    implicit none    implicit none
9    
10    LOGICAL          LMFPEN,LMFSCV,LMFMID,LMFDD,LMFDUDV    LOGICAL LMFPEN ! PENETRATIVE CONVECTION SWITCHED ON
11    REAL ENTRPEN, ENTRSCV, ENTRMID, ENTRDD    logical LMFSCV ! SHALLOW CONVECTION SWITCHED ON
12    REAL CMFCTOP, CMFCMAX, CMFCMIN, CMFDEPS, RHCDD, CPRCON    logical LMFMID ! MIDLEVEL CONVECTION SWITCHED ON
13      logical LMFDD ! CUMULUS DOWNDRAFT SWITCHED ON
14    !     M.TIEDTKE       E. C. M. W. F.      18/1/89    logical LMFDUDV ! CUMULUS FRICTION SWITCHED ON
15    !    REAL ENTRPEN ! ENTRAINMENT RATE FOR PENETRATIVE CONVECTION
16    !     NAME      TYPE      PURPOSE    real ENTRSCV ! ENTRAINMENT RATE FOR SHALLOW CONVECTION
17    !     ----      ----      -------    real ENTRMID ! ENTRAINMENT RATE FOR MIDLEVEL CONVECTION
18    !    real ENTRDD ! ENTRAINMENT RATE FOR CUMULUS DOWNDRAFTS
19    !     LMFPEN    LOGICAL  TRUE IF PENETRATIVE CONVECTION IS SWITCHED ON    REAL CMFCTOP ! RELAT. CLOUD MASSFLUX AT LEVEL ABOVE NONBUOYANC
20    !     LMFSCV    LOGICAL  TRUE IF SHALLOW     CONVECTION IS SWITCHED ON    real CMFCMAX ! MAXIMUM MASSFLUX VALUE ALLOWED FOR
21    !     LMFMID    LOGICAL  TRUE IF MIDLEVEL    CONVECTION IS SWITCHED ON    real CMFCMIN ! MINIMUM MASSFLUX VALUE (FOR SAFETY)
22    !     LMFDD     LOGICAL  TRUE IF CUMULUS DOWNDRAFT      IS SWITCHED ON    real CMFDEPS ! FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS
23    !     LMFDUDV   LOGICAL  TRUE IF CUMULUS FRICTION       IS SWITCHED ON    real RHCDD ! RELATIVE SATURATION IN DOWNDRAFTS
24    !     ENTRPEN   REAL     ENTRAINMENT RATE FOR PENETRATIVE CONVECTION    real CPRCON ! COEFFICIENTS FOR DETERMINING CONVERSION FROM CLOUD WATER TO RAIN
25    !     ENTRSCV   REAL     ENTRAINMENT RATE FOR SHALLOW CONVECTION  
26    !     ENTRMID   REAL     ENTRAINMENT RATE FOR MIDLEVEL CONVECTION  contains
27    !     ENTRDD    REAL     ENTRAINMENT RATE FOR CUMULUS DOWNDRAFTS  
28    !     CMFCTOP   REAL     RELAT. CLOUD MASSFLUX AT LEVEL ABOVE NONBUOYANC    SUBROUTINE flxsetup
29    !     CMFCMAX   REAL     MAXIMUM MASSFLUX VALUE ALLOWED FOR  
30    !     CMFCMIN   REAL     MINIMUM MASSFLUX VALUE (FOR SAFETY)      ! This routine defines disposable parameters for massflux scheme.
31    !     CMFDEPS   REAL     FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS  
32    !     RHCDD     REAL     RELATIVE SATURATION IN DOWNDRAFTS      !--------------------------------------------------------
33    !     CPRCON    REAL     COEFFICIENTS FOR DETERMINING CONVERSION  
34    !                        FROM CLOUD WATER TO RAIN      ENTRPEN = 1E-4 ! ENTRAINMENT RATE FOR PENETRATIVE CONVECTION
35        ENTRSCV = 3E-4 ! ENTRAINMENT RATE FOR SHALLOW CONVECTION
36        ENTRMID = 1E-4 ! ENTRAINMENT RATE FOR MIDLEVEL CONVECTION
37        ENTRDD = 2E-4 ! ENTRAINMENT RATE FOR DOWNDRAFTS
38        CMFCTOP = 0.33 ! RELATIVE CLOUD MASSFLUX AT LEVEL ABOVE NONBUO LEVEL
39        CMFCMAX = 1. ! MAXIMUM MASSFLUX VALUE ALLOWED FOR UPDRAFTS ETC
40        CMFCMIN = 1E-10 ! MINIMUM MASSFLUX VALUE (FOR SAFETY)
41        CMFDEPS = 0.3 ! FRACTIONAL MASSFLUX FOR DOWNDRAFTS AT LFS
42        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  end module yoecumf

Legend:
Removed from v.10  
changed lines
  Added in v.64

  ViewVC Help
Powered by ViewVC 1.1.21