NASA Logo
Ocean Color Science Software

ocssw V2022
core_arrays.f90
Go to the documentation of this file.
1 module core_arrays
2 
3 #ifdef CT_CODE
4 
5 
6  real, allocatable, dimension (:,:) :: solar_zenith_angle
7 
8 #else
9 
10 
11  use generalauxtype
15 
18 
19  implicit none
20 
21  ! core algorithm arrays
22 
33 
34  integer*2, dimension(:,:), allocatable :: tau_liquid, tau_ice, re21_liquid
35  integer*2, dimension(:,:), allocatable :: re21_ice, re22_liquid, &
36  re22_ice
37 
38  real(single), allocatable, dimension (:,:) :: optical_thickness_final
39  real(single), allocatable, dimension (:,:) :: optical_thickness_22_final
40  real(single), allocatable, dimension (:,:) :: optical_thickness_16_final
41  real(single), allocatable, dimension (:,:) :: optical_thickness_37_final
42  real(single), allocatable, dimension (:,:) :: optical_thickness_1621_final
43  real(single), allocatable, dimension (:,:) :: effective_radius_16_final
44  real(single), allocatable, dimension (:,:) :: effective_radius_21_final
45  real(single), allocatable, dimension (:,:) :: effective_radius_22_final
46  real(single), allocatable, dimension (:,:) :: effective_radius_37_final
47  real(single), allocatable, dimension (:,:) :: effective_radius_1621_final
48 
49  integer*2, allocatable, dimension (:,:) :: optical_thickness_final_pcl
50  integer*2, allocatable, dimension (:,:) :: optical_thickness_22_final_pcl
51  integer*2, allocatable, dimension (:,:) :: optical_thickness_16_final_pcl
52  integer*2, allocatable, dimension (:,:) :: optical_thickness_37_final_pcl
53  integer*2, allocatable, dimension (:,:) :: optical_thickness_1621_final_pcl
54  integer*2, allocatable, dimension (:,:) :: effective_radius_16_final_pcl
55  integer*2, allocatable, dimension (:,:) :: effective_radius_21_final_pcl
56  integer*2, allocatable, dimension (:,:) :: effective_radius_22_final_pcl
57  integer*2, allocatable, dimension (:,:) :: effective_radius_37_final_pcl
58  integer*2, allocatable, dimension (:,:) :: effective_radius_1621_final_pcl
59  integer*2, allocatable, dimension (:,:) :: liquid_water_path_pcl
60  integer*2, allocatable, dimension (:,:) :: liquid_water_path_22_pcl
61  integer*2, allocatable, dimension (:,:) :: liquid_water_path_16_pcl
62  integer*2, allocatable, dimension (:,:) :: liquid_water_path_37_pcl
63  integer*2, allocatable, dimension (:,:) :: liquid_water_path_1621_pcl
64 
65  real(single), allocatable, dimension (:,:) :: liquid_water_path
66  real(single), allocatable, dimension (:,:) :: liquid_water_path_22
67  real(single), allocatable, dimension (:,:) :: liquid_water_path_16
68  real(single), allocatable, dimension (:,:) :: liquid_water_path_37
69  real(single), allocatable, dimension (:,:) :: liquid_water_path_1621
70 
71 ! we can get away with integer*2 here because these arrays are for output storage only
72 ! they are a final answer that is not used in any subsequent calculation at any time
73  integer*2, allocatable, dimension (:,:) :: optical_thickness_error
74  integer*2, allocatable, dimension (:,:) :: optical_thickness_22_error
75  integer*2, allocatable, dimension (:,:) :: optical_thickness_16_error
76  integer*2, allocatable, dimension (:,:) :: optical_thickness_37_error
77 
78  integer*2, allocatable, dimension (:,:) :: effective_radius_21_error
79  integer*2, allocatable, dimension (:,:) :: effective_radius_22_error
80  integer*2, allocatable, dimension (:,:) :: effective_radius_16_error
81  integer*2, allocatable, dimension (:,:) :: effective_radius_37_error
82 
83  integer*2, allocatable, dimension (:,:) :: liquid_water_path_error
84  integer*2, allocatable, dimension (:,:) :: liquid_water_path_22_error
85  integer*2, allocatable, dimension (:,:) :: liquid_water_path_16_error
86  integer*2, allocatable, dimension (:,:) :: liquid_water_path_37_error
87 
88  integer*2, allocatable, dimension (:,:) :: optical_thickness_1621_error
89  integer*2, allocatable, dimension (:,:) :: effective_radius_1621_error
90  integer*2, allocatable, dimension (:,:) :: liquid_water_path_1621_error
91 
92  integer(integer_onebyte), allocatable, dimension (:,:) :: cloud_layer_flag, ml_test_flag
93  integer(integer_onebyte), allocatable, dimension (:,:) :: csr_flag_array
94 
95 #if MAS_INST || EMAS_INST
96  real(single), allocatable, dimension(:,:) :: spatial_variability
97  integer(integer_onebyte), allocatable, dimension(:,:) :: restoral_pos
98 #endif
99 
100  type(processflag) , allocatable,dimension (:,:) :: cloudsummary
101 
102  !water vapor band cirrus retrieval arrays
103  real(single), allocatable, dimension (:,:) :: optical_thickness_138
104  real(single), allocatable, dimension (:,:) :: effective_radius_138
105  real(single), allocatable, dimension (:,:) :: optical_thickness_138_error
106  real(single), allocatable, dimension (:,:) :: effective_radius_138_error
107  real(single), allocatable, dimension (:,:,:) :: uncertainty_138_transmittance
108  real(single), allocatable, dimension (:,:,:) :: uncertainty_138_calibration
109  real(single), allocatable, dimension (:,:,:) :: uncertainty_138_effvar
110 
111 
112  !input data arrays (measurement)
113  real, allocatable, dimension (:,:) :: sensor_zenith_angle
114  real, allocatable, dimension (:,:) :: solar_zenith_angle
115  real, allocatable, dimension (:,:) :: sensor_azimuth_angle
116  real, allocatable, dimension (:,:) :: solar_azimuth_angle
117 
118  real(single), allocatable, dimension (:,:) :: relative_azimuth_angle
119  real(single), allocatable, dimension (:,:,:) :: band_measurements
120 #ifdef SIM
121  real, allocatable, dimension(:,:,:) :: band_uncertainty
122  real, allocatable, dimension(:,:) :: scatter_angle
123 #else
124  integer*1, allocatable, dimension(:,:,:) :: band_uncertainty
125 #endif
126  type(cloudmask_type),allocatable,dimension (:,:) :: cloudmask
127 
134 
135  ! ancillary arrays
136  real, parameter :: albedo_fac = 0.001
137 #ifdef SEVIRI_INST
138  real, allocatable, dimension (:,:,:) :: surface_albedo
139 #else
140  integer*2, allocatable, dimension (:,:,:) :: surface_albedo
141 #endif
142 
144 
145  real, dimension(:,:), allocatable :: flight_time
146  integer*2, dimension(:,:,:), allocatable :: cloud_mask_spi
147 
148 
149  real(single), allocatable, dimension (:,:) :: latitude
150  real(single), allocatable, dimension (:,:) :: longitude
151 
152  real(single), allocatable, dimension (:,:) :: surface_temperature
153  real(single), allocatable, dimension (:,:,:) :: surface_emissivity_land
154 
155  real(single), allocatable, dimension (:,:) :: cloud_top_temperature, cloud_top_temperature_b
156  real(single), allocatable, dimension (:,:) :: cloud_top_pressure
157  real(single), allocatable, dimension (:,:) :: cloud_top_height
158  real(single), allocatable, dimension (:,:) :: cloud_effective_emissivity
159 
160  real(single), allocatable, dimension (:,:) :: abovecloud_watervapor
161  real(single), allocatable, dimension (:,:) :: column_ozone
162  real, dimension(:,:), allocatable :: precip_water_094
163 
164  real, dimension(:,:,:), allocatable :: clear_sky_rad
165  real, dimension(:,:,:), allocatable :: clear_sky_btemp
166 
167 
168  integer*1, dimension(:,:), allocatable :: cloud_height_method
169  integer*1, dimension(:,:), allocatable :: cloud_phase_infrared
170  real, dimension(:,:), allocatable :: irw_temperature
171 
172  type(failed_type), dimension(:,:), allocatable :: failure_metric
173  type(failed_type), dimension(:,:), allocatable :: failure_metric_22
174  type(failed_type), dimension(:,:), allocatable :: failure_metric_16
175  type(failed_type), dimension(:,:), allocatable :: failure_metric_37
176  type(failed_type), dimension(:,:), allocatable :: failure_metric_1621
177 
178  real, dimension(:,:,:), allocatable :: atm_corr_refl
179 
180  !Other
181  character*15 :: platform_name
182 
183  type(ancillary_type), allocatable, dimension(:,:) :: model_info
184  ! WDR add a similar structure for just 1 point
185  ! WDR MAY NOT NEED type(ancillary_type), allocatable :: c2_model_info
187  type(qualityanalysis), allocatable, dimension(:,:) :: processing_information
188  type(qualityanalysis), allocatable, dimension(:,:) :: processing_information_sav
189 
190  integer*1, dimension(:,:), allocatable :: seviri_cloudphase
191  integer*1, dimension(:,:), allocatable :: ahi_cloudphase
192  integer*1, dimension(:,:), allocatable :: viirs_cloudphase
193 
194  integer(integer_fourbyte),allocatable, dimension (:) :: bands
195 
197 
203 
204 
206 
208  real :: const_c
209 
210  real, dimension(:,:), allocatable :: snow_cover
211  ! WDR we will have controls for init_science_arrays and modis_science_module
212  ! to control processing or transferring of data for the 3 lines of data
214 
215 ! WDR - declarations for the capture or _sav arrays to preserve point-only
216 ! (not area-influenced) values of many arrays
217  integer*2, allocatable, dimension (:,:) :: optical_thickness_final_pcl_sav
218  integer*2, allocatable, dimension (:,:) :: optical_thickness_22_final_pcl_sav
219  integer*2, allocatable, dimension (:,:) :: optical_thickness_1621_final_pcl_sav
220  integer*2, allocatable, dimension (:,:) :: effective_radius_21_final_pcl_sav
221  integer*2, allocatable, dimension (:,:) :: effective_radius_22_final_pcl_sav
222  integer*2, allocatable, dimension (:,:) :: effective_radius_1621_final_pcl_sav
223  integer*2, allocatable, dimension (:,:) :: liquid_water_path_pcl_sav
224  integer*2, allocatable, dimension (:,:) :: liquid_water_path_22_pcl_sav
225  integer*2, allocatable, dimension (:,:) :: liquid_water_path_1621_pcl_sav
226  integer*2, allocatable, dimension (:,:) :: optical_thickness_37_final_pcl_sav
227  integer*2, allocatable, dimension (:,:) :: optical_thickness_16_final_pcl_sav
228  integer*2, allocatable, dimension (:,:) :: effective_radius_16_final_pcl_sav
229  integer*2, allocatable, dimension (:,:) :: effective_radius_37_final_pcl_sav
230  integer*2, allocatable, dimension (:,:) :: liquid_water_path_16_pcl_sav
231  integer*2, allocatable, dimension (:,:) :: liquid_water_path_37_pcl_sav
232  real, dimension(:,:), allocatable :: precip_water_094_sav
233  real, dimension(:,:), allocatable :: irw_temperature_sav
234  type(failed_type), dimension(:,:), allocatable :: failure_metric_37_sav
235  type(failed_type), dimension(:,:), allocatable :: failure_metric_1621_sav
236  type(failed_type), dimension(:,:), allocatable :: failure_metric_16_sav
237  type(failed_type), dimension(:,:), allocatable :: failure_metric_sav
238  type(failed_type), dimension(:,:), allocatable :: failure_metric_22_sav
239  integer*2, allocatable, dimension (:,:) :: liquid_water_path_1621_error_sav
240  integer*2, allocatable, dimension (:,:) :: effective_radius_1621_error_sav
241  integer*2, allocatable, dimension (:,:) :: optical_thickness_37_error_sav
242  integer*2, allocatable, dimension (:,:) :: optical_thickness_16_error_sav
243  integer*2, allocatable, dimension (:,:) :: optical_thickness_1621_error_sav
244  integer(integer_onebyte), allocatable, dimension (:,:) :: cloud_layer_flag_sav, ml_test_flag_sav
245  integer*2, allocatable, dimension (:,:) :: liquid_water_path_37_error_sav
246  integer*2, allocatable, dimension (:,:) :: liquid_water_path_16_error_sav
247  integer*2, allocatable, dimension (:,:) :: liquid_water_path_error_sav
248  integer*2, allocatable, dimension (:,:) :: liquid_water_path_22_error_sav
249  integer*2, allocatable, dimension (:,:) :: effective_radius_37_error_sav
250  integer*2, allocatable, dimension (:,:) :: effective_radius_16_error_sav
251  integer*2, allocatable, dimension (:,:) :: effective_radius_21_error_sav
252  integer*2, allocatable, dimension (:,:) :: effective_radius_22_error_sav
253  integer*2, allocatable, dimension (:,:) :: optical_thickness_error_sav
254  integer*2, allocatable, dimension (:,:) :: optical_thickness_22_error_sav
255  real(single), allocatable, dimension (:,:) :: liquid_water_path_1621_sav
256  real(single), allocatable, dimension (:,:) :: liquid_water_path_37_sav
257  real(single), allocatable, dimension (:,:) :: liquid_water_path_16_sav
258  real(single), allocatable, dimension (:,:) :: liquid_water_path_sav
259  real(single), allocatable, dimension (:,:) :: liquid_water_path_22_sav
260  real(single), allocatable, dimension (:,:) :: effective_radius_1621_final_sav
261  real(single), allocatable, dimension (:,:) :: effective_radius_37_final_sav
262  real(single), allocatable, dimension (:,:) :: effective_radius_21_final_sav
263  real(single), allocatable, dimension (:,:) :: effective_radius_22_final_sav
264  real(single), allocatable, dimension (:,:) :: effective_radius_16_final_sav
265  real(single), allocatable, dimension (:,:) :: optical_thickness_1621_final_sav
266  real(single), allocatable, dimension (:,:) :: optical_thickness_37_final_sav
267  real(single), allocatable, dimension (:,:) :: optical_thickness_22_final_sav
268  real(single), allocatable, dimension (:,:) :: optical_thickness_16_final_sav
269  real(single), allocatable, dimension (:,:) :: optical_thickness_final_sav
270  real(single), allocatable, dimension (:,:) :: optical_thickness_21_final_sav
271  type(processflag) , allocatable,dimension (:,:) :: cloudsummary_sav
272  integer(integer_onebyte), allocatable, dimension (:,:) :: csr_flag_array_sav
273  real, dimension(:,:,:), allocatable :: atm_corr_refl_sav
274  integer*2, dimension(:,:), allocatable :: tau_liquid_sav, tau_ice_sav, re21_liquid_sav, re21_ice_sav
275 
276 ! WDR end of save arrays
277 #endif
278 
279 end module core_arrays
280 
integer *2, dimension(:,:), allocatable optical_thickness_37_error
Definition: core_arrays.f90:76
integer *2, dimension(:,:), allocatable effective_radius_16_final_pcl
Definition: core_arrays.f90:54
type(failed_type), dimension(:,:), allocatable failure_metric_22
integer *2, dimension(:,:), allocatable optical_thickness_22_final_pcl
Definition: core_arrays.f90:50
real optical_thickness_16_liquid
Definition: core_arrays.f90:24
real(single), dimension(:,:), allocatable liquid_water_path
Definition: core_arrays.f90:65
integer *2, dimension(:,:), allocatable liquid_water_path_1621_pcl_sav
real(single), dimension(:,:), allocatable effective_radius_22_final_sav
real(single), dimension(:,:), allocatable liquid_water_path_16_sav
integer *2, dimension(:,:), allocatable effective_radius_1621_final_pcl
Definition: core_arrays.f90:58
integer *2, dimension(:,:), allocatable liquid_water_path_37_pcl_sav
integer *2, dimension(:,:), allocatable liquid_water_path_16_pcl
Definition: core_arrays.f90:61
integer *2, dimension(:,:), allocatable optical_thickness_16_error_sav
integer *1, dimension(:,:), allocatable viirs_cloudphase
integer(integer_onebyte), dimension(:,:), allocatable cloud_layer_flag
Definition: core_arrays.f90:92
real ozone_transmittance
integer *2, dimension(:,:), allocatable optical_thickness_16_final_pcl_sav
integer *2, dimension(:,:), allocatable effective_radius_16_error
Definition: core_arrays.f90:80
integer *2, dimension(:,:), allocatable tau_liquid_sav
real(single), dimension(:,:), allocatable optical_thickness_22_final_sav
real, dimension(set_number_of_bands) thermal_correction_oneway
integer *2, dimension(:,:), allocatable liquid_water_path_22_pcl_sav
real, dimension(2) thermal_correction_oneway_high
real, dimension(set_number_of_bands) meandelta_trans
integer *2, dimension(:,:), allocatable optical_thickness_22_error
Definition: core_arrays.f90:74
integer *2, dimension(:,:), allocatable effective_radius_37_error_sav
real, dimension(2) thermal_correction_twoway_high
real, dimension(20) sigma_r37_pw_liq
integer *2, dimension(:,:), allocatable liquid_water_path_16_error
Definition: core_arrays.f90:85
real(single), dimension(:,:), allocatable effective_radius_138
type(cloudmask_type), dimension(:,:), allocatable cloudmask
integer *2, dimension(:,:,:), allocatable cloud_mask_spi
integer *2, dimension(:,:), allocatable effective_radius_1621_error_sav
real(single), dimension(:,:), allocatable optical_thickness_37_final
Definition: core_arrays.f90:41
real optical_thickness_1621_ice
Definition: core_arrays.f90:26
real(single), dimension(:,:), allocatable liquid_water_path_22_sav
real(single), dimension(:,:), allocatable longitude
integer *2, dimension(:,:), allocatable optical_thickness_37_final_pcl
Definition: core_arrays.f90:52
real, dimension(20) sigma_r37_pw_ice
real(single), dimension(:,:), allocatable effective_radius_37_final
Definition: core_arrays.f90:46
real(single), dimension(:,:), allocatable cloud_top_pressure
real effective_radius_21_ice
Definition: core_arrays.f90:27
real(single), dimension(:,:), allocatable optical_thickness_1621_final_sav
real(single), dimension(:,:), allocatable liquid_water_path_37_sav
integer *2, dimension(:,:), allocatable effective_radius_21_final_pcl
Definition: core_arrays.f90:55
real(single), dimension(:,:), allocatable optical_thickness_21_final_sav
integer *2, dimension(:,:), allocatable optical_thickness_1621_error
Definition: core_arrays.f90:88
integer *2, dimension(:,:), allocatable liquid_water_path_pcl
Definition: core_arrays.f90:59
integer *2, dimension(:,:), allocatable tau_liquid
Definition: core_arrays.f90:34
real(single), dimension(:,:), allocatable effective_radius_16_final_sav
integer *2, dimension(:,:), allocatable effective_radius_22_error
Definition: core_arrays.f90:79
real, dimension(:,:), allocatable irw_temperature
real(single), dimension(:,:), allocatable latitude
integer *2, dimension(:,:), allocatable optical_thickness_error
Definition: core_arrays.f90:73
real optical_thickness_ice
Definition: core_arrays.f90:23
real effective_radius_21_liquid
Definition: core_arrays.f90:27
real(single), dimension(:,:), allocatable optical_thickness_16_final_sav
real(single), dimension(:,:), allocatable spatial_variability
Definition: core_arrays.f90:96
real(single), dimension(:,:), allocatable liquid_water_path_1621_sav
real, dimension(:,:,:), allocatable atm_corr_refl_sav
real, dimension(set_number_of_bands) transmittance_twoway
integer, parameter set_albedo_bands
integer *2, dimension(:,:), allocatable effective_radius_21_final_pcl_sav
real optical_thickness_22_liquid
Definition: core_arrays.f90:29
real, dimension(:,:,:), allocatable atm_corr_refl
character *15 platform_name
real, dimension(:,:), allocatable sensor_azimuth_angle
real optical_thickness_16_ice
Definition: core_arrays.f90:24
real, dimension(set_number_of_bands) thermal_correction_twoway
integer *1, dimension(:,:), allocatable cloud_phase_infrared
integer *2, dimension(:,:), allocatable re22_ice
Definition: core_arrays.f90:35
real effective_radius_1621_ice
Definition: core_arrays.f90:31
real(single), dimension(:,:), allocatable cloud_top_temperature_b
type(failed_type), dimension(:,:), allocatable failure_metric_1621
integer *2, dimension(:,:), allocatable liquid_water_path_error
Definition: core_arrays.f90:83
real, dimension(:,:,:), allocatable surface_albedo
type(failed_type), dimension(:,:), allocatable failure_metric_sav
type(failed_type), dimension(:,:), allocatable failure_metric_37_sav
type(failed_type), dimension(:,:), allocatable failure_metric_1621_sav
real effective_radius_22_ice
Definition: core_arrays.f90:28
real effective_radius_37_liquid
Definition: core_arrays.f90:32
type(processflag), dimension(:,:), allocatable cloudsummary
real(single), dimension(:,:), allocatable cloud_top_height
integer *2, dimension(:,:), allocatable liquid_water_path_37_error
Definition: core_arrays.f90:86
integer *2, dimension(:,:), allocatable liquid_water_path_22_error_sav
real, parameter albedo_fac
real(single), dimension(:,:), allocatable optical_thickness_138_error
real, dimension(20) emission_uncertainty_tc_liq
integer *2, dimension(:,:), allocatable liquid_water_path_16_error_sav
integer, parameter single
integer *2, dimension(:,:), allocatable liquid_water_path_error_sav
integer *2, dimension(:,:), allocatable effective_radius_16_final_pcl_sav
real optical_thickness_37_liquid
Definition: core_arrays.f90:25
integer *2, dimension(:,:), allocatable optical_thickness_16_final_pcl
Definition: core_arrays.f90:51
real optical_thickness_1621_liquid
Definition: core_arrays.f90:26
integer *2, dimension(:,:), allocatable liquid_water_path_16_pcl_sav
type(failed_type), dimension(:,:), allocatable failure_metric_16
integer *2, dimension(:,:), allocatable effective_radius_22_error_sav
real(single), dimension(:,:,:), allocatable uncertainty_138_effvar
real tc_low_for_delta
integer(integer_onebyte), dimension(:,:), allocatable csr_flag_array
Definition: core_arrays.f90:93
real, dimension(:,:), allocatable solar_zenith_angle
Definition: core_arrays.f90:6
type(stat_type) statistics_1km
integer *2, dimension(:,:), allocatable optical_thickness_final_pcl_sav
real(single), dimension(:,:), allocatable effective_radius_37_final_sav
integer *2, dimension(:,:), allocatable re22_liquid
Definition: core_arrays.f90:35
real(single), dimension(:,:), allocatable effective_radius_21_final_sav
integer *2, dimension(:,:), allocatable effective_radius_16_error_sav
real(single), dimension(:,:), allocatable liquid_water_path_37
Definition: core_arrays.f90:68
real(single), dimension(:,:), allocatable column_ozone
integer *2, dimension(:,:), allocatable effective_radius_21_error_sav
integer(integer_onebyte), dimension(:,:), allocatable restoral_pos
Definition: core_arrays.f90:97
real mean_delta_ozone
real(single), dimension(:,:), allocatable cloud_effective_emissivity
real(single), dimension(:,:), allocatable optical_thickness_final
Definition: core_arrays.f90:38
integer scn_loop_en
real, dimension(:,:), allocatable flight_time
integer *2, dimension(:,:), allocatable liquid_water_path_37_error_sav
real optical_thickness_37_ice
Definition: core_arrays.f90:25
real optical_thickness_liquid
Definition: core_arrays.f90:23
integer *2, dimension(:,:), allocatable optical_thickness_final_pcl
Definition: core_arrays.f90:49
type(failed_type), dimension(:,:), allocatable failure_metric
real(single), dimension(:,:), allocatable optical_thickness_final_sav
real(single), dimension(:,:), allocatable optical_thickness_22_final
Definition: core_arrays.f90:39
real(single), dimension(:,:,:), allocatable uncertainty_138_transmittance
real(single), dimension(:,:), allocatable liquid_water_path_1621
Definition: core_arrays.f90:69
real effective_radius_22_liquid
Definition: core_arrays.f90:28
real, dimension(:,:), allocatable snow_cover
type(failed_type), dimension(:,:), allocatable failure_metric_22_sav
integer *2, dimension(:,:), allocatable liquid_water_path_1621_error
Definition: core_arrays.f90:90
integer scn_loop_st
integer *2, dimension(:,:), allocatable effective_radius_37_final_pcl
Definition: core_arrays.f90:57
integer *2, dimension(:,:), allocatable optical_thickness_1621_final_pcl
Definition: core_arrays.f90:53
integer *1, dimension(:,:), allocatable ahi_cloudphase
real, dimension(20) emission_uncertainty_pw_liq
real(single), dimension(:,:), allocatable effective_radius_138_error
real(single), dimension(:,:,:), allocatable uncertainty_138_calibration
type(ancillary_type), dimension(:,:), allocatable model_info
real effective_radius_37_ice
Definition: core_arrays.f90:32
integer *2, dimension(:,:), allocatable re21_liquid
Definition: core_arrays.f90:34
real, dimension(:,:), allocatable precip_water_094
real(single), dimension(:,:), allocatable cloud_top_temperature
integer, dimension(2) xfr_to
real(single), dimension(:,:), allocatable liquid_water_path_sav
integer *2, dimension(:,:), allocatable optical_thickness_22_final_pcl_sav
real(single), dimension(:,:,:), allocatable surface_emissivity_land
integer, dimension(2) xfr_from
integer *2, dimension(:,:), allocatable optical_thickness_1621_error_sav
type(ancillary_type) c2_model_info
real(single), dimension(:,:,:), allocatable band_measurements
real effective_radius_16_liquid
Definition: core_arrays.f90:30
real, dimension(:,:,:), allocatable clear_sky_btemp
real, dimension(:,:), allocatable sensor_zenith_angle
integer *2, dimension(:,:), allocatable effective_radius_22_final_pcl_sav
integer *2, dimension(:,:), allocatable optical_thickness_22_error_sav
integer(integer_onebyte), dimension(:,:), allocatable ml_test_flag
Definition: core_arrays.f90:92
real(single), dimension(:,:), allocatable relative_azimuth_angle
real(single), dimension(:,:), allocatable surface_temperature
real, dimension(:,:,:), allocatable clear_sky_rad
integer *2, dimension(:,:), allocatable effective_radius_22_final_pcl
Definition: core_arrays.f90:56
real(single), dimension(:,:), allocatable optical_thickness_1621_final
Definition: core_arrays.f90:42
integer(integer_onebyte), dimension(:,:), allocatable csr_flag_array_sav
real(single), dimension(:,:), allocatable optical_thickness_138
real tc_high_for_delta
integer *2, dimension(:,:), allocatable effective_radius_37_final_pcl_sav
integer *2, dimension(:,:), allocatable re21_ice
Definition: core_arrays.f90:35
integer *2, dimension(:,:), allocatable optical_thickness_37_error_sav
integer *2, dimension(:,:), allocatable optical_thickness_error_sav
integer *2, dimension(:,:), allocatable effective_radius_1621_error
Definition: core_arrays.f90:89
real effective_radius_16_ice
Definition: core_arrays.f90:30
type(qualityanalysis), dimension(:,:), allocatable processing_information
integer *2, dimension(:,:), allocatable tau_ice_sav
integer *2, dimension(:,:), allocatable effective_radius_21_error
Definition: core_arrays.f90:78
real(single), dimension(:,:), allocatable liquid_water_path_16
Definition: core_arrays.f90:67
real(single), dimension(:,:), allocatable abovecloud_watervapor
integer, parameter set_number_of_bands
integer *2, dimension(:,:), allocatable optical_thickness_1621_final_pcl_sav
integer *1, dimension(:,:), allocatable seviri_cloudphase
real(single), dimension(:,:), allocatable effective_radius_1621_final_sav
type(failed_type), dimension(:,:), allocatable failure_metric_37
real(single), dimension(:,:), allocatable effective_radius_22_final
Definition: core_arrays.f90:45
real, dimension(20) emission_uncertainty_pw_ice
integer *2, dimension(:,:), allocatable liquid_water_path_22_pcl
Definition: core_arrays.f90:60
real, dimension(:,:,:), allocatable band_uncertainty
real(single), dimension(:,:), allocatable liquid_water_path_22
Definition: core_arrays.f90:66
real, dimension(:,:), allocatable precip_water_094_sav
integer *2, dimension(:,:), allocatable liquid_water_path_pcl_sav
real(single), dimension(:,:), allocatable optical_thickness_16_final
Definition: core_arrays.f90:40
real(single), dimension(:,:), allocatable optical_thickness_37_final_sav
integer *2, dimension(:,:), allocatable re21_ice_sav
real(single), dimension(:,:), allocatable effective_radius_16_final
Definition: core_arrays.f90:43
integer *2, dimension(:,:), allocatable optical_thickness_37_final_pcl_sav
real, dimension(set_number_of_bands) transmittance_stddev
integer(integer_onebyte), dimension(:,:), allocatable ml_test_flag_sav
real, dimension(:,:), allocatable solar_azimuth_angle
integer *1, dimension(:,:), allocatable cloud_height_method
real, dimension(2) thermal_correction_oneway_low
integer xfr_num
real, dimension(2) thermal_correction_twoway_low
real, dimension(:,:), allocatable irw_temperature_sav
integer *2, dimension(:,:), allocatable optical_thickness_16_error
Definition: core_arrays.f90:75
integer(integer_onebyte), dimension(:,:), allocatable cloud_layer_flag_sav
real transprime_1way
real, dimension(:,:), allocatable scatter_angle
integer *2, dimension(:,:), allocatable liquid_water_path_1621_error_sav
type(processflag), dimension(:,:), allocatable cloudsummary_sav
real, dimension(set_albedo_bands) albedo_real4
integer *2, dimension(:,:), allocatable tau_ice
Definition: core_arrays.f90:34
type(qualityanalysis), dimension(:,:), allocatable processing_information_sav
integer *2, dimension(:,:), allocatable effective_radius_37_error
Definition: core_arrays.f90:81
real(single), dimension(:,:), allocatable effective_radius_1621_final
Definition: core_arrays.f90:47
integer *2, dimension(:,:), allocatable liquid_water_path_37_pcl
Definition: core_arrays.f90:62
integer *2, dimension(:,:), allocatable re21_liquid_sav
real transprime_2way
real optical_thickness_22_ice
Definition: core_arrays.f90:29
integer *2, dimension(:,:), allocatable liquid_water_path_1621_pcl
Definition: core_arrays.f90:63
integer *2, dimension(:,:), allocatable liquid_water_path_22_error
Definition: core_arrays.f90:84
real, dimension(20) emission_uncertainty_tc_ice
type(failed_type), dimension(:,:), allocatable failure_metric_16_sav
integer *2, dimension(:,:), allocatable effective_radius_1621_final_pcl_sav
real effective_radius_1621_liquid
Definition: core_arrays.f90:31
real(single), dimension(:,:), allocatable effective_radius_21_final
Definition: core_arrays.f90:44