FV3 Bundle
CRTM_SensorInfo.f90
Go to the documentation of this file.
1 !
2 ! CRTM_SensorInfo
3 !
4 ! Module of sensor information parameters definitions for the CRTM.
5 !
6 !
7 ! CREATION HISTORY:
8 ! Written by: Paul van Delst, CIMSS/SSEC 26-Jun-2005
9 ! paul.vandelst@ssec.wisc.edu
10 
12 
13  ! -----------------
14  ! Environment setup
15  ! -----------------
16  ! Modules
20  ! Disable implicit typing
21  IMPLICIT NONE
22 
23 
24  ! ------------
25  ! Visibilities
26  ! ------------
27  PRIVATE
29 
30 
31  ! -----------------
32  ! Module parameters
33  ! -----------------
34  CHARACTER(*), PARAMETER :: module_rcs_id = &
35  '$Id: CRTM_SensorInfo.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
36  ! WMO SENSOR codes from COMMON CODE TABLE C-8
37  INTEGER, PUBLIC, PARAMETER :: wmo_hirs2 = 605
38  INTEGER, PUBLIC, PARAMETER :: wmo_msu = 623
39  INTEGER, PUBLIC, PARAMETER :: wmo_avhrr2 = 590
40  INTEGER, PUBLIC, PARAMETER :: wmo_hirs3 = 606
41  INTEGER, PUBLIC, PARAMETER :: wmo_amsua = 570
42  INTEGER, PUBLIC, PARAMETER :: wmo_amsub = 574
43  INTEGER, PUBLIC, PARAMETER :: wmo_avhrr3 = 591
44  INTEGER, PUBLIC, PARAMETER :: wmo_mhs = 203
45  INTEGER, PUBLIC, PARAMETER :: wmo_vas = 630
46  INTEGER, PUBLIC, PARAMETER :: wmo_sounder = 626
47  INTEGER, PUBLIC, PARAMETER :: wmo_imager = 615
48  INTEGER, PUBLIC, PARAMETER :: wmo_ssmi = 905
49  INTEGER, PUBLIC, PARAMETER :: wmo_ssmt1 = 906
50  INTEGER, PUBLIC, PARAMETER :: wmo_ssmt2 = 907
51  INTEGER, PUBLIC, PARAMETER :: wmo_ssmis = 908
52  INTEGER, PUBLIC, PARAMETER :: wmo_modis = 389
53  INTEGER, PUBLIC, PARAMETER :: wmo_hsb = 246
54  INTEGER, PUBLIC, PARAMETER :: wmo_amsre = 345
55  INTEGER, PUBLIC, PARAMETER :: wmo_airs = 420
56  INTEGER, PUBLIC, PARAMETER :: wmo_vissr = 489
57  INTEGER, PUBLIC, PARAMETER :: wmo_mviri = 205
58  INTEGER, PUBLIC, PARAMETER :: wmo_seviri = 207
59  INTEGER, PUBLIC, PARAMETER :: wmo_abi = invalid_wmo_sensor_id
60  INTEGER, PUBLIC, PARAMETER :: wmo_windsat = invalid_wmo_sensor_id
61  INTEGER, PUBLIC, PARAMETER :: wmo_atms = 621
62  INTEGER, PUBLIC, PARAMETER :: wmo_iasi = 221
63 
64  ! WMO SATELLITE codes from COMMON CODE TABLE C-5
65  INTEGER, PUBLIC, PARAMETER :: wmo_tirosn = 708
66  INTEGER, PUBLIC, PARAMETER :: wmo_noaa05 = wmo_tirosn
67  INTEGER, PUBLIC, PARAMETER :: wmo_noaa06 = 706
68  INTEGER, PUBLIC, PARAMETER :: wmo_noaa07 = 707
69  INTEGER, PUBLIC, PARAMETER :: wmo_noaa08 = 200
70  INTEGER, PUBLIC, PARAMETER :: wmo_noaa09 = 201
71  INTEGER, PUBLIC, PARAMETER :: wmo_noaa10 = 202
72  INTEGER, PUBLIC, PARAMETER :: wmo_noaa11 = 203
73  INTEGER, PUBLIC, PARAMETER :: wmo_noaa12 = 204
74  INTEGER, PUBLIC, PARAMETER :: wmo_noaa14 = 205
75  INTEGER, PUBLIC, PARAMETER :: wmo_noaa15 = 206
76  INTEGER, PUBLIC, PARAMETER :: wmo_noaa16 = 207
77  INTEGER, PUBLIC, PARAMETER :: wmo_noaa17 = 208
78  INTEGER, PUBLIC, PARAMETER :: wmo_noaa18 = 209
79  INTEGER, PUBLIC, PARAMETER :: wmo_noaa19 = 223
80  INTEGER, PUBLIC, PARAMETER :: wmo_metopa = 4
81  INTEGER, PUBLIC, PARAMETER :: wmo_metopb = 3
82  INTEGER, PUBLIC, PARAMETER :: wmo_metopc = 5
83  INTEGER, PUBLIC, PARAMETER :: wmo_goes04 = 734
84  INTEGER, PUBLIC, PARAMETER :: wmo_goes05 = 735
85  INTEGER, PUBLIC, PARAMETER :: wmo_goes06 = 250
86  INTEGER, PUBLIC, PARAMETER :: wmo_goes07 = 251
87  INTEGER, PUBLIC, PARAMETER :: wmo_goes08 = 252
88  INTEGER, PUBLIC, PARAMETER :: wmo_goes09 = 253
89  INTEGER, PUBLIC, PARAMETER :: wmo_goes10 = 254
90  INTEGER, PUBLIC, PARAMETER :: wmo_goes11 = 255
91  INTEGER, PUBLIC, PARAMETER :: wmo_goes12 = 256
92  INTEGER, PUBLIC, PARAMETER :: wmo_goes13 = 257
93  INTEGER, PUBLIC, PARAMETER :: wmo_dmsp13 = 246
94  INTEGER, PUBLIC, PARAMETER :: wmo_dmsp14 = 247
95  INTEGER, PUBLIC, PARAMETER :: wmo_dmsp15 = 248
96  INTEGER, PUBLIC, PARAMETER :: wmo_dmsp16 = 249
97  INTEGER, PUBLIC, PARAMETER :: wmo_dmsp17 = 285
98  INTEGER, PUBLIC, PARAMETER :: wmo_dmsp18 = 246
99  INTEGER, PUBLIC, PARAMETER :: wmo_dmsp19 = invalid_wmo_satellite_id
100  INTEGER, PUBLIC, PARAMETER :: wmo_dmsp20 = invalid_wmo_satellite_id
101  INTEGER, PUBLIC, PARAMETER :: wmo_terra = 783
102  INTEGER, PUBLIC, PARAMETER :: wmo_aqua = 784
103  INTEGER, PUBLIC, PARAMETER :: wmo_gms5 = 152
104  INTEGER, PUBLIC, PARAMETER :: wmo_meteosat03 = 50
105  INTEGER, PUBLIC, PARAMETER :: wmo_meteosat04 = 51
106  INTEGER, PUBLIC, PARAMETER :: wmo_meteosat05 = 52
107  INTEGER, PUBLIC, PARAMETER :: wmo_meteosat06 = 53
108  INTEGER, PUBLIC, PARAMETER :: wmo_meteosat07 = 54
109  INTEGER, PUBLIC, PARAMETER :: wmo_meteosat08 = 55
110  INTEGER, PUBLIC, PARAMETER :: wmo_meteosat09 = 56
111  INTEGER, PUBLIC, PARAMETER :: wmo_meteosat10 = 57
112  INTEGER, PUBLIC, PARAMETER :: wmo_meteosat11 = 70
113  INTEGER, PUBLIC, PARAMETER :: wmo_goesr = invalid_wmo_satellite_id
114  INTEGER, PUBLIC, PARAMETER :: wmo_coriolis = invalid_wmo_satellite_id
115  INTEGER, PUBLIC, PARAMETER :: wmo_npoessc1 = 224
116 
117 CONTAINS
118 
119  FUNCTION crtm_get_sensorattributes( Sensor_Id , & ! Input
120  nChannels , & ! Optional output
121  nFOVs , & ! Optional output
122  Detector , & ! Optional output
123  WMO_Sensor_Id , & ! Optional output
124  WMO_Satellite_Id, & ! Optional output
125  SensorName , & ! Optional output
126  SatelliteName , & ! Optional output
127  RCS_Id , & ! Version control
128  Message_Log ) & ! Error messaging
129  result( error_status )
130  ! Arguments
131  CHARACTER(*), INTENT(IN) :: sensor_id
132  INTEGER, OPTIONAL, INTENT(OUT) :: nchannels
133  INTEGER, OPTIONAL, INTENT(OUT) :: nfovs
134  INTEGER, OPTIONAL, INTENT(OUT) :: detector
135  INTEGER, OPTIONAL, INTENT(OUT) :: wmo_sensor_id
136  INTEGER, OPTIONAL, INTENT(OUT) :: wmo_satellite_id
137  CHARACTER(*), OPTIONAL, INTENT(OUT) :: sensorname
138  CHARACTER(*), OPTIONAL, INTENT(OUT) :: satellitename
139  CHARACTER(*), OPTIONAL, INTENT(OUT) :: rcs_id
140  CHARACTER(*), OPTIONAL, INTENT(IN) :: message_log
141  ! Function result
142  INTEGER :: error_status
143  ! Local parameters
144  CHARACTER(*), PARAMETER :: routine_name='CRTM_Get_SensorAttributes'
145  INTEGER, PARAMETER :: sl=20
146  ! Local variables
147  INTEGER :: local_nchannels
148  INTEGER :: local_nfovs
149  INTEGER :: local_detector
150  INTEGER :: local_wmo_sensor_id
151  INTEGER :: local_wmo_satellite_id
152  CHARACTER(SL) :: local_sensorname
153  CHARACTER(SL) :: local_satellitename
154 
155  ! Set up
156  error_status = success
157  IF ( PRESENT(rcs_id) ) rcs_id = module_rcs_id
158  ! Defaults
159  local_nchannels = 0
160  local_nfovs = 0
161  local_detector = -1
162  local_wmo_sensor_id = invalid_wmo_sensor_id
163  local_wmo_satellite_id = invalid_wmo_satellite_id
164  local_sensorname = 'NONE'
165  local_satellitename = 'NONE'
166 
167  ! Search for sensor attributes
168  ! This humungous CASE construct will have to be replaced, but for now it'll do.
169  ! The code below was created from the Create_SensorInfo_Code.f90 program
170  SELECT CASE (trim(adjustl(sensor_id)))
171  CASE('hirs2_n05')
172  local_nchannels = 19
173  local_nfovs = -1
174  local_detector = -1
175  local_wmo_sensor_id = 605
176  local_wmo_satellite_id = 708
177  local_sensorname = 'HIRS/2'
178  local_satellitename = 'TIROS-N'
179  CASE('msu_n05')
180  local_nchannels = 4
181  local_nfovs = -1
182  local_detector = -1
183  local_wmo_sensor_id = 623
184  local_wmo_satellite_id = 708
185  local_sensorname = 'MSU'
186  local_satellitename = 'TIROS-N'
187  CASE('ssu_n05')
188  local_nchannels = 3
189  local_nfovs = -1
190  local_detector = -1
191  local_wmo_sensor_id = 627
192  local_wmo_satellite_id = 708
193  local_sensorname = 'SSU'
194  local_satellitename = 'TIROS-N'
195  CASE('avhrr2_n05')
196  local_nchannels = 2
197  local_nfovs = -1
198  local_detector = -1
199  local_wmo_sensor_id = 590
200  local_wmo_satellite_id = 708
201  local_sensorname = 'AVHRR/2'
202  local_satellitename = 'TIROS-N'
203  CASE('hirs2_n06')
204  local_nchannels = 19
205  local_nfovs = -1
206  local_detector = -1
207  local_wmo_sensor_id = 605
208  local_wmo_satellite_id = 706
209  local_sensorname = 'HIRS/2'
210  local_satellitename = 'NOAA-06'
211  CASE('msu_n06')
212  local_nchannels = 4
213  local_nfovs = -1
214  local_detector = -1
215  local_wmo_sensor_id = 623
216  local_wmo_satellite_id = 706
217  local_sensorname = 'MSU'
218  local_satellitename = 'NOAA-06'
219  CASE('ssu_n06')
220  local_nchannels = 3
221  local_nfovs = -1
222  local_detector = -1
223  local_wmo_sensor_id = 627
224  local_wmo_satellite_id = 706
225  local_sensorname = 'SSU'
226  local_satellitename = 'NOAA-06'
227  CASE('avhrr2_n06')
228  local_nchannels = 2
229  local_nfovs = -1
230  local_detector = -1
231  local_wmo_sensor_id = 590
232  local_wmo_satellite_id = 706
233  local_sensorname = 'AVHRR/2'
234  local_satellitename = 'NOAA-06'
235  CASE('hirs2_n07')
236  local_nchannels = 19
237  local_nfovs = -1
238  local_detector = -1
239  local_wmo_sensor_id = 605
240  local_wmo_satellite_id = 707
241  local_sensorname = 'HIRS/2'
242  local_satellitename = 'NOAA-07'
243  CASE('msu_n07')
244  local_nchannels = 4
245  local_nfovs = -1
246  local_detector = -1
247  local_wmo_sensor_id = 623
248  local_wmo_satellite_id = 707
249  local_sensorname = 'MSU'
250  local_satellitename = 'NOAA-07'
251  CASE('ssu_n07')
252  local_nchannels = 3
253  local_nfovs = -1
254  local_detector = -1
255  local_wmo_sensor_id = 627
256  local_wmo_satellite_id = 707
257  local_sensorname = 'SSU'
258  local_satellitename = 'NOAA-07'
259  CASE('avhrr2_n07')
260  local_nchannels = 3
261  local_nfovs = -1
262  local_detector = -1
263  local_wmo_sensor_id = 590
264  local_wmo_satellite_id = 707
265  local_sensorname = 'AVHRR/2'
266  local_satellitename = 'NOAA-07'
267  CASE('hirs2_n08')
268  local_nchannels = 19
269  local_nfovs = -1
270  local_detector = -1
271  local_wmo_sensor_id = 605
272  local_wmo_satellite_id = 200
273  local_sensorname = 'HIRS/2'
274  local_satellitename = 'NOAA-08'
275  CASE('msu_n08')
276  local_nchannels = 4
277  local_nfovs = -1
278  local_detector = -1
279  local_wmo_sensor_id = 623
280  local_wmo_satellite_id = 200
281  local_sensorname = 'MSU'
282  local_satellitename = 'NOAA-08'
283  CASE('ssu_n08')
284  local_nchannels = 3
285  local_nfovs = -1
286  local_detector = -1
287  local_wmo_sensor_id = 627
288  local_wmo_satellite_id = 200
289  local_sensorname = 'SSU'
290  local_satellitename = 'NOAA-08'
291  CASE('avhrr2_n08')
292  local_nchannels = 2
293  local_nfovs = -1
294  local_detector = -1
295  local_wmo_sensor_id = 590
296  local_wmo_satellite_id = 200
297  local_sensorname = 'AVHRR/2'
298  local_satellitename = 'NOAA-08'
299  CASE('hirs2_n09')
300  local_nchannels = 19
301  local_nfovs = -1
302  local_detector = -1
303  local_wmo_sensor_id = 605
304  local_wmo_satellite_id = 201
305  local_sensorname = 'HIRS/2'
306  local_satellitename = 'NOAA-09'
307  CASE('msu_n09')
308  local_nchannels = 4
309  local_nfovs = -1
310  local_detector = -1
311  local_wmo_sensor_id = 623
312  local_wmo_satellite_id = 201
313  local_sensorname = 'MSU'
314  local_satellitename = 'NOAA-09'
315  CASE('ssu_n09')
316  local_nchannels = 3
317  local_nfovs = -1
318  local_detector = -1
319  local_wmo_sensor_id = 627
320  local_wmo_satellite_id = 201
321  local_sensorname = 'SSU'
322  local_satellitename = 'NOAA-09'
323  CASE('avhrr2_n09')
324  local_nchannels = 3
325  local_nfovs = -1
326  local_detector = -1
327  local_wmo_sensor_id = 590
328  local_wmo_satellite_id = 201
329  local_sensorname = 'AVHRR/2'
330  local_satellitename = 'NOAA-09'
331  CASE('hirs2_n10')
332  local_nchannels = 19
333  local_nfovs = -1
334  local_detector = -1
335  local_wmo_sensor_id = 605
336  local_wmo_satellite_id = 202
337  local_sensorname = 'HIRS/2'
338  local_satellitename = 'NOAA-10'
339  CASE('msu_n10')
340  local_nchannels = 4
341  local_nfovs = -1
342  local_detector = -1
343  local_wmo_sensor_id = 623
344  local_wmo_satellite_id = 202
345  local_sensorname = 'MSU'
346  local_satellitename = 'NOAA-10'
347  CASE('avhrr2_n10')
348  local_nchannels = 2
349  local_nfovs = -1
350  local_detector = -1
351  local_wmo_sensor_id = 590
352  local_wmo_satellite_id = 202
353  local_sensorname = 'AVHRR/2'
354  local_satellitename = 'NOAA-10'
355  CASE('hirs2_n11')
356  local_nchannels = 19
357  local_nfovs = -1
358  local_detector = -1
359  local_wmo_sensor_id = 605
360  local_wmo_satellite_id = 203
361  local_sensorname = 'HIRS/2'
362  local_satellitename = 'NOAA-11'
363  CASE('msu_n11')
364  local_nchannels = 4
365  local_nfovs = -1
366  local_detector = -1
367  local_wmo_sensor_id = 623
368  local_wmo_satellite_id = 203
369  local_sensorname = 'MSU'
370  local_satellitename = 'NOAA-11'
371  CASE('ssu_n11')
372  local_nchannels = 3
373  local_nfovs = -1
374  local_detector = -1
375  local_wmo_sensor_id = 627
376  local_wmo_satellite_id = 203
377  local_sensorname = 'SSU'
378  local_satellitename = 'NOAA-11'
379  CASE('avhrr2_n11')
380  local_nchannels = 3
381  local_nfovs = -1
382  local_detector = -1
383  local_wmo_sensor_id = 590
384  local_wmo_satellite_id = 203
385  local_sensorname = 'AVHRR/2'
386  local_satellitename = 'NOAA-11'
387  CASE('hirs2_n12')
388  local_nchannels = 19
389  local_nfovs = -1
390  local_detector = -1
391  local_wmo_sensor_id = 605
392  local_wmo_satellite_id = 204
393  local_sensorname = 'HIRS/2'
394  local_satellitename = 'NOAA-12'
395  CASE('msu_n12')
396  local_nchannels = 4
397  local_nfovs = -1
398  local_detector = -1
399  local_wmo_sensor_id = 623
400  local_wmo_satellite_id = 204
401  local_sensorname = 'MSU'
402  local_satellitename = 'NOAA-12'
403  CASE('avhrr2_n12')
404  local_nchannels = 3
405  local_nfovs = -1
406  local_detector = -1
407  local_wmo_sensor_id = 590
408  local_wmo_satellite_id = 204
409  local_sensorname = 'AVHRR/2'
410  local_satellitename = 'NOAA-12'
411  CASE('hirs2_n14')
412  local_nchannels = 19
413  local_nfovs = -1
414  local_detector = -1
415  local_wmo_sensor_id = 605
416  local_wmo_satellite_id = 205
417  local_sensorname = 'HIRS/2'
418  local_satellitename = 'NOAA-14'
419  CASE('msu_n14')
420  local_nchannels = 4
421  local_nfovs = -1
422  local_detector = -1
423  local_wmo_sensor_id = 623
424  local_wmo_satellite_id = 205
425  local_sensorname = 'MSU'
426  local_satellitename = 'NOAA-14'
427  CASE('ssu_n14')
428  local_nchannels = 3
429  local_nfovs = -1
430  local_detector = -1
431  local_wmo_sensor_id = 627
432  local_wmo_satellite_id = 205
433  local_sensorname = 'SSU'
434  local_satellitename = 'NOAA-14'
435  CASE('avhrr2_n14')
436  local_nchannels = 3
437  local_nfovs = -1
438  local_detector = -1
439  local_wmo_sensor_id = 590
440  local_wmo_satellite_id = 205
441  local_sensorname = 'AVHRR/2'
442  local_satellitename = 'NOAA-14'
443  CASE('hirs3_n15')
444  local_nchannels = 19
445  local_nfovs = -1
446  local_detector = -1
447  local_wmo_sensor_id = 606
448  local_wmo_satellite_id = 206
449  local_sensorname = 'HIRS/3'
450  local_satellitename = 'NOAA-15'
451  CASE('amsua_n15')
452  local_nchannels = 15
453  local_nfovs = -1
454  local_detector = -1
455  local_wmo_sensor_id = 570
456  local_wmo_satellite_id = 206
457  local_sensorname = 'AMSU-A'
458  local_satellitename = 'NOAA-15'
459  CASE('amsub_n15')
460  local_nchannels = 5
461  local_nfovs = -1
462  local_detector = -1
463  local_wmo_sensor_id = 574
464  local_wmo_satellite_id = 206
465  local_sensorname = 'AMSU-B'
466  local_satellitename = 'NOAA-15'
467  CASE('avhrr3_n15')
468  local_nchannels = 3
469  local_nfovs = -1
470  local_detector = -1
471  local_wmo_sensor_id = 591
472  local_wmo_satellite_id = 206
473  local_sensorname = 'AVHRR/3'
474  local_satellitename = 'NOAA-15'
475  CASE('hirs3_n16')
476  local_nchannels = 19
477  local_nfovs = -1
478  local_detector = -1
479  local_wmo_sensor_id = 606
480  local_wmo_satellite_id = 207
481  local_sensorname = 'HIRS/3'
482  local_satellitename = 'NOAA-16'
483  CASE('amsua_n16')
484  local_nchannels = 15
485  local_nfovs = -1
486  local_detector = -1
487  local_wmo_sensor_id = 570
488  local_wmo_satellite_id = 207
489  local_sensorname = 'AMSU-A'
490  local_satellitename = 'NOAA-16'
491  CASE('amsub_n16')
492  local_nchannels = 5
493  local_nfovs = -1
494  local_detector = -1
495  local_wmo_sensor_id = 574
496  local_wmo_satellite_id = 207
497  local_sensorname = 'AMSU-B'
498  local_satellitename = 'NOAA-16'
499  CASE('avhrr3_n16')
500  local_nchannels = 3
501  local_nfovs = -1
502  local_detector = -1
503  local_wmo_sensor_id = 591
504  local_wmo_satellite_id = 207
505  local_sensorname = 'AVHRR/3'
506  local_satellitename = 'NOAA-16'
507  CASE('hirs3_n17')
508  local_nchannels = 19
509  local_nfovs = -1
510  local_detector = -1
511  local_wmo_sensor_id = 606
512  local_wmo_satellite_id = 208
513  local_sensorname = 'HIRS/3'
514  local_satellitename = 'NOAA-17'
515  CASE('amsua_n17')
516  local_nchannels = 15
517  local_nfovs = -1
518  local_detector = -1
519  local_wmo_sensor_id = 570
520  local_wmo_satellite_id = 208
521  local_sensorname = 'AMSU-A'
522  local_satellitename = 'NOAA-17'
523  CASE('amsub_n17')
524  local_nchannels = 5
525  local_nfovs = -1
526  local_detector = -1
527  local_wmo_sensor_id = 574
528  local_wmo_satellite_id = 208
529  local_sensorname = 'AMSU-B'
530  local_satellitename = 'NOAA-17'
531  CASE('avhrr3_n17')
532  local_nchannels = 3
533  local_nfovs = -1
534  local_detector = -1
535  local_wmo_sensor_id = 591
536  local_wmo_satellite_id = 208
537  local_sensorname = 'AVHRR/3'
538  local_satellitename = 'NOAA-17'
539  CASE('hirs4_n18')
540  local_nchannels = 19
541  local_nfovs = -1
542  local_detector = -1
543  local_wmo_sensor_id = 607
544  local_wmo_satellite_id = 209
545  local_sensorname = 'HIRS/4'
546  local_satellitename = 'NOAA-18'
547  CASE('amsua_n18')
548  local_nchannels = 15
549  local_nfovs = -1
550  local_detector = -1
551  local_wmo_sensor_id = 570
552  local_wmo_satellite_id = 209
553  local_sensorname = 'AMSU-A'
554  local_satellitename = 'NOAA-18'
555  CASE('mhs_n18')
556  local_nchannels = 5
557  local_nfovs = -1
558  local_detector = -1
559  local_wmo_sensor_id = 203
560  local_wmo_satellite_id = 209
561  local_sensorname = 'MHS'
562  local_satellitename = 'NOAA-18'
563  CASE('avhrr3_n18')
564  local_nchannels = 3
565  local_nfovs = -1
566  local_detector = -1
567  local_wmo_sensor_id = 591
568  local_wmo_satellite_id = 209
569  local_sensorname = 'AVHRR/3'
570  local_satellitename = 'NOAA-18'
571  CASE('amsua_n19')
572  local_nchannels = 15
573  local_nfovs = -1
574  local_detector = -1
575  local_wmo_sensor_id = 570
576  local_wmo_satellite_id = 210
577  local_sensorname = 'AMSU-A'
578  local_satellitename = 'NOAA-19'
579  CASE('mhs_n19')
580  local_nchannels = 5
581  local_nfovs = -1
582  local_detector = -1
583  local_wmo_sensor_id = 203
584  local_wmo_satellite_id = 210
585  local_sensorname = 'MHS'
586  local_satellitename = 'NOAA-19'
587  CASE('hirs4_metop-a')
588  local_nchannels = 19
589  local_nfovs = -1
590  local_detector = -1
591  local_wmo_sensor_id = 607
592  local_wmo_satellite_id = 4
593  local_sensorname = 'HIRS/4'
594  local_satellitename = 'MetOp-A'
595  CASE('avhrr3_metop-a')
596  local_nchannels = 3
597  local_nfovs = -1
598  local_detector = -1
599  local_wmo_sensor_id = 591
600  local_wmo_satellite_id = 4
601  local_sensorname = 'AVHRR/3'
602  local_satellitename = 'MetOp-A'
603  CASE('amsua_metop-a')
604  local_nchannels = 15
605  local_nfovs = -1
606  local_detector = -1
607  local_wmo_sensor_id = 570
608  local_wmo_satellite_id = 4
609  local_sensorname = 'AMSU-A'
610  local_satellitename = 'MetOp-A'
611  CASE('mhs_metop-a')
612  local_nchannels = 5
613  local_nfovs = -1
614  local_detector = -1
615  local_wmo_sensor_id = 203
616  local_wmo_satellite_id = 4
617  local_sensorname = 'MHS'
618  local_satellitename = 'MetOp-A'
619  CASE('amsua_metop-b')
620  local_nchannels = 15
621  local_nfovs = -1
622  local_detector = -1
623  local_wmo_sensor_id = 570
624  local_wmo_satellite_id = 3
625  local_sensorname = 'AMSU-A'
626  local_satellitename = 'MetOp-B'
627  CASE('mhs_metop-b')
628  local_nchannels = 5
629  local_nfovs = -1
630  local_detector = -1
631  local_wmo_sensor_id = 203
632  local_wmo_satellite_id = 3
633  local_sensorname = 'MHS'
634  local_satellitename = 'MetOp-B'
635  CASE('amsua_metop-c')
636  local_nchannels = 15
637  local_nfovs = -1
638  local_detector = -1
639  local_wmo_sensor_id = 570
640  local_wmo_satellite_id = 5
641  local_sensorname = 'AMSU-A'
642  local_satellitename = 'MetOp-C'
643  CASE('mhs_metop-c')
644  local_nchannels = 5
645  local_nfovs = -1
646  local_detector = -1
647  local_wmo_sensor_id = 203
648  local_wmo_satellite_id = 5
649  local_sensorname = 'MHS'
650  local_satellitename = 'MetOp-C'
651  CASE('vas_g04')
652  local_nchannels = 12
653  local_nfovs = -1
654  local_detector = -1
655  local_wmo_sensor_id = 630
656  local_wmo_satellite_id = 734
657  local_sensorname = 'VAS'
658  local_satellitename = 'GOES-04'
659  CASE('vas_g05')
660  local_nchannels = 12
661  local_nfovs = -1
662  local_detector = -1
663  local_wmo_sensor_id = 630
664  local_wmo_satellite_id = 735
665  local_sensorname = 'VAS'
666  local_satellitename = 'GOES-05'
667  CASE('vas_g06')
668  local_nchannels = 12
669  local_nfovs = -1
670  local_detector = -1
671  local_wmo_sensor_id = 630
672  local_wmo_satellite_id = 250
673  local_sensorname = 'VAS'
674  local_satellitename = 'GOES-06'
675  CASE('vas_g07')
676  local_nchannels = 12
677  local_nfovs = -1
678  local_detector = -1
679  local_wmo_sensor_id = 630
680  local_wmo_satellite_id = 251
681  local_sensorname = 'VAS'
682  local_satellitename = 'GOES-07'
683  CASE('sndr_g08')
684  local_nchannels = 18
685  local_nfovs = -1
686  local_detector = -1
687  local_wmo_sensor_id = 626
688  local_wmo_satellite_id = 252
689  local_sensorname = 'SOUNDER'
690  local_satellitename = 'GOES-08'
691  CASE('imgr_g08')
692  local_nchannels = 4
693  local_nfovs = -1
694  local_detector = -1
695  local_wmo_sensor_id = 615
696  local_wmo_satellite_id = 252
697  local_sensorname = 'IMAGER'
698  local_satellitename = 'GOES-08'
699  CASE('sndr_g09')
700  local_nchannels = 18
701  local_nfovs = -1
702  local_detector = -1
703  local_wmo_sensor_id = 626
704  local_wmo_satellite_id = 253
705  local_sensorname = 'SOUNDER'
706  local_satellitename = 'GOES-09'
707  CASE('imgr_g09')
708  local_nchannels = 4
709  local_nfovs = -1
710  local_detector = -1
711  local_wmo_sensor_id = 615
712  local_wmo_satellite_id = 253
713  local_sensorname = 'IMAGER'
714  local_satellitename = 'GOES-09'
715  CASE('sndr_g10')
716  local_nchannels = 18
717  local_nfovs = -1
718  local_detector = -1
719  local_wmo_sensor_id = 626
720  local_wmo_satellite_id = 254
721  local_sensorname = 'SOUNDER'
722  local_satellitename = 'GOES-10'
723  CASE('sndrD1_g10')
724  local_nchannels = 18
725  local_nfovs = -1
726  local_detector = -1
727  local_wmo_sensor_id = 626
728  local_wmo_satellite_id = 254
729  local_sensorname = 'SOUNDER'
730  local_satellitename = 'GOES-10'
731  CASE('sndrD2_g10')
732  local_nchannels = 18
733  local_nfovs = -1
734  local_detector = -1
735  local_wmo_sensor_id = 626
736  local_wmo_satellite_id = 254
737  local_sensorname = 'SOUNDER'
738  local_satellitename = 'GOES-10'
739  CASE('sndrD3_g10')
740  local_nchannels = 18
741  local_nfovs = -1
742  local_detector = -1
743  local_wmo_sensor_id = 626
744  local_wmo_satellite_id = 254
745  local_sensorname = 'SOUNDER'
746  local_satellitename = 'GOES-10'
747  CASE('sndrD4_g10')
748  local_nchannels = 18
749  local_nfovs = -1
750  local_detector = -1
751  local_wmo_sensor_id = 626
752  local_wmo_satellite_id = 254
753  local_sensorname = 'SOUNDER'
754  local_satellitename = 'GOES-10'
755  CASE('imgr_g10')
756  local_nchannels = 4
757  local_nfovs = -1
758  local_detector = -1
759  local_wmo_sensor_id = 615
760  local_wmo_satellite_id = 254
761  local_sensorname = 'IMAGER'
762  local_satellitename = 'GOES-10'
763  CASE('sndr_g11')
764  local_nchannels = 18
765  local_nfovs = -1
766  local_detector = -1
767  local_wmo_sensor_id = 626
768  local_wmo_satellite_id = 255
769  local_sensorname = 'SOUNDER'
770  local_satellitename = 'GOES-11'
771  CASE('sndrD1_g11')
772  local_nchannels = 18
773  local_nfovs = -1
774  local_detector = -1
775  local_wmo_sensor_id = 626
776  local_wmo_satellite_id = 255
777  local_sensorname = 'SOUNDER'
778  local_satellitename = 'GOES-11'
779  CASE('sndrD2_g11')
780  local_nchannels = 18
781  local_nfovs = -1
782  local_detector = -1
783  local_wmo_sensor_id = 626
784  local_wmo_satellite_id = 255
785  local_sensorname = 'SOUNDER'
786  local_satellitename = 'GOES-11'
787  CASE('sndrD3_g11')
788  local_nchannels = 18
789  local_nfovs = -1
790  local_detector = -1
791  local_wmo_sensor_id = 626
792  local_wmo_satellite_id = 255
793  local_sensorname = 'SOUNDER'
794  local_satellitename = 'GOES-11'
795  CASE('sndrD4_g11')
796  local_nchannels = 18
797  local_nfovs = -1
798  local_detector = -1
799  local_wmo_sensor_id = 626
800  local_wmo_satellite_id = 255
801  local_sensorname = 'SOUNDER'
802  local_satellitename = 'GOES-11'
803  CASE('imgr_g11')
804  local_nchannels = 4
805  local_nfovs = -1
806  local_detector = -1
807  local_wmo_sensor_id = 615
808  local_wmo_satellite_id = 255
809  local_sensorname = 'IMAGER'
810  local_satellitename = 'GOES-11'
811  CASE('sndr_g12')
812  local_nchannels = 18
813  local_nfovs = -1
814  local_detector = -1
815  local_wmo_sensor_id = 626
816  local_wmo_satellite_id = 256
817  local_sensorname = 'SOUNDER'
818  local_satellitename = 'GOES-12'
819  CASE('sndrD1_g12')
820  local_nchannels = 18
821  local_nfovs = -1
822  local_detector = -1
823  local_wmo_sensor_id = 626
824  local_wmo_satellite_id = 256
825  local_sensorname = 'SOUNDER'
826  local_satellitename = 'GOES-12'
827  CASE('sndrD2_g12')
828  local_nchannels = 18
829  local_nfovs = -1
830  local_detector = -1
831  local_wmo_sensor_id = 626
832  local_wmo_satellite_id = 256
833  local_sensorname = 'SOUNDER'
834  local_satellitename = 'GOES-12'
835  CASE('sndrD3_g12')
836  local_nchannels = 18
837  local_nfovs = -1
838  local_detector = -1
839  local_wmo_sensor_id = 626
840  local_wmo_satellite_id = 256
841  local_sensorname = 'SOUNDER'
842  local_satellitename = 'GOES-12'
843  CASE('sndrD4_g12')
844  local_nchannels = 18
845  local_nfovs = -1
846  local_detector = -1
847  local_wmo_sensor_id = 626
848  local_wmo_satellite_id = 256
849  local_sensorname = 'SOUNDER'
850  local_satellitename = 'GOES-12'
851  CASE('imgr_g12')
852  local_nchannels = 4
853  local_nfovs = -1
854  local_detector = -1
855  local_wmo_sensor_id = 615
856  local_wmo_satellite_id = 256
857  local_sensorname = 'IMAGER'
858  local_satellitename = 'GOES-12'
859  CASE('sndr_g13')
860  local_nchannels = 18
861  local_nfovs = -1
862  local_detector = -1
863  local_wmo_sensor_id = 626
864  local_wmo_satellite_id = 257
865  local_sensorname = 'SOUNDER'
866  local_satellitename = 'GOES-13'
867  CASE('sndrD1_g13')
868  local_nchannels = 18
869  local_nfovs = -1
870  local_detector = -1
871  local_wmo_sensor_id = 626
872  local_wmo_satellite_id = 257
873  local_sensorname = 'SOUNDER'
874  local_satellitename = 'GOES-13'
875  CASE('sndrD2_g13')
876  local_nchannels = 18
877  local_nfovs = -1
878  local_detector = -1
879  local_wmo_sensor_id = 626
880  local_wmo_satellite_id = 257
881  local_sensorname = 'SOUNDER'
882  local_satellitename = 'GOES-13'
883  CASE('sndrD3_g13')
884  local_nchannels = 18
885  local_nfovs = -1
886  local_detector = -1
887  local_wmo_sensor_id = 626
888  local_wmo_satellite_id = 257
889  local_sensorname = 'SOUNDER'
890  local_satellitename = 'GOES-13'
891  CASE('sndrD4_g13')
892  local_nchannels = 18
893  local_nfovs = -1
894  local_detector = -1
895  local_wmo_sensor_id = 626
896  local_wmo_satellite_id = 257
897  local_sensorname = 'SOUNDER'
898  local_satellitename = 'GOES-13'
899  CASE('imgr_g13')
900  local_nchannels = 4
901  local_nfovs = -1
902  local_detector = -1
903  local_wmo_sensor_id = 615
904  local_wmo_satellite_id = 257
905  local_sensorname = 'IMAGER'
906  local_satellitename = 'GOES-13'
907  CASE('imgrS1_g13')
908  local_nchannels = 4
909  local_nfovs = -1
910  local_detector = -1
911  local_wmo_sensor_id = 615
912  local_wmo_satellite_id = 257
913  local_sensorname = 'IMAGER'
914  local_satellitename = 'GOES-13'
915  CASE('imgrS2_g13')
916  local_nchannels = 4
917  local_nfovs = -1
918  local_detector = -1
919  local_wmo_sensor_id = 615
920  local_wmo_satellite_id = 257
921  local_sensorname = 'IMAGER'
922  local_satellitename = 'GOES-13'
923  CASE('imgrD1S1_g13')
924  local_nchannels = 4
925  local_nfovs = -1
926  local_detector = -1
927  local_wmo_sensor_id = 615
928  local_wmo_satellite_id = 257
929  local_sensorname = 'IMAGER'
930  local_satellitename = 'GOES-13'
931  CASE('imgrD1S2_g13')
932  local_nchannels = 4
933  local_nfovs = -1
934  local_detector = -1
935  local_wmo_sensor_id = 615
936  local_wmo_satellite_id = 257
937  local_sensorname = 'IMAGER'
938  local_satellitename = 'GOES-13'
939  CASE('imgrD2S1_g13')
940  local_nchannels = 4
941  local_nfovs = -1
942  local_detector = -1
943  local_wmo_sensor_id = 615
944  local_wmo_satellite_id = 257
945  local_sensorname = 'IMAGER'
946  local_satellitename = 'GOES-13'
947  CASE('imgrD2S2_g13')
948  local_nchannels = 4
949  local_nfovs = -1
950  local_detector = -1
951  local_wmo_sensor_id = 615
952  local_wmo_satellite_id = 257
953  local_sensorname = 'IMAGER'
954  local_satellitename = 'GOES-13'
955  CASE('abi_gr')
956  local_nchannels = 10
957  local_nfovs = -1
958  local_detector = -1
959  local_wmo_sensor_id = -1
960  local_wmo_satellite_id = -1
961  local_sensorname = 'ABI'
962  local_satellitename = 'GOES-R'
963  CASE('imgr_mt1r')
964  local_nchannels = 4
965  local_nfovs = -1
966  local_detector = -1
967  local_wmo_sensor_id = 294
968  local_wmo_satellite_id = 171
969  local_sensorname = 'IMAGER'
970  local_satellitename = 'MTSAT-1R'
971  CASE('ssmi_f13')
972  local_nchannels = 7
973  local_nfovs = -1
974  local_detector = -1
975  local_wmo_sensor_id = 905
976  local_wmo_satellite_id = 246
977  local_sensorname = 'SSM/I'
978  local_satellitename = 'DMSP-13'
979  CASE('ssmi_f14')
980  local_nchannels = 7
981  local_nfovs = -1
982  local_detector = -1
983  local_wmo_sensor_id = 905
984  local_wmo_satellite_id = 247
985  local_sensorname = 'SSM/I'
986  local_satellitename = 'DMSP-14'
987  CASE('ssmi_f15')
988  local_nchannels = 7
989  local_nfovs = -1
990  local_detector = -1
991  local_wmo_sensor_id = 905
992  local_wmo_satellite_id = 248
993  local_sensorname = 'SSM/I'
994  local_satellitename = 'DMSP-15'
995  CASE('ssmt1_f13')
996  local_nchannels = 7
997  local_nfovs = -1
998  local_detector = -1
999  local_wmo_sensor_id = 906
1000  local_wmo_satellite_id = 246
1001  local_sensorname = 'SSM/T-1'
1002  local_satellitename = 'DMSP-13'
1003  CASE('ssmt1_f15')
1004  local_nchannels = 7
1005  local_nfovs = -1
1006  local_detector = -1
1007  local_wmo_sensor_id = 906
1008  local_wmo_satellite_id = 248
1009  local_sensorname = 'SSM/T-1'
1010  local_satellitename = 'DMSP-15'
1011  CASE('ssmt2_f14')
1012  local_nchannels = 5
1013  local_nfovs = -1
1014  local_detector = -1
1015  local_wmo_sensor_id = 907
1016  local_wmo_satellite_id = 247
1017  local_sensorname = 'SSM/T-2'
1018  local_satellitename = 'DMSP-14'
1019  CASE('ssmt2_f15')
1020  local_nchannels = 5
1021  local_nfovs = -1
1022  local_detector = -1
1023  local_wmo_sensor_id = 907
1024  local_wmo_satellite_id = 248
1025  local_sensorname = 'SSM/T-2'
1026  local_satellitename = 'DMSP-15'
1027  CASE('ssmis_f16')
1028  local_nchannels = 24
1029  local_nfovs = -1
1030  local_detector = -1
1031  local_wmo_sensor_id = 908
1032  local_wmo_satellite_id = 249
1033  local_sensorname = 'SSMIS'
1034  local_satellitename = 'DMSP-16'
1035  CASE('ssmis_f17')
1036  local_nchannels = 24
1037  local_nfovs = -1
1038  local_detector = -1
1039  local_wmo_sensor_id = wmo_ssmis
1040  local_wmo_satellite_id = wmo_dmsp17
1041  local_sensorname = 'SSMIS'
1042  local_satellitename = 'DMSP-17'
1043  CASE('ssmis_f18')
1044  local_nchannels = 24
1045  local_nfovs = -1
1046  local_detector = -1
1047  local_wmo_sensor_id = wmo_ssmis
1048  local_wmo_satellite_id = wmo_dmsp18
1049  local_sensorname = 'SSMIS'
1050  local_satellitename = 'DMSP-18'
1051  CASE('ssmis_f19')
1052  local_nchannels = 24
1053  local_nfovs = -1
1054  local_detector = -1
1055  local_wmo_sensor_id = wmo_ssmis
1056  local_wmo_satellite_id = wmo_dmsp19
1057  local_sensorname = 'SSMIS'
1058  local_satellitename = 'DMSP-19'
1059  CASE('ssmis_f20')
1060  local_nchannels = 24
1061  local_nfovs = -1
1062  local_detector = -1
1063  local_wmo_sensor_id = wmo_ssmis
1064  local_wmo_satellite_id = wmo_dmsp20
1065  local_sensorname = 'SSMIS'
1066  local_satellitename = 'DMSP-20'
1067  CASE('amsua_aqua')
1068  local_nchannels = 15
1069  local_nfovs = -1
1070  local_detector = -1
1071  local_wmo_sensor_id = 570
1072  local_wmo_satellite_id = 784
1073  local_sensorname = 'AMSU-A'
1074  local_satellitename = 'AQUA'
1075  CASE('hsb_aqua')
1076  local_nchannels = 4
1077  local_nfovs = -1
1078  local_detector = -1
1079  local_wmo_sensor_id = 246
1080  local_wmo_satellite_id = 784
1081  local_sensorname = 'HSB'
1082  local_satellitename = 'AQUA'
1083  CASE('amsre_aqua')
1084  local_nchannels = 12
1085  local_nfovs = -1
1086  local_detector = -1
1087  local_wmo_sensor_id = 345
1088  local_wmo_satellite_id = 784
1089  local_sensorname = 'AMSR-E'
1090  local_satellitename = 'AQUA'
1091  CASE('airs281SUBSET_aqua')
1092  local_nchannels = 281
1093  local_nfovs = -1
1094  local_detector = -1
1095  local_wmo_sensor_id = 420
1096  local_wmo_satellite_id = 784
1097  local_sensorname = 'AIRS'
1098  local_satellitename = 'Aqua'
1099  CASE('airs324SUBSET_aqua')
1100  local_nchannels = 324
1101  local_nfovs = -1
1102  local_detector = -1
1103  local_wmo_sensor_id = 420
1104  local_wmo_satellite_id = 784
1105  local_sensorname = 'AIRS'
1106  local_satellitename = 'Aqua'
1107  CASE('airsM12_aqua')
1108  local_nchannels = 130
1109  local_nfovs = -1
1110  local_detector = -1
1111  local_wmo_sensor_id = 420
1112  local_wmo_satellite_id = 784
1113  local_sensorname = 'AIRS'
1114  local_satellitename = 'Aqua'
1115  CASE('airsM11_aqua')
1116  local_nchannels = 144
1117  local_nfovs = -1
1118  local_detector = -1
1119  local_wmo_sensor_id = 420
1120  local_wmo_satellite_id = 784
1121  local_sensorname = 'AIRS'
1122  local_satellitename = 'Aqua'
1123  CASE('airsM10_aqua')
1124  local_nchannels = 167
1125  local_nfovs = -1
1126  local_detector = -1
1127  local_wmo_sensor_id = 420
1128  local_wmo_satellite_id = 784
1129  local_sensorname = 'AIRS'
1130  local_satellitename = 'Aqua'
1131  CASE('airsM9_aqua')
1132  local_nchannels = 167
1133  local_nfovs = -1
1134  local_detector = -1
1135  local_wmo_sensor_id = 420
1136  local_wmo_satellite_id = 784
1137  local_sensorname = 'AIRS'
1138  local_satellitename = 'Aqua'
1139  CASE('airsM8_aqua')
1140  local_nchannels = 161
1141  local_nfovs = -1
1142  local_detector = -1
1143  local_wmo_sensor_id = 420
1144  local_wmo_satellite_id = 784
1145  local_sensorname = 'AIRS'
1146  local_satellitename = 'Aqua'
1147  CASE('airsM7_aqua')
1148  local_nchannels = 167
1149  local_nfovs = -1
1150  local_detector = -1
1151  local_wmo_sensor_id = 420
1152  local_wmo_satellite_id = 784
1153  local_sensorname = 'AIRS'
1154  local_satellitename = 'Aqua'
1155  CASE('airsM6_aqua')
1156  local_nchannels = 167
1157  local_nfovs = -1
1158  local_detector = -1
1159  local_wmo_sensor_id = 420
1160  local_wmo_satellite_id = 784
1161  local_sensorname = 'AIRS'
1162  local_satellitename = 'Aqua'
1163  CASE('airsM5_aqua')
1164  local_nchannels = 159
1165  local_nfovs = -1
1166  local_detector = -1
1167  local_wmo_sensor_id = 420
1168  local_wmo_satellite_id = 784
1169  local_sensorname = 'AIRS'
1170  local_satellitename = 'Aqua'
1171  CASE('airsM4d_aqua')
1172  local_nchannels = 106
1173  local_nfovs = -1
1174  local_detector = -1
1175  local_wmo_sensor_id = 420
1176  local_wmo_satellite_id = 784
1177  local_sensorname = 'AIRS'
1178  local_satellitename = 'Aqua'
1179  CASE('airsM4c_aqua')
1180  local_nchannels = 94
1181  local_nfovs = -1
1182  local_detector = -1
1183  local_wmo_sensor_id = 420
1184  local_wmo_satellite_id = 784
1185  local_sensorname = 'AIRS'
1186  local_satellitename = 'Aqua'
1187  CASE('airsM3_aqua')
1188  local_nchannels = 192
1189  local_nfovs = -1
1190  local_detector = -1
1191  local_wmo_sensor_id = 420
1192  local_wmo_satellite_id = 784
1193  local_sensorname = 'AIRS'
1194  local_satellitename = 'Aqua'
1195  CASE('airsM4b_aqua')
1196  local_nchannels = 106
1197  local_nfovs = -1
1198  local_detector = -1
1199  local_wmo_sensor_id = 420
1200  local_wmo_satellite_id = 784
1201  local_sensorname = 'AIRS'
1202  local_satellitename = 'Aqua'
1203  CASE('airsM4a_aqua')
1204  local_nchannels = 104
1205  local_nfovs = -1
1206  local_detector = -1
1207  local_wmo_sensor_id = 420
1208  local_wmo_satellite_id = 784
1209  local_sensorname = 'AIRS'
1210  local_satellitename = 'Aqua'
1211  CASE('airsM2b_aqua')
1212  local_nchannels = 150
1213  local_nfovs = -1
1214  local_detector = -1
1215  local_wmo_sensor_id = 420
1216  local_wmo_satellite_id = 784
1217  local_sensorname = 'AIRS'
1218  local_satellitename = 'Aqua'
1219  CASE('airsM1b_aqua')
1220  local_nchannels = 130
1221  local_nfovs = -1
1222  local_detector = -1
1223  local_wmo_sensor_id = 420
1224  local_wmo_satellite_id = 784
1225  local_sensorname = 'AIRS'
1226  local_satellitename = 'Aqua'
1227  CASE('airsM2a_aqua')
1228  local_nchannels = 116
1229  local_nfovs = -1
1230  local_detector = -1
1231  local_wmo_sensor_id = 420
1232  local_wmo_satellite_id = 784
1233  local_sensorname = 'AIRS'
1234  local_satellitename = 'Aqua'
1235  CASE('airsM1a_aqua')
1236  local_nchannels = 118
1237  local_nfovs = -1
1238  local_detector = -1
1239  local_wmo_sensor_id = 420
1240  local_wmo_satellite_id = 784
1241  local_sensorname = 'AIRS'
1242  local_satellitename = 'Aqua'
1243  CASE('modis_terra')
1244  local_nchannels = 16
1245  local_nfovs = -1
1246  local_detector = -1
1247  local_wmo_sensor_id = 389
1248  local_wmo_satellite_id = 783
1249  local_sensorname = 'MODIS'
1250  local_satellitename = 'TERRA'
1251  CASE('modisD01_terra')
1252  local_nchannels = 16
1253  local_nfovs = -1
1254  local_detector = -1
1255  local_wmo_sensor_id = 389
1256  local_wmo_satellite_id = 783
1257  local_sensorname = 'MODIS'
1258  local_satellitename = 'TERRA'
1259  CASE('modisD02_terra')
1260  local_nchannels = 16
1261  local_nfovs = -1
1262  local_detector = -1
1263  local_wmo_sensor_id = 389
1264  local_wmo_satellite_id = 783
1265  local_sensorname = 'MODIS'
1266  local_satellitename = 'TERRA'
1267  CASE('modisD03_terra')
1268  local_nchannels = 16
1269  local_nfovs = -1
1270  local_detector = -1
1271  local_wmo_sensor_id = 389
1272  local_wmo_satellite_id = 783
1273  local_sensorname = 'MODIS'
1274  local_satellitename = 'TERRA'
1275  CASE('modisD04_terra')
1276  local_nchannels = 16
1277  local_nfovs = -1
1278  local_detector = -1
1279  local_wmo_sensor_id = 389
1280  local_wmo_satellite_id = 783
1281  local_sensorname = 'MODIS'
1282  local_satellitename = 'TERRA'
1283  CASE('modisD05_terra')
1284  local_nchannels = 16
1285  local_nfovs = -1
1286  local_detector = -1
1287  local_wmo_sensor_id = 389
1288  local_wmo_satellite_id = 783
1289  local_sensorname = 'MODIS'
1290  local_satellitename = 'TERRA'
1291  CASE('modisD06_terra')
1292  local_nchannels = 16
1293  local_nfovs = -1
1294  local_detector = -1
1295  local_wmo_sensor_id = 389
1296  local_wmo_satellite_id = 783
1297  local_sensorname = 'MODIS'
1298  local_satellitename = 'TERRA'
1299  CASE('modisD07_terra')
1300  local_nchannels = 16
1301  local_nfovs = -1
1302  local_detector = -1
1303  local_wmo_sensor_id = 389
1304  local_wmo_satellite_id = 783
1305  local_sensorname = 'MODIS'
1306  local_satellitename = 'TERRA'
1307  CASE('modisD08_terra')
1308  local_nchannels = 16
1309  local_nfovs = -1
1310  local_detector = -1
1311  local_wmo_sensor_id = 389
1312  local_wmo_satellite_id = 783
1313  local_sensorname = 'MODIS'
1314  local_satellitename = 'TERRA'
1315  CASE('modisD09_terra')
1316  local_nchannels = 16
1317  local_nfovs = -1
1318  local_detector = -1
1319  local_wmo_sensor_id = 389
1320  local_wmo_satellite_id = 783
1321  local_sensorname = 'MODIS'
1322  local_satellitename = 'TERRA'
1323  CASE('modisD10_terra')
1324  local_nchannels = 16
1325  local_nfovs = -1
1326  local_detector = -1
1327  local_wmo_sensor_id = 389
1328  local_wmo_satellite_id = 783
1329  local_sensorname = 'MODIS'
1330  local_satellitename = 'TERRA'
1331  CASE('modis_aqua')
1332  local_nchannels = 16
1333  local_nfovs = -1
1334  local_detector = -1
1335  local_wmo_sensor_id = 389
1336  local_wmo_satellite_id = 784
1337  local_sensorname = 'MODIS'
1338  local_satellitename = 'AQUA'
1339  CASE('modisD01_aqua')
1340  local_nchannels = 16
1341  local_nfovs = -1
1342  local_detector = -1
1343  local_wmo_sensor_id = 389
1344  local_wmo_satellite_id = 784
1345  local_sensorname = 'MODIS'
1346  local_satellitename = 'AQUA'
1347  CASE('modisD02_aqua')
1348  local_nchannels = 16
1349  local_nfovs = -1
1350  local_detector = -1
1351  local_wmo_sensor_id = 389
1352  local_wmo_satellite_id = 784
1353  local_sensorname = 'MODIS'
1354  local_satellitename = 'AQUA'
1355  CASE('modisD03_aqua')
1356  local_nchannels = 16
1357  local_nfovs = -1
1358  local_detector = -1
1359  local_wmo_sensor_id = 389
1360  local_wmo_satellite_id = 784
1361  local_sensorname = 'MODIS'
1362  local_satellitename = 'AQUA'
1363  CASE('modisD04_aqua')
1364  local_nchannels = 16
1365  local_nfovs = -1
1366  local_detector = -1
1367  local_wmo_sensor_id = 389
1368  local_wmo_satellite_id = 784
1369  local_sensorname = 'MODIS'
1370  local_satellitename = 'AQUA'
1371  CASE('modisD05_aqua')
1372  local_nchannels = 16
1373  local_nfovs = -1
1374  local_detector = -1
1375  local_wmo_sensor_id = 389
1376  local_wmo_satellite_id = 784
1377  local_sensorname = 'MODIS'
1378  local_satellitename = 'AQUA'
1379  CASE('modisD06_aqua')
1380  local_nchannels = 16
1381  local_nfovs = -1
1382  local_detector = -1
1383  local_wmo_sensor_id = 389
1384  local_wmo_satellite_id = 784
1385  local_sensorname = 'MODIS'
1386  local_satellitename = 'AQUA'
1387  CASE('modisD07_aqua')
1388  local_nchannels = 16
1389  local_nfovs = -1
1390  local_detector = -1
1391  local_wmo_sensor_id = 389
1392  local_wmo_satellite_id = 784
1393  local_sensorname = 'MODIS'
1394  local_satellitename = 'AQUA'
1395  CASE('modisD08_aqua')
1396  local_nchannels = 16
1397  local_nfovs = -1
1398  local_detector = -1
1399  local_wmo_sensor_id = 389
1400  local_wmo_satellite_id = 784
1401  local_sensorname = 'MODIS'
1402  local_satellitename = 'AQUA'
1403  CASE('modisD09_aqua')
1404  local_nchannels = 16
1405  local_nfovs = -1
1406  local_detector = -1
1407  local_wmo_sensor_id = 389
1408  local_wmo_satellite_id = 784
1409  local_sensorname = 'MODIS'
1410  local_satellitename = 'AQUA'
1411  CASE('modisD10_aqua')
1412  local_nchannels = 16
1413  local_nfovs = -1
1414  local_detector = -1
1415  local_wmo_sensor_id = 389
1416  local_wmo_satellite_id = 784
1417  local_sensorname = 'MODIS'
1418  local_satellitename = 'AQUA'
1419  CASE('vissrDetA_gms5')
1420  local_nchannels = 3
1421  local_nfovs = -1
1422  local_detector = -1
1423  local_wmo_sensor_id = 489
1424  local_wmo_satellite_id = 152
1425  local_sensorname = 'VISSR'
1426  local_satellitename = 'GMS-5'
1427  CASE('vissrDetB_gms5')
1428  local_nchannels = 3
1429  local_nfovs = -1
1430  local_detector = -1
1431  local_wmo_sensor_id = 489
1432  local_wmo_satellite_id = 152
1433  local_sensorname = 'VISSR'
1434  local_satellitename = 'GMS-5'
1435  CASE('mviriNOM_m03')
1436  local_nchannels = 2
1437  local_nfovs = -1
1438  local_detector = -1
1439  local_wmo_sensor_id = 205
1440  local_wmo_satellite_id = 50
1441  local_sensorname = 'MVIRI'
1442  local_satellitename = 'METEOSAT-03'
1443  CASE('mviriBKUP_m03')
1444  local_nchannels = 2
1445  local_nfovs = -1
1446  local_detector = -1
1447  local_wmo_sensor_id = 205
1448  local_wmo_satellite_id = 50
1449  local_sensorname = 'MVIRI'
1450  local_satellitename = 'METEOSAT-03'
1451  CASE('mviriNOM_m04')
1452  local_nchannels = 2
1453  local_nfovs = -1
1454  local_detector = -1
1455  local_wmo_sensor_id = 205
1456  local_wmo_satellite_id = 51
1457  local_sensorname = 'MVIRI'
1458  local_satellitename = 'METEOSAT-04'
1459  CASE('mviriBKUP_m04')
1460  local_nchannels = 2
1461  local_nfovs = -1
1462  local_detector = -1
1463  local_wmo_sensor_id = 205
1464  local_wmo_satellite_id = 51
1465  local_sensorname = 'MVIRI'
1466  local_satellitename = 'METEOSAT-04'
1467  CASE('mviriNOM_m05')
1468  local_nchannels = 2
1469  local_nfovs = -1
1470  local_detector = -1
1471  local_wmo_sensor_id = 205
1472  local_wmo_satellite_id = 52
1473  local_sensorname = 'MVIRI'
1474  local_satellitename = 'METEOSAT-05'
1475  CASE('mviriBKUP_m05')
1476  local_nchannels = 2
1477  local_nfovs = -1
1478  local_detector = -1
1479  local_wmo_sensor_id = 205
1480  local_wmo_satellite_id = 52
1481  local_sensorname = 'MVIRI'
1482  local_satellitename = 'METEOSAT-05'
1483  CASE('mviriNOM_m06')
1484  local_nchannels = 2
1485  local_nfovs = -1
1486  local_detector = -1
1487  local_wmo_sensor_id = 205
1488  local_wmo_satellite_id = 53
1489  local_sensorname = 'MVIRI'
1490  local_satellitename = 'METEOSAT-06'
1491  CASE('mviriBKUP_m06')
1492  local_nchannels = 2
1493  local_nfovs = -1
1494  local_detector = -1
1495  local_wmo_sensor_id = 205
1496  local_wmo_satellite_id = 53
1497  local_sensorname = 'MVIRI'
1498  local_satellitename = 'METEOSAT-06'
1499  CASE('mviriNOM_m07')
1500  local_nchannels = 2
1501  local_nfovs = -1
1502  local_detector = -1
1503  local_wmo_sensor_id = 205
1504  local_wmo_satellite_id = 54
1505  local_sensorname = 'MVIRI'
1506  local_satellitename = 'METEOSAT-07'
1507  CASE('mviriBKUP_m07')
1508  local_nchannels = 2
1509  local_nfovs = -1
1510  local_detector = -1
1511  local_wmo_sensor_id = 205
1512  local_wmo_satellite_id = 54
1513  local_sensorname = 'MVIRI'
1514  local_satellitename = 'METEOSAT-07'
1515  CASE('seviri_m08')
1516  local_nchannels = 8
1517  local_nfovs = -1
1518  local_detector = -1
1519  local_wmo_sensor_id = wmo_seviri
1520  local_wmo_satellite_id = wmo_meteosat08
1521  local_sensorname = 'SEVIRI'
1522  local_satellitename = 'METEOSAT-08'
1523  CASE('seviri_m09')
1524  local_nchannels = 8
1525  local_nfovs = -1
1526  local_detector = -1
1527  local_wmo_sensor_id = wmo_seviri
1528  local_wmo_satellite_id = wmo_meteosat09
1529  local_sensorname = 'SEVIRI'
1530  local_satellitename = 'METEOSAT-09'
1531  CASE('seviri_m10')
1532  local_nchannels = 8
1533  local_nfovs = -1
1534  local_detector = -1
1535  local_wmo_sensor_id = wmo_seviri
1536  local_wmo_satellite_id = wmo_meteosat10
1537  local_sensorname = 'SEVIRI'
1538  local_satellitename = 'METEOSAT-10'
1539  CASE('seviri_m11')
1540  local_nchannels = 8
1541  local_nfovs = -1
1542  local_detector = -1
1543  local_wmo_sensor_id = wmo_seviri
1544  local_wmo_satellite_id = wmo_meteosat11
1545  local_sensorname = 'SEVIRI'
1546  local_satellitename = 'METEOSAT-11'
1547  CASE('windsat_coriolis')
1548  local_nchannels = 16
1549  local_nfovs = -1
1550  local_detector = -1
1551  local_wmo_sensor_id = 2047
1552  local_wmo_satellite_id = 283
1553  local_sensorname = 'WindSat'
1554  local_satellitename = 'Coriolis'
1555  CASE('atms_c1')
1556  local_nchannels = 22
1557  local_nfovs = -1
1558  local_detector = -1
1559  local_wmo_sensor_id = wmo_atms
1560  local_wmo_satellite_id = wmo_npoessc1
1561  local_sensorname = 'ATMS'
1562  local_satellitename = 'NPOESS-C1'
1563  CASE('airs_aqua')
1564  local_nchannels = 2378
1565  local_nfovs = -1
1566  local_detector = -1
1567  local_wmo_sensor_id = 420
1568  local_wmo_satellite_id = 784
1569  local_sensorname = 'AIRS'
1570  local_satellitename = 'Aqua'
1571  CASE DEFAULT
1572  error_status=failure
1573  CALL display_message( routine_name, &
1574  'No entry for Sensor_Id'//trim(adjustl(sensor_id)), &
1575  error_status, &
1576  message_log=message_log)
1577  END SELECT
1578 
1579  ! Return requested attributes
1580  IF ( PRESENT(nchannels ) ) nchannels = local_nchannels
1581  IF ( PRESENT(nfovs ) ) nfovs = local_nfovs
1582  IF ( PRESENT(detector ) ) detector = local_detector
1583  IF ( PRESENT(wmo_sensor_id ) ) wmo_sensor_id = local_wmo_sensor_id
1584  IF ( PRESENT(wmo_satellite_id) ) wmo_satellite_id = local_wmo_satellite_id
1585  IF ( PRESENT(sensorname ) ) sensorname = local_sensorname
1586  IF ( PRESENT(satellitename ) ) satellitename = local_satellitename
1587 
1588  END FUNCTION crtm_get_sensorattributes
1589 
1590 END MODULE crtm_sensorinfo
integer, parameter, public wmo_dmsp15
integer, parameter, public wmo_dmsp18
integer, parameter, public wmo_goes06
integer, parameter, public wmo_ssmi
integer, parameter, public wmo_npoessc1
integer, parameter, public failure
integer, parameter, public invalid_wmo_sensor_id
integer, parameter, public wmo_meteosat09
integer, parameter, public wmo_meteosat03
integer, parameter, public wmo_mhs
integer, parameter, public wmo_amsre
integer, parameter, public wmo_noaa17
integer, parameter, public wmo_goes11
integer, parameter, public wmo_noaa14
integer, parameter, public wmo_noaa05
character(*), parameter module_rcs_id
integer, parameter, public wmo_meteosat10
integer, parameter, public wmo_aqua
integer, parameter, public wmo_noaa19
integer, parameter, public wmo_noaa16
integer, parameter, public wmo_dmsp19
integer, parameter, public wmo_dmsp17
integer, parameter, public wmo_noaa10
integer, parameter, public wmo_meteosat05
integer, parameter, public wmo_metopc
integer, parameter, public wmo_ssmis
integer, parameter, public wmo_gms5
integer, parameter, public wmo_goes07
integer, parameter, public wmo_goes10
integer, parameter, public wmo_imager
integer, parameter, public invalid_wmo_satellite_id
integer, parameter, public wmo_noaa07
integer, parameter, public wmo_modis
integer, parameter, public wmo_vas
integer, parameter, public wmo_meteosat04
integer, parameter, public wmo_msu
integer, parameter, public wmo_noaa12
integer, parameter, public wmo_goesr
integer, parameter, public wmo_tirosn
integer, parameter, public wmo_dmsp14
integer, parameter, public wmo_dmsp16
integer, parameter, public wmo_hsb
integer, parameter, public wmo_goes12
recursive subroutine, public display_message(Routine_Name, Message, Error_State, Message_Log)
integer, parameter, public wmo_windsat
integer, parameter, public wmo_coriolis
integer, parameter, public wmo_ssmt2
integer, parameter, public wmo_amsua
integer, parameter, public wmo_noaa08
integer, parameter, public wmo_mviri
integer, parameter, public wmo_noaa18
integer, parameter, public wmo_hirs3
integer, parameter, public wmo_avhrr2
integer, parameter, public wmo_goes09
integer, parameter, public wmo_noaa11
integer, parameter, public wmo_atms
integer, parameter, public wmo_meteosat07
integer, parameter, public wmo_meteosat06
integer, parameter, public wmo_sounder
integer, parameter, public wmo_goes08
integer, parameter, public wmo_goes13
integer, parameter, public wmo_meteosat08
integer, parameter, public wmo_avhrr3
integer, parameter, public wmo_dmsp13
integer, parameter, public wmo_terra
integer, parameter, public wmo_dmsp20
integer, parameter, public wmo_amsub
integer, parameter, public wmo_iasi
integer, parameter, public wmo_noaa09
integer, parameter, public wmo_noaa15
integer, parameter, public wmo_ssmt1
integer, parameter, public wmo_seviri
integer, parameter, public wmo_metopa
integer function, public crtm_get_sensorattributes(Sensor_Id, nChannels, nFOVs, Detector, WMO_Sensor_Id, WMO_Satellite_Id, SensorName, SatelliteName, RCS_Id, Message_Log)
integer, parameter, public wmo_hirs2
integer, parameter, public wmo_goes05
integer, parameter, public wmo_noaa06
integer, parameter, public wmo_airs
integer, parameter, public success
integer, parameter, public wmo_goes04
integer, parameter, public wmo_meteosat11
integer, parameter, public wmo_metopb
integer, parameter, public wmo_vissr
integer, parameter, public wmo_abi