FV3 Bundle
NESDIS_SnowEM_Parameters.f90
Go to the documentation of this file.
1 !
2 ! NESDIS_SnowEM_Parameters
3 !
4 ! Module containing the parameters related to microwave snow emissivity model
5 !
6 !
7 ! CREATION HISTORY:
8 ! Written by: Banghua Yan, 03-Jun-2005
9 ! banghua.yan@noaa.gov
10 ! Fuzhong Weng
11 ! fuzhong.weng@noaa.gov
12 !
13 
14 MODULE nesdis_snowem_parameters
15 
16 
17  ! -----------------
18  ! Environment setup
19  ! -----------------
20  ! Module use
21  USE type_kinds, ONLY: fp
22  ! Disable implicit typing
23  IMPLICIT NONE
24 
25  ! ------------
26  ! Visibilities
27  ! ------------
28  PRIVATE
29 
30 
31  ! -----------------
32  ! Module parameters
33  ! -----------------
34  ! Version Id for the module
35  CHARACTER(*), PARAMETER :: module_version_id = &
36  '$Id: NESDIS_SnowEM_Parameters.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
37 
38  ! Snow types
39  INTEGER, PUBLIC, PARAMETER :: invalid_snow_type = -999
40  INTEGER, PUBLIC, PARAMETER :: wet_snow = 1
41  INTEGER, PUBLIC, PARAMETER :: grass_after_snow = 2
42  INTEGER, PUBLIC, PARAMETER :: rs_snow_a = 3
43  INTEGER, PUBLIC, PARAMETER :: powder_snow = 4
44  INTEGER, PUBLIC, PARAMETER :: rs_snow_b = 5
45  INTEGER, PUBLIC, PARAMETER :: rs_snow_c = 6
46  INTEGER, PUBLIC, PARAMETER :: rs_snow_d = 7
47  INTEGER, PUBLIC, PARAMETER :: thin_crust_snow = 8
48  INTEGER, PUBLIC, PARAMETER :: rs_snow_e = 9
49  INTEGER, PUBLIC, PARAMETER :: bottom_crust_snow_a = 10
50  INTEGER, PUBLIC, PARAMETER :: shallow_snow = 11
51  INTEGER, PUBLIC, PARAMETER :: deep_snow = 12
52  INTEGER, PUBLIC, PARAMETER :: crust_snow = 13
53  INTEGER, PUBLIC, PARAMETER :: medium_snow = 14
54  INTEGER, PUBLIC, PARAMETER :: bottom_crust_snow_b = 15
55  INTEGER, PUBLIC, PARAMETER :: thick_crust_snow = 16
56 
57  INTEGER, PUBLIC, PARAMETER :: n_frequency = 10
58  INTEGER, PUBLIC, PARAMETER :: n_freq_amsre = 7
59 
60 
61 
62 
63  REAL(fp), PUBLIC, PARAMETER, DIMENSION (N_FREQUENCY) :: &
64  frequency_default = (/ 4.9_fp, 6.93_fp, 10.65_fp, 18.7_fp,23.8_fp, &
65  31.4_fp, 50.3_fp, 52.5_fp, 89.0_fp,150._fp/)
66 
67 
68 
69  ! Define sixteen MW weighted emissivity spectra for AMSU ALGORITHMS
70 
71  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
72  wet_snow_emiss = (/0.87_fp,0.89_fp,0.91_fp,0.93_fp,0.94_fp, &
73  0.94_fp,0.94_fp,0.93_fp,0.92_fp,0.90_fp/)
74 
75  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
76  grass_after_snow_emiss = (/0.91_fp,0.91_fp,0.92_fp,0.91_fp, &
77  0.90_fp,0.90_fp,0.91_fp,0.91_fp, &
78  0.91_fp,0.86_fp/)
79 
80  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
81  rs_snow_a_emiss = (/0.90_fp,0.89_fp,0.88_fp,0.87_fp, 0.86_fp, &
82  0.86_fp,0.85_fp,0.85_fp,0.82_fp,0.82_fp/)
83 
84  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
85  powder_snow_emiss = (/0.91_fp,0.91_fp,0.93_fp,0.93_fp,0.93_fp, &
86  0.93_fp,0.89_fp,0.88_fp,0.79_fp,0.79_fp/)
87 
88  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
89  rs_snow_b_emiss = (/0.90_fp,0.89_fp,0.88_fp,0.85_fp,0.84_fp, &
90  0.83_fp,0.83_fp,0.82_fp,0.79_fp,0.73_fp/)
91 
92  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
93  rs_snow_c_emiss = (/0.90_fp,0.89_fp,0.86_fp,0.82_fp,0.80_fp, &
94  0.79_fp,0.78_fp,0.78_fp,0.77_fp,0.77_fp/)
95 
96  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
97  rs_snow_d_emiss = (/0.88_fp,0.86_fp,0.85_fp,0.80_fp,0.78_fp, &
98  0.77_fp,0.77_fp,0.76_fp,0.72_fp,0.72_fp/)
99 
100  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
101  thin_crust_snow_emiss = (/0.93_fp,0.94_fp,0.96_fp,0.96_fp,0.95_fp, &
102  0.93_fp,0.87_fp,0.86_fp,0.74_fp,0.65_fp/)
103 
104  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
105  rs_snow_e_emiss = (/0.87_fp,0.86_fp,0.84_fp,0.80_fp,0.76_fp, &
106  0.76_fp,0.75_fp,0.75_fp,0.70_fp,0.69_fp/)
107 
108  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
109  bottom_crust_snow_a_emiss = (/0.87_fp,0.86_fp,0.83_fp,0.77_fp, &
110  0.73_fp,0.68_fp,0.66_fp,0.66_fp, &
111  0.68_fp,0.67_fp/)
112 
113  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
114  shallow_snow_emiss = (/0.89_fp,0.89_fp,0.88_fp,0.87_fp, 0.86_fp, &
115  0.82_fp,0.77_fp,0.76_fp,0.69_fp,0.64_fp/)
116 
117  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
118  deep_snow_emiss = (/0.88_fp,0.87_fp,0.86_fp,0.83_fp,0.81_fp, &
119  0.77_fp,0.74_fp,0.73_fp,0.69_fp,0.64_fp/)
120 
121  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
122  crust_snow_emiss = (/0.86_fp,0.86_fp,0.86_fp,0.85_fp,0.82_fp, &
123  0.78_fp,0.69_fp,0.68_fp,0.51_fp,0.47_fp/)
124 
125  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
126  medium_snow_emiss = (/0.89_fp,0.88_fp,0.87_fp,0.83_fp,0.80_fp, &
127  0.75_fp,0.70_fp,0.70_fp,0.64_fp,0.60_fp/)
128 
129  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
130  bottom_crust_snow_b_emiss = (/0.91_fp,0.92_fp,0.93_fp,0.88_fp, &
131  0.84_fp,0.76_fp,0.66_fp,0.64_fp, &
132  0.48_fp,0.44_fp/)
133 
134  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQUENCY) :: &
135  thick_crust_snow_emiss = (/0.94_fp,0.95_fp,0.97_fp,0.91_fp, &
136  0.86_fp,0.74_fp,0.63_fp,0.63_fp, &
137  0.50_fp,0.45_fp/)
138 
139 
140 !
141  REAL(fp), PUBLIC, PARAMETER, DIMENSION (N_FREQ_AMSRE) :: &
142  frequency_amsre = (/ 6.925_fp, 10.65_fp, 18.7_fp,23.8_fp, &
143  36.5_fp, 89.0_fp,150._fp/)
144 
145 
146  ! Define sixteen MW weighted emissivity spectra for AMSRE ALGORITHMS
147 
148  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
149  wet_snow_em_amsre = (/0.91_fp, 0.93_fp, 0.94_fp, 0.95_fp, 0.95_fp, &
150  0.93_fp, 0.93_fp/)
151 
152  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
153  grass_after_snow_em_amsre = (/0.91_fp, 0.92_fp, 0.91_fp, 0.90_fp, &
154  0.91_fp, 0.91_fp, 0.91_fp/)
155 
156  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
157  rs_snow_a_em_amsre = (/0.90_fp, 0.89_fp, 0.88_fp, 0.87_fp, 0.86_fp, &
158  0.82_fp, 0.82_fp/)
159 
160  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
161  powder_snow_em_amsre = (/0.92_fp, 0.93_fp, 0.94_fp, 0.94_fp, 0.92_fp, &
162  0.80_fp, 0.80_fp/)
163 
164  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
165  rs_snow_b_em_amsre = (/0.87_fp, 0.86_fp, 0.83_fp, 0.80_fp, 0.79_fp, &
166  0.77_fp, 0.77_fp/)
167 
168  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
169  rs_snow_c_em_amsre = (/0.89_fp, 0.88_fp, 0.85_fp, 0.84_fp, 0.83_fp, &
170  0.79_fp, 0.79_fp/)
171 
172  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
173  rs_snow_d_em_amsre = (/0.84_fp, 0.83_fp, 0.82_fp, 0.80_fp, &
174  0.78_fp, 0.72_fp, 0.72_fp/)
175 
176 
177  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
178  thin_crust_snow_em_amsre = (/0.95_fp, 0.96_fp, 0.96_fp, 0.95_fp, &
179  0.91_fp, 0.75_fp, 0.75_fp/)
180 
181  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
182  rs_snow_e_em_amsre = (/0.80_fp, 0.80_fp, 0.80_fp, 0.79_fp, &
183  0.75_fp, 0.70_fp, 0.70_fp/)
184 
185  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
186  bottom_crust_snow_a_em_amsre = (/0.91_fp, 0.90_fp, 0.89_fp, 0.87_fp, &
187  0.82_fp, 0.69_fp, 0.69_fp/)
188 
189  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
190  shallow_snow_em_amsre = (/0.90_fp, 0.89_fp, 0.85_fp,0.82_fp, 0.76_fp, &
191  0.65_fp, 0.65_fp/)
192 
193  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
194  deep_snow_em_amsre = (/0.89_fp, 0.88_fp, 0.86_fp, 0.83_fp, 0.78_fp, &
195  0.70_fp, 0.70_fp/)
196 
197  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
198  crust_snow_em_amsre = (/0.88_fp, 0.86_fp, 0.80_fp, 0.75_fp, 0.69_fp, &
199  0.67_fp, 0.67_fp/)
200 
201  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
202  medium_snow_em_amsre = (/0.96_fp, 0.97_fp, 0.92_fp, 0.87_fp, 0.72_fp, &
203  0.50_fp, 0.50_fp/)
204 
205 
206  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
207  bottom_crust_snow_b_em_amsre = (/0.93_fp, 0.94_fp, 0.89_fp, 0.85_fp, &
208  0.74_fp, 0.48_fp, 0.48_fp/)
209 
210  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
211  thick_crust_snow_em_amsre = (/0.88_fp, 0.88_fp, 0.87_fp, 0.85_fp, &
212  0.77_fp, 0.52_fp, 0.52_fp/)
213 
214 
215 
216  ! Define sixteen MW H-POL emissivity spectra for AMSRE ALGORITHMS
217 
218 
219  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
220  wet_snow_eh_amsre = (/0.93_fp, 0.92_fp, 0.93_fp, 0.94_fp, 0.93_fp, &
221  0.93_fp, 0.90_fp/)
222 
223  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
224  grass_after_snow_eh_amsre = (/0.91_fp, 0.90_fp, 0.90_fp, 0.90_fp, &
225  0.91_fp, 0.90_fp, 0.85_fp/)
226 
227  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
228  rs_snow_a_eh_amsre = (/0.85_fp, 0.85_fp, 0.84_fp, 0.84_fp, 0.82_fp, &
229  0.80_fp, 0.80_fp/)
230 
231 
232  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
233  powder_snow_eh_amsre = (/0.90_fp, 0.90_fp, 0.92_fp, 0.92_fp, 0.90_fp, &
234  0.80_fp, 0.79_fp/)
235 
236  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
237  rs_snow_b_eh_amsre = (/0.82_fp, 0.81_fp, 0.77_fp, 0.76_fp, 0.74_fp, &
238  0.74_fp, 0.74_fp/)
239 
240  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
241  rs_snow_c_eh_amsre = (/0.84_fp, 0.83_fp, 0.80_fp, 0.78_fp, 0.77_fp, &
242  0.75_fp, 0.69_fp/)
243 
244  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
245  rs_snow_d_eh_amsre = (/0.77_fp, 0.77_fp, 0.76_fp, 0.75_fp, 0.73_fp, &
246  0.71_fp, 0.71_fp/)
247 
248 
249  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
250  thin_crust_snow_eh_amsre = (/0.95_fp, 0.94_fp, 0.95_fp, 0.94_fp, &
251  0.89_fp, 0.75_fp, 0.65_fp/)
252 
253  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
254  rs_snow_e_eh_amsre = (/0.73_fp, 0.73_fp, 0.74_fp, 0.72_fp, 0.71_fp, &
255  0.68_fp, 0.67_fp/)
256 
257  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
258  bottom_crust_snow_a_eh_amsre = (/0.88_fp, 0.87_fp, 0.86_fp, 0.85_fp, &
259  0.80_fp, 0.68_fp, 0.63_fp/)
260 
261  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
262  shallow_snow_eh_amsre = (/0.86_fp, 0.84_fp, 0.80_fp, 0.78_fp, &
263  0.72_fp, 0.62_fp, 0.57_fp/)
264 
265  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
266  deep_snow_eh_amsre = (/0.87_fp, 0.85_fp, 0.83_fp, 0.80_fp, 0.77_fp, &
267  0.68_fp, 0.62_fp/)
268 
269 
270  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
271  crust_snow_eh_amsre = (/0.82_fp, 0.78_fp, 0.74_fp, 0.71_fp, 0.67_fp, &
272  0.64_fp, 0.64_fp/)
273 
274  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
275  medium_snow_eh_amsre = (/0.90_fp, 0.90_fp, 0.89_fp, 0.88_fp, 0.83_fp, &
276  0.53_fp, 0.48_fp/)
277 
278 
279  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
280  bottom_crust_snow_b_eh_amsre = (/0.87_fp, 0.85_fp, 0.84_fp, 0.82_fp, &
281  0.74_fp, 0.53_fp, 0.49_fp/)
282 
283  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
284  thick_crust_snow_eh_amsre = (/0.85_fp, 0.84_fp, 0.83_fp, 0.81_fp, &
285  0.79_fp, 0.51_fp, 0.46_fp/)
286 
287 
288 
289  ! Define sixteen MW V-POL emissivity spectra for AMSRE ALGORITHMS
290 
291  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
292  wet_snow_ev_amsre = (/0.96_fp, 0.94_fp, 0.96_fp, 0.95_fp, 0.94_fp, &
293  0.94_fp, 0.91_fp/)
294 
295  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
296  grass_after_snow_ev_amsre = (/0.96_fp, 0.94_fp, 0.95_fp, 0.96_fp, &
297  0.96_fp, 0.92_fp, 0.87_fp/)
298 
299  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
300  rs_snow_a_ev_amsre = (/0.99_fp, 0.97_fp, 0.96_fp, 0.96_fp, 0.93_fp, &
301  0.87_fp, 0.87_fp/)
302 
303 
304  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
305  powder_snow_ev_amsre = (/0.98_fp, 0.97_fp, 0.99_fp, 0.98_fp, 0.96_fp, &
306  0.84_fp, 0.83_fp/)
307 
308  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
309  rs_snow_b_ev_amsre = (/0.97_fp, 0.95_fp, 0.93_fp, 0.92_fp, 0.89_fp, &
310  0.84_fp,0.84_fp/)
311 
312  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
313  rs_snow_c_ev_amsre = (/1.00_fp, 0.97_fp, 0.96_fp, 0.94_fp, 0.91_fp, &
314  0.84_fp, 0.78_fp/)
315 
316  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
317  rs_snow_d_ev_amsre = (/0.99_fp, 0.96_fp, 0.93_fp, 0.90_fp, 0.86_fp, &
318  0.80_fp, 0.80_fp/)
319 
320 
321  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
322  thin_crust_snow_ev_amsre = (/0.98_fp, 0.97_fp, 0.98_fp, 0.97_fp, &
323  0.92_fp, 0.77_fp, 0.67_fp/)
324 
325 
326  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
327  rs_snow_e_ev_amsre = (/0.98_fp, 0.95_fp, 0.90_fp, 0.86_fp, 0.82_fp, &
328  0.74_fp, 0.73_fp/)
329 
330  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
331  bottom_crust_snow_a_ev_amsre = (/0.96_fp, 0.95_fp, 0.95_fp, 0.93_fp, &
332  0.87_fp, 0.71_fp, 0.66_fp/)
333 
334  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
335  shallow_snow_ev_amsre = (/0.97_fp, 0.95_fp, 0.94_fp, 0.90_fp, 0.84_fp, &
336  0.68_fp, 0.63_fp/)
337 
338  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
339  deep_snow_ev_amsre = (/0.96_fp, 0.94_fp, 0.92_fp, 0.90_fp, 0.85_fp, &
340  0.77_fp, 0.71_fp/)
341 
342 
343  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
344  crust_snow_ev_amsre = (/0.98_fp, 0.96_fp, 0.93_fp, 0.90_fp, 0.81_fp, &
345  0.71_fp, 0.71_fp/)
346 
347  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
348  medium_snow_ev_amsre = (/0.99_fp, 0.97_fp, 0.98_fp, 0.96_fp, 0.92_fp, &
349  0.57_fp, 0.52_fp/)
350 
351 
352  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
353  bottom_crust_snow_b_ev_amsre = (/1.00_fp, 0.97_fp, 0.97_fp, 0.95_fp, &
354  0.86_fp, 0.58_fp, 0.54_fp/)
355 
356  REAL(fp), PUBLIC, PARAMETER, DIMENSION(N_FREQ_AMSRE) :: &
357  thick_crust_snow_ev_amsre = (/0.98_fp, 0.96_fp, 0.96_fp, 0.94_fp, &
358  0.89_fp, 0.56_fp, 0.51_fp/)
359 
360 
361 END MODULE nesdis_snowem_parameters
nesdis_snowem_parameters::grass_after_snow
integer, parameter, public grass_after_snow
Definition: NESDIS_SnowEM_Parameters.f90:41
nesdis_snowem_parameters::thick_crust_snow
integer, parameter, public thick_crust_snow
Definition: NESDIS_SnowEM_Parameters.f90:55
nesdis_snowem_parameters::crust_snow
integer, parameter, public crust_snow
Definition: NESDIS_SnowEM_Parameters.f90:52
nesdis_snowem_parameters::crust_snow_emiss
real(fp), dimension(n_frequency), parameter, public crust_snow_emiss
Definition: NESDIS_SnowEM_Parameters.f90:121
nesdis_snowem_parameters::bottom_crust_snow_a_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public bottom_crust_snow_a_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:185
nesdis_snowem_parameters::wet_snow_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public wet_snow_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:291
nesdis_snowem_parameters::shallow_snow_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public shallow_snow_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:189
nesdis_snowem_parameters::shallow_snow_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public shallow_snow_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:261
nesdis_snowem_parameters::powder_snow_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public powder_snow_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:160
nesdis_snowem_parameters::bottom_crust_snow_b_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public bottom_crust_snow_b_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:352
nesdis_snowem_parameters::frequency_default
real(fp), dimension(n_frequency), parameter, public frequency_default
Definition: NESDIS_SnowEM_Parameters.f90:63
nesdis_snowem_parameters::rs_snow_a_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_a_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:156
nesdis_snowem_parameters::n_freq_amsre
integer, parameter, public n_freq_amsre
Definition: NESDIS_SnowEM_Parameters.f90:58
type_kinds::fp
integer, parameter, public fp
Definition: Type_Kinds.f90:124
nesdis_snowem_parameters::frequency_amsre
real(fp), dimension(n_freq_amsre), parameter, public frequency_amsre
Definition: NESDIS_SnowEM_Parameters.f90:141
nesdis_snowem_parameters::shallow_snow_emiss
real(fp), dimension(n_frequency), parameter, public shallow_snow_emiss
Definition: NESDIS_SnowEM_Parameters.f90:113
nesdis_snowem_parameters::rs_snow_c_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_c_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:240
nesdis_snowem_parameters::n_frequency
integer, parameter, public n_frequency
Definition: NESDIS_SnowEM_Parameters.f90:57
nesdis_snowem_parameters::rs_snow_e
integer, parameter, public rs_snow_e
Definition: NESDIS_SnowEM_Parameters.f90:48
nesdis_snowem_parameters::deep_snow_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public deep_snow_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:338
nesdis_snowem_parameters::rs_snow_e_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_e_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:326
nesdis_snowem_parameters::rs_snow_e_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_e_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:181
nesdis_snowem_parameters::powder_snow_emiss
real(fp), dimension(n_frequency), parameter, public powder_snow_emiss
Definition: NESDIS_SnowEM_Parameters.f90:84
nesdis_snowem_parameters::bottom_crust_snow_a_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public bottom_crust_snow_a_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:330
nesdis_snowem_parameters::invalid_snow_type
integer, parameter, public invalid_snow_type
Definition: NESDIS_SnowEM_Parameters.f90:39
nesdis_snowem_parameters::medium_snow
integer, parameter, public medium_snow
Definition: NESDIS_SnowEM_Parameters.f90:53
nesdis_snowem_parameters::crust_snow_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public crust_snow_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:270
nesdis_snowem_parameters::bottom_crust_snow_a_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public bottom_crust_snow_a_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:257
nesdis_snowem_parameters::wet_snow_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public wet_snow_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:219
nesdis_snowem_parameters::bottom_crust_snow_b_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public bottom_crust_snow_b_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:206
nesdis_snowem_parameters::grass_after_snow_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public grass_after_snow_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:295
nesdis_snowem_parameters::rs_snow_d_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_d_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:316
nesdis_snowem_parameters::rs_snow_c_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_c_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:312
nesdis_snowem_parameters::rs_snow_a
integer, parameter, public rs_snow_a
Definition: NESDIS_SnowEM_Parameters.f90:42
nesdis_snowem_parameters::crust_snow_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public crust_snow_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:343
nesdis_snowem_parameters::rs_snow_b_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_b_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:236
nesdis_snowem_parameters::shallow_snow_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public shallow_snow_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:334
nesdis_snowem_parameters::rs_snow_c
integer, parameter, public rs_snow_c
Definition: NESDIS_SnowEM_Parameters.f90:45
nesdis_snowem_parameters::rs_snow_e_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_e_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:253
nesdis_snowem_parameters::medium_snow_emiss
real(fp), dimension(n_frequency), parameter, public medium_snow_emiss
Definition: NESDIS_SnowEM_Parameters.f90:125
nesdis_snowem_parameters::deep_snow
integer, parameter, public deep_snow
Definition: NESDIS_SnowEM_Parameters.f90:51
nesdis_snowem_parameters::rs_snow_b_emiss
real(fp), dimension(n_frequency), parameter, public rs_snow_b_emiss
Definition: NESDIS_SnowEM_Parameters.f90:88
nesdis_snowem_parameters::rs_snow_d_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_d_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:172
nesdis_snowem_parameters::bottom_crust_snow_b_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public bottom_crust_snow_b_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:279
nesdis_snowem_parameters::medium_snow_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public medium_snow_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:347
nesdis_snowem_parameters::crust_snow_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public crust_snow_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:197
nesdis_snowem_parameters::rs_snow_b_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_b_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:164
nesdis_snowem_parameters::wet_snow_emiss
real(fp), dimension(n_frequency), parameter, public wet_snow_emiss
Definition: NESDIS_SnowEM_Parameters.f90:71
nesdis_snowem_parameters::thin_crust_snow_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public thin_crust_snow_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:321
nesdis_snowem_parameters::medium_snow_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public medium_snow_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:201
nesdis_snowem_parameters::rs_snow_c_emiss
real(fp), dimension(n_frequency), parameter, public rs_snow_c_emiss
Definition: NESDIS_SnowEM_Parameters.f90:92
nesdis_snowem_parameters::powder_snow
integer, parameter, public powder_snow
Definition: NESDIS_SnowEM_Parameters.f90:43
nesdis_snowem_parameters::rs_snow_a_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_a_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:227
nesdis_snowem_parameters::grass_after_snow_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public grass_after_snow_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:152
nesdis_snowem_parameters::thick_crust_snow_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public thick_crust_snow_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:210
nesdis_snowem_parameters::medium_snow_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public medium_snow_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:274
nesdis_snowem_parameters::rs_snow_c_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_c_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:168
nesdis_snowem_parameters::rs_snow_d
integer, parameter, public rs_snow_d
Definition: NESDIS_SnowEM_Parameters.f90:46
nesdis_snowem_parameters::grass_after_snow_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public grass_after_snow_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:223
nesdis_snowem_parameters::powder_snow_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public powder_snow_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:304
nesdis_snowem_parameters::rs_snow_a_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_a_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:299
nesdis_snowem_parameters::rs_snow_d_emiss
real(fp), dimension(n_frequency), parameter, public rs_snow_d_emiss
Definition: NESDIS_SnowEM_Parameters.f90:96
nesdis_snowem_parameters::rs_snow_b_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_b_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:308
nesdis_snowem_parameters::rs_snow_b
integer, parameter, public rs_snow_b
Definition: NESDIS_SnowEM_Parameters.f90:44
type_kinds
Definition: Type_Kinds.f90:12
nesdis_snowem_parameters::shallow_snow
integer, parameter, public shallow_snow
Definition: NESDIS_SnowEM_Parameters.f90:50
nesdis_snowem_parameters::wet_snow_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public wet_snow_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:148
nesdis_snowem_parameters::bottom_crust_snow_b
integer, parameter, public bottom_crust_snow_b
Definition: NESDIS_SnowEM_Parameters.f90:54
nesdis_snowem_parameters::thin_crust_snow_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public thin_crust_snow_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:249
nesdis_snowem_parameters::deep_snow_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public deep_snow_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:193
nesdis_snowem_parameters::thick_crust_snow_emiss
real(fp), dimension(n_frequency), parameter, public thick_crust_snow_emiss
Definition: NESDIS_SnowEM_Parameters.f90:134
nesdis_snowem_parameters::powder_snow_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public powder_snow_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:232
nesdis_snowem_parameters::deep_snow_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public deep_snow_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:265
nesdis_snowem_parameters::rs_snow_e_emiss
real(fp), dimension(n_frequency), parameter, public rs_snow_e_emiss
Definition: NESDIS_SnowEM_Parameters.f90:104
nesdis_snowem_parameters::wet_snow
integer, parameter, public wet_snow
Definition: NESDIS_SnowEM_Parameters.f90:40
nesdis_snowem_parameters::thin_crust_snow_em_amsre
real(fp), dimension(n_freq_amsre), parameter, public thin_crust_snow_em_amsre
Definition: NESDIS_SnowEM_Parameters.f90:177
nesdis_snowem_parameters::deep_snow_emiss
real(fp), dimension(n_frequency), parameter, public deep_snow_emiss
Definition: NESDIS_SnowEM_Parameters.f90:117
nesdis_snowem_parameters::thick_crust_snow_ev_amsre
real(fp), dimension(n_freq_amsre), parameter, public thick_crust_snow_ev_amsre
Definition: NESDIS_SnowEM_Parameters.f90:356
nesdis_snowem_parameters::grass_after_snow_emiss
real(fp), dimension(n_frequency), parameter, public grass_after_snow_emiss
Definition: NESDIS_SnowEM_Parameters.f90:75
nesdis_snowem_parameters::bottom_crust_snow_b_emiss
real(fp), dimension(n_frequency), parameter, public bottom_crust_snow_b_emiss
Definition: NESDIS_SnowEM_Parameters.f90:129
nesdis_snowem_parameters::module_version_id
character(*), parameter module_version_id
Definition: NESDIS_SnowEM_Parameters.f90:35
nesdis_snowem_parameters::thick_crust_snow_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public thick_crust_snow_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:283
nesdis_snowem_parameters::rs_snow_d_eh_amsre
real(fp), dimension(n_freq_amsre), parameter, public rs_snow_d_eh_amsre
Definition: NESDIS_SnowEM_Parameters.f90:244
nesdis_snowem_parameters::bottom_crust_snow_a
integer, parameter, public bottom_crust_snow_a
Definition: NESDIS_SnowEM_Parameters.f90:49
nesdis_snowem_parameters::bottom_crust_snow_a_emiss
real(fp), dimension(n_frequency), parameter, public bottom_crust_snow_a_emiss
Definition: NESDIS_SnowEM_Parameters.f90:108
nesdis_snowem_parameters
Definition: NESDIS_SnowEM_Parameters.f90:14
nesdis_snowem_parameters::thin_crust_snow
integer, parameter, public thin_crust_snow
Definition: NESDIS_SnowEM_Parameters.f90:47
nesdis_snowem_parameters::rs_snow_a_emiss
real(fp), dimension(n_frequency), parameter, public rs_snow_a_emiss
Definition: NESDIS_SnowEM_Parameters.f90:80
nesdis_snowem_parameters::thin_crust_snow_emiss
real(fp), dimension(n_frequency), parameter, public thin_crust_snow_emiss
Definition: NESDIS_SnowEM_Parameters.f90:100