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 :: rrtmscheme = 1
28 INTEGER, PARAMETER :: gfdllwscheme = 99
29 INTEGER, PARAMETER :: swradscheme = 1
30 INTEGER, PARAMETER :: gsfcswscheme = 2
31 INTEGER, PARAMETER :: gfdlswscheme = 99
32 INTEGER, PARAMETER :: sfclayscheme = 1
33 INTEGER, PARAMETER :: myjsfcscheme = 2
34 INTEGER, PARAMETER :: gfssfcscheme = 3
35 INTEGER, PARAMETER :: slabscheme = 1
36 INTEGER, PARAMETER :: lsmscheme = 2
37 INTEGER, PARAMETER :: ruclsmscheme = 3
38 INTEGER, PARAMETER :: ysuscheme = 1
39 INTEGER, PARAMETER :: myjpblscheme = 2
40 INTEGER, PARAMETER :: gfsscheme = 3
41 INTEGER, PARAMETER :: mrfscheme = 99
42 INTEGER, PARAMETER :: kfetascheme = 1
43 INTEGER, PARAMETER :: bmjscheme = 2
44 INTEGER, PARAMETER :: gdscheme = 3
45 INTEGER, PARAMETER :: sasscheme = 4
46 INTEGER, PARAMETER :: kfscheme = 99
47 INTEGER, PARAMETER :: io_intio = 1
48 INTEGER, PARAMETER :: io_netcdf = 2
49 INTEGER, PARAMETER :: io_hdf = 3
50 INTEGER, PARAMETER :: io_phdf5 = 4
51 INTEGER, PARAMETER :: io_grib1 = 5
52 INTEGER, PARAMETER :: io_mcel = 6
53 INTEGER, PARAMETER :: io_esmf = 7
54 INTEGER, PARAMETER :: io_yyy = 8
55 INTEGER, PARAMETER :: io_zzz = 9
56 INTEGER, PARAMETER :: io_grib2 = 10
57 INTEGER, PARAMETER :: io_pnetcdf = 11
58 ! 4D array constants
59 INTEGER, PARAMETER :: PARAM_qv = 1
60 INTEGER :: P_qv = 1
61 LOGICAL :: F_qv = .FALSE.
62 INTEGER, PARAMETER :: PARAM_qc = 2
63 INTEGER :: P_qc = 1
64 LOGICAL :: F_qc = .FALSE.
65 INTEGER, PARAMETER :: PARAM_qr = 3
66 INTEGER :: P_qr = 1
67 LOGICAL :: F_qr = .FALSE.
68 INTEGER, PARAMETER :: PARAM_qi = 4
69 INTEGER :: P_qi = 1
70 LOGICAL :: F_qi = .FALSE.
71 INTEGER, PARAMETER :: PARAM_qs = 5
72 INTEGER :: P_qs = 1
73 LOGICAL :: F_qs = .FALSE.
74 INTEGER, PARAMETER :: PARAM_qg = 6
75 INTEGER :: P_qg = 1
76 LOGICAL :: F_qg = .FALSE.
77 INTEGER, PARAMETER :: PARAM_NUM_moist = 7
78 INTEGER :: NUM_moist = 1
79 INTEGER, PARAMETER :: PARAM_a_qv = 1
80 INTEGER :: P_a_qv = 1
81 LOGICAL :: F_a_qv = .FALSE.
82 INTEGER, PARAMETER :: PARAM_a_qc = 2
83 INTEGER :: P_a_qc = 1
84 LOGICAL :: F_a_qc = .FALSE.
85 INTEGER, PARAMETER :: PARAM_NUM_a_moist = 3
86 INTEGER :: NUM_a_moist = 1
87 INTEGER, PARAMETER :: PARAM_g_qv = 1
88 INTEGER :: P_g_qv = 1
89 LOGICAL :: F_g_qv = .FALSE.
90 INTEGER, PARAMETER :: PARAM_g_qc = 2
91 INTEGER :: P_g_qc = 1
92 LOGICAL :: F_g_qc = .FALSE.
93 INTEGER, PARAMETER :: PARAM_NUM_g_moist = 3
94 INTEGER :: NUM_g_moist = 1
95 INTEGER, PARAMETER :: PARAM_qni = 1
96 INTEGER :: P_qni = 1
97 LOGICAL :: F_qni = .FALSE.
98 INTEGER, PARAMETER :: PARAM_qt = 2
99 INTEGER :: P_qt = 1
100 LOGICAL :: F_qt = .FALSE.
101 INTEGER, PARAMETER :: PARAM_NUM_scalar = 3
102 INTEGER :: NUM_scalar = 1
103 INTEGER, PARAMETER :: PARAM_NUM_a_scalar = 1
104 INTEGER :: NUM_a_scalar = 1
105 INTEGER, PARAMETER :: PARAM_NUM_g_scalar = 1
106 INTEGER :: NUM_g_scalar = 1
107 INTEGER, PARAMETER :: P_XSB = 1
108 INTEGER, PARAMETER :: P_XEB = 2
109 INTEGER, PARAMETER :: P_YSB = 3
110 INTEGER, PARAMETER :: P_YEB = 4
111 INTEGER, PARAMETER :: NUM_TIME_LEVELS = 2
112 INTEGER , PARAMETER :: PARAM_FIRST_SCALAR = 2
113 CONTAINS
114 SUBROUTINE init_module_state_description
115 END SUBROUTINE init_module_state_description
116 END MODULE module_state_description
117 !ENDOFREGISTRYGENERATEDINCLUDE