phylmd/Conflx/YOECUMF.f90

module yoecumf

  ! From phylmd/YOECUMF.h, version 1.1.1.1 2004/05/19 12:53:07

  ! M. Tiedtke, ECMWF, 18th Jan. 1989
  ! Parameters for cumulus massflux scheme

  implicit none

  logical lmfpen ! penetrative convection switched on
  logical lmfscv ! shallow convection switched on
  logical lmfmid ! midlevel convection switched on
  logical lmfdd ! cumulus downdraft switched on
  logical lmfdudv ! cumulus friction switched on
  real entrpen ! entrainment rate for penetrative convection
  real entrscv ! entrainment rate for shallow convection
  real entrmid ! entrainment rate for midlevel convection
  real entrdd ! entrainment rate for cumulus downdrafts
  real cmfctop ! relative cloud massflux at level above nonbuoyanc level
  real cmfcmax ! maximum massflux value allowed for updrafts etc
  real cmfcmin ! minimum massflux value (for safety)
  real cmfdeps ! fractional massflux for downdrafts at lfs

  real rhcdd
  ! relative saturation in downdrafts (no longer used) (formulation
  ! implies saturation)

  real cprcon ! coefficients for determining conversion from cloud water to rain

contains

  SUBROUTINE flxsetup

    ! This routine defines disposable parameters for massflux scheme.

    !--------------------------------------------------------

    ENTRPEN = 1E-4
    ENTRSCV = 3E-4
    ENTRMID = 1E-4
    ENTRDD = 2E-4 
    CMFCTOP = 0.33
    CMFCMAX = 1.
    CMFCMIN = 1E-10
    CMFDEPS = 0.3
    CPRCON = 2E-4
    RHCDD = 1.
    LMFPEN = .TRUE.
    LMFSCV = .TRUE.
    LMFMID = .TRUE.
    LMFDD = .TRUE.
    LMFDUDV = .TRUE.

  END SUBROUTINE flxsetup

end module yoecumf
1	module yoecumf
2
3	! From phylmd/YOECUMF.h, version 1.1.1.1 2004/05/19 12:53:07
4
5	! M. Tiedtke, ECMWF, 18th Jan. 1989
6	! Parameters for cumulus massflux scheme
7
8	implicit none
9
10	logical lmfpen ! penetrative convection switched on
11	logical lmfscv ! shallow convection switched on
12	logical lmfmid ! midlevel convection switched on
13	logical lmfdd ! cumulus downdraft switched on
14	logical lmfdudv ! cumulus friction switched on
15	real entrpen ! entrainment rate for penetrative convection
16	real entrscv ! entrainment rate for shallow convection
17	real entrmid ! entrainment rate for midlevel convection
18	real entrdd ! entrainment rate for cumulus downdrafts
19	real cmfctop ! relative cloud massflux at level above nonbuoyanc level
20	real cmfcmax ! maximum massflux value allowed for updrafts etc
21	real cmfcmin ! minimum massflux value (for safety)
22	real cmfdeps ! fractional massflux for downdrafts at lfs
23
24	real rhcdd
25	! relative saturation in downdrafts (no longer used) (formulation
26	! implies saturation)
27
28	real cprcon ! coefficients for determining conversion from cloud water to rain
29
30	contains
31
32	SUBROUTINE flxsetup
33
34	! This routine defines disposable parameters for massflux scheme.
35
36	!--------------------------------------------------------
37
38	ENTRPEN = 1E-4
39	ENTRSCV = 3E-4
40	ENTRMID = 1E-4
41	ENTRDD = 2E-4
42	CMFCTOP = 0.33
43	CMFCMAX = 1.
44	CMFCMIN = 1E-10
45	CMFDEPS = 0.3
46	CPRCON = 2E-4
47	RHCDD = 1.
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