module_state_description.F
References to this file elsewhere.
1 !STARTOFREGISTRYGENERATEDINCLUDE 'frame/module_state_description.F'
2 !
3 ! WARNING This file is generated automatically by use_registry
4 ! using the data base in the file named Registry.
5 ! Do not edit. Your changes to this file will be lost.
6 !
7 MODULE module_state_description
8 ! package constants
9 INTEGER, PARAMETER :: dyn_nodyn = 0
10 INTEGER, PARAMETER :: dyn_em = 2
11 INTEGER, PARAMETER :: dyn_em_sn = 102
12 INTEGER, PARAMETER :: dyn_em_tl = 202
13 INTEGER, PARAMETER :: dyn_em_ad = 302
14 INTEGER, PARAMETER :: dyn_em_tst = 402
15 INTEGER, PARAMETER :: dyn_em_var = 502
16 INTEGER, PARAMETER :: passivec1 = 0
17 INTEGER, PARAMETER :: passiveqv = 0
18 INTEGER, PARAMETER :: kesslerscheme = 1
19 INTEGER, PARAMETER :: linscheme = 2
20 INTEGER, PARAMETER :: wsm3scheme = 3
21 INTEGER, PARAMETER :: wsm5scheme = 4
22 INTEGER, PARAMETER :: etampnew = 5
23 INTEGER, PARAMETER :: wsm6scheme = 6
24 INTEGER, PARAMETER :: ncepcloud3 = 98
25 INTEGER, PARAMETER :: ncepcloud5 = 99
26 INTEGER, PARAMETER :: thompson = 8
27 INTEGER, PARAMETER :: noprogn = 0
28 INTEGER, PARAMETER :: rrtmscheme = 1
29 INTEGER, PARAMETER :: gfdllwscheme = 99
30 INTEGER, PARAMETER :: swradscheme = 1
31 INTEGER, PARAMETER :: gsfcswscheme = 2
32 INTEGER, PARAMETER :: gfdlswscheme = 99
33 INTEGER, PARAMETER :: sfclayscheme = 1
34 INTEGER, PARAMETER :: myjsfcscheme = 2
35 INTEGER, PARAMETER :: gfssfcscheme = 3
36 INTEGER, PARAMETER :: slabscheme = 1
37 INTEGER, PARAMETER :: lsmscheme = 2
38 INTEGER, PARAMETER :: ruclsmscheme = 3
39 INTEGER, PARAMETER :: ysuscheme = 1
40 INTEGER, PARAMETER :: myjpblscheme = 2
41 INTEGER, PARAMETER :: gfsscheme = 3
42 INTEGER, PARAMETER :: mrfscheme = 99
43 INTEGER, PARAMETER :: kfetascheme = 1
44 INTEGER, PARAMETER :: bmjscheme = 2
45 INTEGER, PARAMETER :: gdscheme = 3
46 INTEGER, PARAMETER :: sasscheme = 4
47 INTEGER, PARAMETER :: kfscheme = 99
48 INTEGER, PARAMETER :: io_intio = 1
49 INTEGER, PARAMETER :: io_netcdf = 2
50 INTEGER, PARAMETER :: io_hdf = 3
51 INTEGER, PARAMETER :: io_phdf5 = 4
52 INTEGER, PARAMETER :: io_grib1 = 5
53 INTEGER, PARAMETER :: io_mcel = 6
54 INTEGER, PARAMETER :: io_esmf = 7
55 INTEGER, PARAMETER :: io_yyy = 8
56 INTEGER, PARAMETER :: io_zzz = 9
57 INTEGER, PARAMETER :: io_grib2 = 10
58 INTEGER, PARAMETER :: io_pnetcdf = 11
59 ! 4D array constants
60 INTEGER, PARAMETER :: PARAM_qv = 1
61 INTEGER :: P_qv = 1
62 LOGICAL :: F_qv = .FALSE.
63 INTEGER, PARAMETER :: PARAM_qc = 2
64 INTEGER :: P_qc = 1
65 LOGICAL :: F_qc = .FALSE.
66 INTEGER, PARAMETER :: PARAM_qr = 3
67 INTEGER :: P_qr = 1
68 LOGICAL :: F_qr = .FALSE.
69 INTEGER, PARAMETER :: PARAM_qi = 4
70 INTEGER :: P_qi = 1
71 LOGICAL :: F_qi = .FALSE.
72 INTEGER, PARAMETER :: PARAM_qs = 5
73 INTEGER :: P_qs = 1
74 LOGICAL :: F_qs = .FALSE.
75 INTEGER, PARAMETER :: PARAM_qg = 6
76 INTEGER :: P_qg = 1
77 LOGICAL :: F_qg = .FALSE.
78 INTEGER, PARAMETER :: PARAM_NUM_moist = 7
79 INTEGER :: NUM_moist = 1
80 INTEGER, PARAMETER :: PARAM_a_qv = 1
81 INTEGER :: P_a_qv = 1
82 LOGICAL :: F_a_qv = .FALSE.
83 INTEGER, PARAMETER :: PARAM_a_qc = 2
84 INTEGER :: P_a_qc = 1
85 LOGICAL :: F_a_qc = .FALSE.
86 INTEGER, PARAMETER :: PARAM_NUM_a_moist = 3
87 INTEGER :: NUM_a_moist = 1
88 INTEGER, PARAMETER :: PARAM_g_qv = 1
89 INTEGER :: P_g_qv = 1
90 LOGICAL :: F_g_qv = .FALSE.
91 INTEGER, PARAMETER :: PARAM_g_qc = 2
92 INTEGER :: P_g_qc = 1
93 LOGICAL :: F_g_qc = .FALSE.
94 INTEGER, PARAMETER :: PARAM_NUM_g_moist = 3
95 INTEGER :: NUM_g_moist = 1
96 INTEGER, PARAMETER :: PARAM_qni = 1
97 INTEGER :: P_qni = 1
98 LOGICAL :: F_qni = .FALSE.
99 INTEGER, PARAMETER :: PARAM_qt = 2
100 INTEGER :: P_qt = 1
101 LOGICAL :: F_qt = .FALSE.
102 INTEGER, PARAMETER :: PARAM_NUM_scalar = 3
103 INTEGER :: NUM_scalar = 1
104 INTEGER, PARAMETER :: PARAM_NUM_a_scalar = 1
105 INTEGER :: NUM_a_scalar = 1
106 INTEGER, PARAMETER :: PARAM_NUM_g_scalar = 1
107 INTEGER :: NUM_g_scalar = 1
108 INTEGER, PARAMETER :: P_XSB = 1
109 INTEGER, PARAMETER :: P_XEB = 2
110 INTEGER, PARAMETER :: P_YSB = 3
111 INTEGER, PARAMETER :: P_YEB = 4
112 INTEGER, PARAMETER :: NUM_TIME_LEVELS = 2
113 INTEGER , PARAMETER :: PARAM_FIRST_SCALAR = 2
114 CONTAINS
115 SUBROUTINE init_module_state_description
116 END SUBROUTINE init_module_state_description
117 END MODULE module_state_description
118 !ENDOFREGISTRYGENERATEDINCLUDE