|
character(*), parameter | sensorinfo_parameters::module_rcs_id = '$Id: $' |
|
integer, parameter, public | sensorinfo_parameters::invalid_wmo_satellite_id = 1023 |
|
integer, parameter, public | sensorinfo_parameters::invalid_wmo_sensor_id = 2047 |
|
integer, parameter, public | sensorinfo_parameters::n_sensor_types = 4 |
|
integer, parameter, public | sensorinfo_parameters::invalid_sensor = 0 |
|
integer, parameter, public | sensorinfo_parameters::microwave_sensor = 1 |
|
integer, parameter, public | sensorinfo_parameters::infrared_sensor = 2 |
|
integer, parameter, public | sensorinfo_parameters::visible_sensor = 3 |
|
integer, parameter, public | sensorinfo_parameters::ultraviolet_sensor = 4 |
|
character(*), dimension(0:n_sensor_types), parameter, public | sensorinfo_parameters::sensor_type_name = (/ 'Invalid ', 'Microwave ', 'Infrared ', 'Visible ', 'Ultraviolet' /) |
|
integer, parameter, public | sensorinfo_parameters::n_polarization_types = 12 |
|
integer, parameter, public | sensorinfo_parameters::invalid_polarization = 0 |
|
integer, parameter, public | sensorinfo_parameters::unpolarized = 1 |
|
integer, parameter, public | sensorinfo_parameters::intensity = UNPOLARIZED |
|
integer, parameter, public | sensorinfo_parameters::first_stokes_component = UNPOLARIZED |
|
integer, parameter, public | sensorinfo_parameters::second_stokes_component = 2 |
|
integer, parameter, public | sensorinfo_parameters::third_stokes_component = 3 |
|
integer, parameter, public | sensorinfo_parameters::fourth_stokes_component = 4 |
|
integer, parameter, public | sensorinfo_parameters::vl_polarization = 5 |
|
integer, parameter, public | sensorinfo_parameters::hl_polarization = 6 |
|
integer, parameter, public | sensorinfo_parameters::plus45l_polarization = 7 |
|
integer, parameter, public | sensorinfo_parameters::minus45l_polarization = 8 |
|
integer, parameter, public | sensorinfo_parameters::vl_mixed_polarization = 9 |
|
integer, parameter, public | sensorinfo_parameters::hl_mixed_polarization = 10 |
|
integer, parameter, public | sensorinfo_parameters::rc_polarization = 11 |
|
integer, parameter, public | sensorinfo_parameters::lc_polarization = 12 |
|
character(*), dimension(0:n_polarization_types), parameter, public | sensorinfo_parameters::polarization_type_name = (/ 'Invalid ', 'Unpolarized/Intensity/First Stokes component (I) ', 'Second Stokes component (Q) ', 'Third Stokes component (U) ', 'Fourth Stokes component (V) ', 'Vertical linear polarization ', 'Horizontal linear polarization ', '+45deg. linear polarization ', '-45deg. linear polarization ', 'Vertical polarization at nadir; mixed off nadir ', 'Horizontal polarization at nadir; mixed off nadir', 'Right circular polarization ', 'Left circular polarization ' /) |
|