UPP (develop)
Loading...
Searching...
No Matches
CMASSI.f
Go to the documentation of this file.
1
4 module cmassi_mod
5!- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
6 implicit none
7!
8!-----------------------------------------------------------------------
9 REAL, PARAMETER :: dmimin=.05e-3, &
10 dmimax=1.e-3, &
11 xmimin=1.e6*dmimin, &
12 xmimax=1.e6*dmimax
13
14 INTEGER, PARAMETER :: mdimin=xmimin, &
15 mdimax=xmimax
16
17!-----------------------------------------------------------------------
18
19 REAL massi(mdimin:mdimax)
20
21!--- Mean rain drop diameters vary from 50 microns to 1000 microns
23
24 REAL, PARAMETER :: dmrmin=.05e-3, &
25 deldmr=1.e-6, &
26 xmrmin=1.e6*dmrmin, &
27 n0r0=8.e6, &
28 n0rmin=1.e4
29
30 REAL dmrmax & !< Maximum mean rain drop diameter.
31 ,xmrmax
32
33 INTEGER, PARAMETER :: mdrmin=xmrmin
34 INTEGER mdrmax
35
36!
37!--- Various rain lookup tables
38!
39
40 REAL rqr_drmin & !< Rain content (kg/m**3) for mean drop diameter of .05 mm.
41 ,rqr_drmax & !< Rain content (kg/m**3) for mean drop diameter of 1.0 mm.
42 ,cn0r0 & !< Constant derived from N0r0.
43 ,cn0r_dmrmin & !< Minimum (starting) value for rain lookup tables for mean rain drop diameters.
44 ,cn0r_dmrmax
45
46!--- Other important parameters
47! (NLImax, FLARGE2 are used for the older version of the microphysics)
48!
49 REAL t_ice & !< Temperature (C) threshold at which all remaining liquid water is glaciated to ice.
50 ,nlimax & !< Maximum number concentrations (m**-3) of large ice (snow/graupel/sleet).
51 ,flarge2 & !< Set in MICROINIT.F (no longer used).
52 ,trad_ice
53
54
55 end module cmassi_mod