set_retr_general_output.f90 File Reference

Functions/Subroutines

subroutine output_aerosol_initialization (GOUT_aerosol)
 
subroutine output_gases_initialization (GOUT_gases)
 
subroutine output_surface_initialization (GOUT_surf)
 
subroutine output_err_estim_initialization (GOUT_errest)
 
subroutine output_err_estim_initialization_mic (GOUT_errest)
 
subroutine output_forcing_initialization (GOUT_forcing)
 
subroutine output_retrieval_initialization (GOUT_retrieval)
 
subroutine output_coordinates_initialization (GOUT_coord)
 
subroutine set_pixel_retr_output_residual (INVSING, niter, ipix, ALS, INOISE, resa, resr, GOUT_retrieval_res)
 
subroutine set_total_retr_output_residual (niter, AGENP, INOISE, resat, resrt, GOUT_retrieval_res)
 
subroutine sd_precalcul_ln_bins (RIN, GOUT_retrieval_info, npixels, IDIM1, SD, SDout)
 
subroutine sd_lognormal (RIN, GOUT_retrieval_info, ipix, IDIM1, SD, CV, SDout)
 
subroutine sd2m_min_index_lb (iu, IPRI, NBINT, RADIUST, IMIN)
 
subroutine sd2m_min_index_tb (iu, IPRI, NBINT, RADIUST, SDT, IMIN)
 
subroutine sd2m_fine_coarse (IMIN, par_type, NBIN, RADIUS, SD, NBINL, RADIUSL, SDL, SDFC, cv, std, rm, reff)
 
subroutine sd2m_reff (NBIN, RADIUS, SD, reff)
 
subroutine sd2m_reff_2modes_retrieval (ipix, GOUT_retrieval, reff)
 
real(4) function reff_lognormal_sd (id_sd, sigma, rm)
 Routine calculates effective radius for lognormal size distribution. More...
 
subroutine sd2m_rm (NBIN, RADIUS, SD, rm)
 
subroutine sd2m_cv (NBIN, RADIUS, SD, cv)
 
subroutine sd2m_std (NBIN, RADIUS, SD, rm, cv, std)
 
subroutine set_gout_product_flags (RIN, GOUT_products)
 
subroutine set_segm_retr_output (RIN, segment, GOUT)
 
subroutine get_pm (D_MAX, RIN, GOUT, segment_meas, PM)
 
subroutine get_aerosol_types (RIN, GOUT, npixels, aerosol_type_index)
 
subroutine set_gout_pixel (iu_main_output, RIN, segment_meas, tiny_wvl_models, ipix, nangles, sca_angles, AP, GOUT, KERNELS1, KERNELS2)
 
subroutine total_single_scattering_properties (iu_main_output, ipix, NANG, NEL, NSD, RIN_products_particles, IW, WL, GOUT_particles, GOUT_products_particles)
 
subroutine theoretical_modes_2 (iu_main_output, ipix, tiny_wvl_models, RIN, NSD, RIN_products_particles, forw_particles, GOUT_retrieval, GOUT_particles, GOUT_products_particles, KERNELS1, KERNELS2)
 
subroutine set_gout_sd_pixel (RIN, GOUT, ipix)
 
subroutine set_gout_sd_tb_pixel (RIN, GOUT, IDIM1, ipix)
 
subroutine set_gout_sd_lb_pixel (RIN, GOUT, IDIM1, ipix)
 
subroutine set_gout_sd_ln_pixel (RIN, GOUT, IDIM1, ipix)
 
subroutine set_gout_sd_err_estim_segment (iu_main_output, RIN, GOUT)
 Routine sets Generalized OUTput structure for segment with errors. More...
 
subroutine set_gout_sd_tb_err_est_pixel (RIN, GOUT, IDIM1, ipix)
 Routine sets Generalized OUTput structure for single pixel with errors. More...
 
subroutine set_gout_particles_parameters (RIN, forw_particles, GOUT_retrieval_par_pixel)
 
subroutine set_gout_surface_parameters (ind_wl, BRF_land, BRP_land, BRM_water, GOUT_retrieval_par_pixel)
 
subroutine set_gout_info_surface (RIN, GOUT)
 
