pro append_the_microdata_output ;iwc_out=dbz5 & iwc5[*,*]=-9999. ;re_ice_out=dbz5 & ice_size5[*,*]=-9999. ;icemicro_error=dbz5 & icemicro_error[*,*]=-9999. ;iwc_source=intarr(n_elements(hrfrac5),n_elements(height5)) ;ice_size_source=intarr(n_elements(hrfrac5),n_elements(height5)) ;ice_tau_solar=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_solar_wl)) ; the 32 is for the raprad solar bands ;ice_omega_solar=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_solar_wl)) ;ice_g_solar=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_solar_wl)) ;ice_tau_ir=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_ir_wl)) ; the 16 is for the raprad ir bands ;ice_omega_ir=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_ir_wl)) ;ice_g_ir=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_ir_wl)) ;ice_rad_param_source=intarr(n_elements(hrfrac5),n_elements(height5),2) ; solar and ir ;lwc_out=dbz5 & lwc5[*,*]=-9999. ;re_liq_out=dbz5 & re5[*,*]=-9999. ;liqmicro_error=dbz5 & liqmicro_error[*,*]=-9999. ;lwc_source=intarr(n_elements(hrfrac5),n_elements(height5)) ;liq_size_source=intarr(n_elements(hrfrac5),n_elements(height5)) ;liq_tau_solar=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_solar_wl)) ; the 32 is for the raprad bands ;liq_omega_solar=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_solar_wl)) ;liq_g_solar=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_solar_wl)) ;liq_tau_ir=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_ir_wl)) ; the 18 is for the raprad ir bands ;liq_omega_ir=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_ir_wl)) ;liq_g_ir=fltarr(n_elements(hrfrac5),n_elements(height5),n_elements(rap_ir_wl)) ;liq_rad_param_source=intarr(n_elements(hrfrac5),n_elements(height5),2) ; solar and ir ;ice_fraction=fltarr(n_elements(hrfrac5),n_elements(height5)) common append_data, n_times,n_heights,n_solar_bands,n_ir_bands, iwc_out, re_ice_out, icemicro_error, $ iwc_source, ice_size_source, ice_tau_solar, ice_omega_solar, ice_g_solar, ice_omega_ir, ice_g_ir, $ ice_rad_param_source, lwc_out, re_liq_out, liqmicro_error, lwc_source, liq_size_source, liq_tau_solar, $ liq_omega_solar, liq_g_solar, liq_tau_ir, liq_omega_ir, liq_g_ir, liq_rad_param_source, $ ice_fraction, layer_type