subroutine set_gout_cutoff_single_scattering_properties (ipix, ind_wl, i, nsd, nangles, GOUT_particles_in, GOUT_particles_out)
 

Function/Subroutine Documentation

◆ get_aerosol_types()

subroutine get_aerosol_types ( type(retr_input_settings), intent(in)  RIN,
type(output_segment_general), intent(in)  GOUT,
integer, intent(in)  npixels,
integer, dimension(kimage), intent(out)  aerosol_type_index 
)

◆ get_pm()

subroutine get_pm ( real, intent(in)  D_MAX,
type(retr_input_settings), intent(in)  RIN,
type(output_segment_general), intent(in)  GOUT,
type(segment_data), intent(in)  segment_meas,
real, dimension(kimage), intent(out)  PM 
)

◆ output_aerosol_initialization()

subroutine output_aerosol_initialization ( type(output_segment_particles), intent(out)  GOUT_aerosol)

◆ output_coordinates_initialization()

subroutine output_coordinates_initialization ( type(output_segment_coordinates), intent(out)  GOUT_coord)

◆ output_err_estim_initialization()

subroutine output_err_estim_initialization ( type(output_segment_err_estim), intent(out)  GOUT_errest)

◆ output_err_estim_initialization_mic()

subroutine output_err_estim_initialization_mic ( type(output_segment_err_estim), intent(out)  GOUT_errest)

◆ output_forcing_initialization()

subroutine output_forcing_initialization ( type(output_segment_rad_forcing), intent(out)  GOUT_forcing)

◆ output_gases_initialization()

subroutine output_gases_initialization ( type(output_segment_gases), intent(out)  GOUT_gases)

◆ output_retrieval_initialization()

subroutine output_retrieval_initialization ( type(output_segment_retrieval), intent(out)  GOUT_retrieval)

◆ output_surface_initialization()

subroutine output_surface_initialization ( type(output_segment_surface), intent(out)  GOUT_surf)

◆ reff_lognormal_sd()

real(4) function reff_lognormal_sd ( integer, intent(in)  id_sd,
real(4), intent(in)  sigma,
real(4), intent(in)  rm 
)

Routine calculates effective radius for lognormal size distribution.

Author
Tatsiana Lapionak
Date
5 MAY 2015
Parameters
[in]id_sd- 0 - number, 1 - radius, 2 - cross section, 3 - volume sd
[in]rm- mean radius in micromiters
[in]sigma- standard deviation

◆ sd2m_cv()

subroutine sd2m_cv ( integer, intent(in)  NBIN,
real, dimension(nbin), intent(in)  RADIUS,
real, dimension(nbin), intent(in)  SD,
real, intent(out)  cv 
)

◆ sd2m_fine_coarse()

subroutine sd2m_fine_coarse ( integer, intent(in)  IMIN,
integer, intent(in)  par_type,
integer, intent(in)  NBIN,
real, dimension(kidim3), intent(in)  RADIUS,
real, dimension(kidim3), intent(in)  SD,
integer, intent(in)  NBINL,
real, dimension(nrr), intent(in)  RADIUSL,
real, dimension(nrr,kcpar), intent(in)  SDL,
real, dimension(kidim3,2), intent(out)  SDFC,
real, dimension(0:2), intent(out)  cv,
real, dimension(0:2), intent(out)  std,
real, dimension(0:2), intent(out)  rm,
real, dimension(0:2), intent(out)  reff 
)

◆ sd2m_min_index_lb()

subroutine sd2m_min_index_lb ( integer, intent(in)  iu,
logical, intent(in)  IPRI,
integer, intent(in)  NBINT,
real, dimension(nbint), intent(in)  RADIUST,
integer, intent(out)  IMIN 
)

◆ sd2m_min_index_tb()

subroutine sd2m_min_index_tb ( integer, intent(in)  iu,
logical, intent(in)  IPRI,
integer, intent(in)  NBINT,
real, dimension(nbint), intent(in)  RADIUST,
real, dimension(nbint), intent(in)  SDT,
integer, intent(out)  IMIN 
)

◆ sd2m_reff()

subroutine sd2m_reff ( integer, intent(in)  NBIN,
real, dimension(nbin), intent(in)  RADIUS,
real, dimension(nbin), intent(in)  SD,
real, intent(out)  reff 
)

◆ sd2m_reff_2modes_retrieval()

subroutine sd2m_reff_2modes_retrieval ( integer, intent(in)  ipix,
type(output_segment_retrieval), intent(in)  GOUT_retrieval,
real, dimension(0:2), intent(out)  reff 
)

◆ sd2m_rm()

subroutine sd2m_rm ( integer, intent(in)  NBIN,
real, dimension(nbin), intent(in)  RADIUS,
real, dimension(nbin), intent(in)  SD,
real, intent(out)  rm 
)

◆ sd2m_std()

subroutine sd2m_std ( integer, intent(in)  NBIN,
real, dimension(nbin), intent(in)  RADIUS,
real, dimension(nbin), intent(in)  SD,
real, intent(in)  rm,
real, intent(in)  cv,
real, intent(out)  std 
)

◆ sd_lognormal()

subroutine sd_lognormal ( type(retr_input_settings), intent(in)  RIN,
type(output_info), intent(in)  GOUT_retrieval_info,
integer, intent(in)  ipix,
integer, intent(in)  IDIM1,
real, dimension(kidim3,kidim2,kimage), intent(in)  SD,
real, dimension(kidim3,kidim2,kimage), intent(in)  CV,
real, dimension(knpar,kidim2,kimage), intent(out)  SDout 
)

◆ sd_precalcul_ln_bins()

subroutine sd_precalcul_ln_bins ( type(retr_input_settings), intent(in)  RIN,
type(output_info), intent(in)  GOUT_retrieval_info,
integer, intent(in)  npixels,
integer, intent(in)  IDIM1,
real, dimension(kidim3,kidim2,kimage), intent(in)  SD,
real, dimension(nrr,kidim2,kimage), intent(out)  SDout 
)

◆ set_gout_cutoff_single_scattering_properties()

subroutine set_gout_cutoff_single_scattering_properties ( integer, intent(in)  ipix,
integer, intent(in)  ind_wl,
integer, intent(in)  i,
integer, intent(in)  nsd,
integer, intent(in)  nangles,
type(output_segment_particles), intent(in)  GOUT_particles_in,
type(output_segment_particles), intent(inout)  GOUT_particles_out 
)

◆ set_gout_info_surface()

subroutine set_gout_info_surface ( type(retr_input_settings), intent(in)  RIN,
type(output_segment_general), intent(inout)  GOUT 
)

◆ set_gout_particles_parameters()

subroutine set_gout_particles_parameters ( type(retr_input_settings), intent(in)  RIN,
type(forward_model_characteristics_particles), intent(in)  forw_particles,
type(output_pixel_retr_par), intent(inout)  GOUT_retrieval_par_pixel 
)

◆ set_gout_pixel()

subroutine set_gout_pixel ( integer, intent(in)  iu_main_output,
type(retr_input_settings), intent(in)  RIN,
type(segment_data), intent(in)  segment_meas,
real, intent(in)  tiny_wvl_models,
integer, intent(in)  ipix,
integer, intent(in)  nangles,
real, dimension(kmpar), intent(in)  sca_angles,
real, dimension(kpars,kimage), intent(in)  AP,
type(output_segment_general), intent(inout)  GOUT,
type(kernels_triangle_bin), intent(inout)  KERNELS1,
type(kernels_lognormal_bin), intent(inout)  KERNELS2 
)

◆ set_gout_product_flags()

subroutine set_gout_product_flags ( type(retr_input_settings), intent(in)  RIN,
type(output_segment_products), intent(inout)  GOUT_products 
)

◆ set_gout_sd_err_estim_segment()

subroutine set_gout_sd_err_estim_segment ( integer, intent(in)  iu_main_output,
type(retr_input_settings), intent(in)  RIN,
type(output_segment_general), intent(inout)  GOUT 
)

Routine sets Generalized OUTput structure for segment with errors.

of Size Distribution retrieved for Triangle Bins SD model

Parameters
[in]iu_main_output- unit number of main output file
[in]RIN- settings structure
[in,out]GOUT- general output structure

◆ set_gout_sd_lb_pixel()

subroutine set_gout_sd_lb_pixel ( type(retr_input_settings), intent(in)  RIN,
type(output_segment_general), intent(inout)  GOUT,
integer, intent(in)  IDIM1,
integer, intent(in)  ipix 
)

◆ set_gout_sd_ln_pixel()

subroutine set_gout_sd_ln_pixel ( type(retr_input_settings), intent(in)  RIN,
type(output_segment_general), intent(inout)  GOUT,
integer, intent(in)  IDIM1,
integer, intent(in)  ipix 
)

◆ set_gout_sd_pixel()

subroutine set_gout_sd_pixel ( type(retr_input_settings), intent(in)  RIN,
type(output_segment_general), intent(inout)  GOUT,
integer, intent(in)  ipix 
)

◆ set_gout_sd_tb_err_est_pixel()

subroutine set_gout_sd_tb_err_est_pixel ( type(retr_input_settings), intent(in)  RIN,
type(output_segment_general), intent(inout)  GOUT,
integer, intent(in)  IDIM1,
integer, intent(in)  ipix 
)

Routine sets Generalized OUTput structure for single pixel with errors.

of Size Distribution retrieved for Triangle Bins SD model

Parameters
[in]RIN- settings structure
[in]IDIM1- index of Triangle Bins SD characteristic in settings
[in]ipix- pixxel index
[in,out]GOUT- general output structure

◆ set_gout_sd_tb_pixel()

subroutine set_gout_sd_tb_pixel ( type(retr_input_settings), intent(in)  RIN,
type(output_segment_general), intent(inout)  GOUT,
integer, intent(in)  IDIM1,
integer, intent(in)  ipix 
)

◆ set_gout_surface_parameters()

subroutine set_gout_surface_parameters ( integer, intent(in)  ind_wl,
real, dimension(kbf), intent(in)  BRF_land,
real, dimension(kbf), intent(in)  BRP_land,
real, dimension(kbf), intent(in)  BRM_water,
type(output_pixel_retr_par), intent(inout)  GOUT_retrieval_par_pixel 
)

◆ set_pixel_retr_output_residual()

subroutine set_pixel_retr_output_residual ( integer, intent(in)  INVSING,
integer, intent(in)  niter,
integer, intent(in)  ipix,
real, intent(in)  ALS,
integer, intent(in)  INOISE,
real, dimension(kknoise), intent(in)  resa,
real, dimension(kknoise), intent(in)  resr,
type(output_segment_residual), intent(inout)  GOUT_retrieval_res 
)

◆ set_segm_retr_output()

subroutine set_segm_retr_output ( type(retr_input_settings), intent(in)  RIN,
type(segment_data), intent(in)  segment,
type(output_segment_general), intent(out)  GOUT 
)

◆ set_total_retr_output_residual()

subroutine set_total_retr_output_residual ( integer, intent(in)  niter,
real, intent(in)  AGENP,
integer, intent(in)  INOISE,
real, dimension(kknoise), intent(in)  resat,
real, dimension(kknoise), intent(in)  resrt,
type(output_segment_residual), intent(inout)  GOUT_retrieval_res 
)

◆ theoretical_modes_2()

subroutine theoretical_modes_2 ( integer, intent(in)  iu_main_output,
integer, intent(in)  ipix,
real, intent(in)  tiny_wvl_models,
type(retr_input_settings), intent(in)  RIN,
integer, intent(in)  NSD,
type(output_segment_products_particles), intent(in)  RIN_products_particles,
type(forward_model_characteristics_particles), intent(in)  forw_particles,
type(output_segment_retrieval), intent(in)  GOUT_retrieval,
type(output_segment_particles), intent(inout)  GOUT_particles,
type(output_segment_products_particles), intent(inout)  GOUT_products_particles,
type(kernels_triangle_bin), intent(inout)  KERNELS1,
type(kernels_lognormal_bin), intent(inout)  KERNELS2 
)

◆ total_single_scattering_properties()

subroutine total_single_scattering_properties ( integer, intent(in)  iu_main_output,
integer, intent(in)  ipix,
integer, intent(in)  NANG,
integer, intent(in)  NEL,
integer, intent(in)  NSD,
type(output_segment_products_particles), intent(in)  RIN_products_particles,
integer, intent(in)  IW,
real, intent(in)  WL,
type(output_segment_particles), intent(inout)  GOUT_particles,
type(output_segment_products_particles), intent(inout)  GOUT_products_particles 
)