mod_forward_model Module Reference

Functions/Subroutines

subroutine forward_model_pixel_wl (iu_main_output, RIN, ipix, igab, ihyper, ikdist, ifilter, istdat, ATMOS_EMIS, SOLAR_EMIS, IW, WAVE, ind_wl, lresult, NBIN, RADIUS, SD, NSHAPE, RATIOS, SHD, RREAL, RIMAG, OSHP, iBRF_land, iBPF_land, iBRM_water, BRF_land, BRP_land, BRM_water, tau_mol, HOBS_km, HGR_km, HMAX_atm_km, NHVP_fit, HVP_fit_km, NHVP_retr, HVP_retr_km, H0, sigma_aerosol, CL, abs_data_forw_im, gas_abs_data_forw_im, Nsubchannels, WL_Subchannels, WL_Planck, bandwidth, filters_trans, RREAL_Subchannels, RIMAG_Subchannels, GAS_C_REF, NSPECIES, NGAS, CGAS, pixel_fit, GOUT_aerosol, GOUT_gases, GOUT_surface, MU, tau_mol_I, ind_wl_i, MDPR_wl, GOUT_bbflux_pixel, NANG, ANGL, KERNELS1, KERNELS2)
 
subroutine forw_phase_matrix (iu_main_output, IPRI_verbose, IPRI_additional_info, NSD, NBIN, RADIUS, SD, KNLN, NSHAPE, RATIOS, SHD, ind_wl, WAVE, RREAL, RIMAG, use_models, tiny_wvl_models, NANG, ANGL, ipix, GOUT_particles_opt_pixel_wl, GOUT_particles_phmx_pixel_wl, ext_norm, DLSF, KERNELS1, KERNELS2)
 
subroutine forw_lidar_signal (HOBS_km, HGR_km, HMAX_atm_km, NHVP_fit, HVP_fit_km, NHVP_retr, HVP_retr_km, H0, CL, MDPR_wl, NSD, EXTA, LRA, tau_mol, MPROF, mol_prof_type, aer_prof_type, EXTA_I, tau_mol_I, DR_PAR, DR_PER, MU, meas_type, meas)
 
subroutine forw_radiative_transfer (iFlux, igab, ikdist, ifilter, ATMOS_EMIS, SOLAR_EMIS, RIN, IW, WAVE, ind_wl, IP, OSHP, iBRF_land, iBPF_land, iBRM_water, BRF_land, BRP_land, BRM_water, tau_mol, HOBS_km, HGR_km, HMAX_atm_km, NHVP_retr, HVP_retr_km, H0, sigma_aerosol, laerosol, lsurface, NANG, ANGL, NSD, NBIN, SD, ext_norm, abs_data_forw_im, gas_abs_data_forw_im, nsubchannels, WL_Planck, bandwidth, filters_trans, NGAS, CGAS, ipix, pixel_fit, GOUT_aerosol_opt_pixel_wl, GOUT_aerosol_phmx_pixel_wl, GOUT_surface_pixel_wl, GOUT_bbflux_pixel, NBV_comb, SLout_comb, SQout_comb, SUout_comb, SLPout_comb)
 
subroutine forward_model_pixel (iu_main_output, RIN, OSHP, ipix, IWb, IWe, IWW, lresult, tau_mol, NHVP_meas, HVP_meas, nwl_pix, wl_pix, ind_wl, AP, pixel_fit, pixel_vec_fit, GOUT_aerosol, GOUT_gases, GOUT_surface, GOUT_retrieval, ind_wl_i, MDPR, NANG, ANGL, KERNELS1, KERNELS2)
 
subroutine forw_single_scattering_particle_properties (iu_main_output, RIN, NSD, NBIN, RADIUS, SD, KNLN, NSHAPE, RATIOS, SHD, IW, WAVE, RREAL, RIMAG, NANG, ANGL, ipix, GOUT_particles, ext_norm, KERNELS1, KERNELS2)
 
subroutine set_surface_parameter_vectors (RIN, BRF_land, BRP_land, BRM_water, surf_land_par_num, surf_land_par_vect, surf_water_par_num, surf_water_par_vect)
 
subroutine get_temperature_profile (DISCRVD, ATM_PROF, T_profile)
 
subroutine ss_particle_properties_subch_int (Nsubchannels, ipix, IW, NSD, NANG, GOUT_aerosol_Subchannels, RREAL_Subchannels, RIMAG_Subchannels, bandwidth, RREAL, RIMAG, GOUT_aerosol)
 

Function/Subroutine Documentation

◆ forw_lidar_signal()

subroutine mod_forward_model::forw_lidar_signal ( real, intent(in)  HOBS_km,
real, intent(in)  HGR_km,
real, intent(in)  HMAX_atm_km,
integer, intent(in)  NHVP_fit,
real, dimension(kvertm), intent(in)  HVP_fit_km,
integer, intent(in)  NHVP_retr,
real, dimension(kvertm), intent(in)  HVP_retr_km,
real, dimension(kvertm,ksd), intent(in)  H0,
real, intent(in)  CL,
real, intent(in)  MDPR_wl,
integer, intent(in)  NSD,
real, dimension(ksd), intent(in)  EXTA,
real, dimension(ksd), intent(in)  LRA,
real, intent(in)  tau_mol,
real, dimension(kvertm), intent(in)  MPROF,
integer, intent(in)  mol_prof_type,
integer, intent(in)  aer_prof_type,
real, dimension(ksd), intent(in)  EXTA_I,
real, intent(in)  tau_mol_I,
real, dimension(ksd), intent(in)  DR_PAR,
real, dimension(ksd), intent(in)  DR_PER,
real, intent(in)  MU,
integer, intent(in)  meas_type,
real, dimension(kvertm), intent(out)  meas 
)

◆ forw_phase_matrix()

subroutine mod_forward_model::forw_phase_matrix ( integer, intent(in)  iu_main_output,
logical, intent(in)  IPRI_verbose,
logical, intent(in)  IPRI_additional_info,
integer, intent(in)  NSD,
integer, dimension(ksd), intent(in)  NBIN,
real, dimension(kidim3,ksd), intent(in)  RADIUS,
real, dimension(kidim3,ksd), intent(in)  SD,
integer, dimension(ksd), intent(in)  KNLN,
integer, dimension(ksd), intent(in)  NSHAPE,
real, dimension(kshape,ksd), intent(in)  RATIOS,
real, dimension(kshape,ksd), intent(in)  SHD,
integer, intent(in)  ind_wl,
real, intent(in)  WAVE,
real, dimension(ksd), intent(inout)  RREAL,
real, dimension(ksd), intent(inout)  RIMAG,
logical, intent(in)  use_models,
real, intent(in)  tiny_wvl_models,
integer, intent(out)  NANG,
real, dimension(kmpar), intent(out)  ANGL,
integer, intent(in)  ipix,
type(output_pixel_opt_wl), intent(inout)  GOUT_particles_opt_pixel_wl,
type(output_pixel_ph_matrix_wl), intent(inout)  GOUT_particles_phmx_pixel_wl,
real, dimension(ksd), intent(out)  ext_norm,
type(ip_flags_for_dls), intent(in)  DLSF,
type(kernels_triangle_bin), intent(inout)  KERNELS1,
type(kernels_lognormal_bin), intent(inout)  KERNELS2 
)

◆ forw_radiative_transfer()

subroutine mod_forward_model::forw_radiative_transfer ( logical, intent(inout)  iFlux,
logical, intent(in)  igab,
logical, intent(in)  ikdist,
logical, intent(in)  ifilter,
logical, intent(in)  ATMOS_EMIS,
logical, intent(in)  SOLAR_EMIS,
type(retr_input_settings), intent(in)  RIN,
integer, intent(in)  IW,
real, intent(in)  WAVE,
integer, intent(in)  ind_wl,
integer, intent(in)  IP,
type(osh_par), intent(in)  OSHP,
integer, intent(in)  iBRF_land,
integer, intent(in)  iBPF_land,
integer, intent(in)  iBRM_water,
real, dimension(kbf), intent(in)  BRF_land,
real, dimension(kbf), intent(in)  BRP_land,
real, dimension(kbf), intent(in)  BRM_water,
real, intent(in)  tau_mol,
real, intent(in)  HOBS_km,
real, intent(in)  HGR_km,
real, intent(in)  HMAX_atm_km,
integer, intent(in)  NHVP_retr,
real, dimension(kvertm), intent(in)  HVP_retr_km,
real, dimension(kvertm,ksd), intent(inout)  H0,
real, dimension(ksd), intent(in)  sigma_aerosol,
logical, intent(in)  laerosol,
logical, intent(in)  lsurface,
integer, intent(in)  NANG,
real, dimension(kmpar), intent(in)  ANGL,
integer, intent(in)  NSD,
integer, dimension(ksd), intent(in)  NBIN,
real, dimension(kidim3,ksd), intent(in)  SD,
real, dimension(ksd), intent(in)  ext_norm,
type (data_abs), intent(in)  abs_data_forw_im,
type (data_gas), intent(inout)  gas_abs_data_forw_im,
integer, intent(in)  nsubchannels,
real, dimension(n_wl_channel_max,n_sub_channel_max), intent(inout)  WL_Planck,
real, dimension(n_sub_channel_max), intent(in)  bandwidth,
type(filter_transmission), intent(in)  filters_trans,
integer, intent(in)  NGAS,
real, dimension(nmg), intent(in)  CGAS,
integer, intent(in)  ipix,
type(pixel), intent(inout)  pixel_fit,
type(output_pixel_opt_wl), dimension(kw), intent(inout)  GOUT_aerosol_opt_pixel_wl,
type(output_pixel_ph_matrix_wl), dimension(kw), intent(inout)  GOUT_aerosol_phmx_pixel_wl,
type(output_pixel_surface_wl), intent(inout)  GOUT_surface_pixel_wl,
type(output_pixel_bbflux), intent(inout)  GOUT_bbflux_pixel,
integer, intent(inout)  NBV_comb,
real, dimension(2*nbvm), intent(inout)  SLout_comb,
real, dimension(2*nbvm), intent(inout)  SQout_comb,
real, dimension(2*nbvm), intent(inout)  SUout_comb,
real, dimension(2*nbvm), intent(inout)  SLPout_comb 
)

◆ forw_single_scattering_particle_properties()

subroutine mod_forward_model::forw_single_scattering_particle_properties ( integer, intent(in)  iu_main_output,
type(retr_input_settings), intent(in)  RIN,
integer, intent(in)  NSD,
integer, dimension(ksd), intent(in)  NBIN,
real, dimension(kidim3,ksd), intent(in)  RADIUS,
real, dimension(kidim3,ksd), intent(in)  SD,
integer, dimension(ksd), intent(in)  KNLN,
integer, dimension(ksd), intent(in)  NSHAPE,
real, dimension(kshape,ksd), intent(in)  RATIOS,
real, dimension(kshape,ksd), intent(in)  SHD,
integer, intent(in)  IW,
real, intent(in)  WAVE,
real, dimension(ksd), intent(inout)  RREAL,
real, dimension(ksd), intent(inout)  RIMAG,
integer, intent(out)  NANG,
real, dimension(kmpar), intent(out)  ANGL,
integer, intent(in)  ipix,
type(output_segment_particles), intent(inout)  GOUT_particles,
real, dimension(ksd), intent(out)  ext_norm,
type(kernels_triangle_bin), intent(inout)  KERNELS1,
type(kernels_lognormal_bin), intent(inout)  KERNELS2 
)

◆ forward_model_pixel()

subroutine mod_forward_model::forward_model_pixel ( integer, intent(in)  iu_main_output,
type(retr_input_settings), intent(in)  RIN,
type(osh_par), intent(in)  OSHP,
integer, intent(in)  ipix,
integer, intent(in)  IWb,
integer, intent(in)  IWe,
integer, intent(in)  IWW,
logical, intent(in)  lresult,
real, dimension(kw), intent(in)  tau_mol,
integer, intent(in)  NHVP_meas,
real, dimension(kvertm), intent(in)  HVP_meas,
integer, intent(in)  nwl_pix,
real, dimension(kw), intent(in)  wl_pix,
integer, dimension(kw), intent(in)  ind_wl,
real, dimension(kpars), intent(in)  AP,
type(pixel), intent(inout)  pixel_fit,
type(pixel_vector), intent(inout)  pixel_vec_fit,
type(output_segment_particles), intent(inout)  GOUT_aerosol,
type(output_segment_gases), intent(inout)  GOUT_gases,
type(output_segment_surface), intent(inout)  GOUT_surface,
type(output_segment_retrieval), intent(inout)  GOUT_retrieval,
integer, dimension(kw), intent(in)  ind_wl_i,
real, dimension(kw), intent(in)  MDPR,
integer, intent(out)  NANG,
real, dimension(kmpar), intent(out)  ANGL,
type(kernels_triangle_bin), intent(inout)  KERNELS1,
type(kernels_lognormal_bin), intent(inout)  KERNELS2 
)

◆ forward_model_pixel_wl()

subroutine mod_forward_model::forward_model_pixel_wl ( integer, intent(in)  iu_main_output,
type(retr_input_settings), intent(in)  RIN,
integer, intent(in)  ipix,
logical, intent(in)  igab,
logical, intent(in)  ihyper,
logical, intent(in)  ikdist,
logical, intent(in)  ifilter,
logical, intent(in)  istdat,
logical, intent(in)  ATMOS_EMIS,
logical, intent(in)  SOLAR_EMIS,
integer, intent(in)  IW,
real, intent(in)  WAVE,
integer, intent(in)  ind_wl,
logical, intent(in)  lresult,
integer, dimension(ksd), intent(in)  NBIN,
real, dimension(kidim3,ksd), intent(in)  RADIUS,
real, dimension(kidim3,ksd), intent(in)  SD,
integer, dimension(ksd), intent(in)  NSHAPE,
real, dimension(kshape,ksd), intent(in)  RATIOS,
real, dimension(kshape,ksd), intent(in)  SHD,
real, dimension(ksd), intent(inout)  RREAL,
real, dimension(ksd), intent(inout)  RIMAG,
type(osh_par), intent(in)  OSHP,
integer, intent(in)  iBRF_land,
integer, intent(in)  iBPF_land,
integer, intent(in)  iBRM_water,
real, dimension(kbf), intent(in)  BRF_land,
real, dimension(kbf), intent(in)  BRP_land,
real, dimension(kbf), intent(in)  BRM_water,
real, intent(in)  tau_mol,
real, intent(in)  HOBS_km,
real, intent(in)  HGR_km,
real, intent(in)  HMAX_atm_km,
integer, intent(in)  NHVP_fit,
real, dimension(kvertm), intent(in)  HVP_fit_km,
integer, intent(in)  NHVP_retr,
real, dimension(kvertm), intent(in)  HVP_retr_km,
real, dimension(kvertm,ksd), intent(inout)  H0,
real, dimension(ksd), intent(in)  sigma_aerosol,
real, intent(in)  CL,
type (data_abs), intent(in)  abs_data_forw_im,
type (data_gas), intent(inout)  gas_abs_data_forw_im,
integer, intent(in)  Nsubchannels,
real, dimension(n_sub_channel_max), intent(in)  WL_Subchannels,
real, dimension(n_wl_channel_max,n_sub_channel_max), intent(inout)  WL_Planck,
real, dimension(n_sub_channel_max), intent(in)  bandwidth,
type(filter_transmission), intent(in)  filters_trans,
real, dimension(ksd,n_sub_channel_max), intent(inout)  RREAL_Subchannels,
real, dimension(ksd,n_sub_channel_max), intent(inout)  RIMAG_Subchannels,
real, dimension(nmg), intent(in)  GAS_C_REF,
integer, intent(in)  NSPECIES,
integer, intent(in)  NGAS,
real, dimension(nmg), intent(in)  CGAS,
type(pixel), intent(inout)  pixel_fit,
type(output_segment_particles), intent(inout)  GOUT_aerosol,
type(output_segment_gases), intent(inout)  GOUT_gases,
type(output_segment_surface), intent(inout)  GOUT_surface,
real, intent(in)  MU,
real, intent(in)  tau_mol_I,
integer, intent(in)  ind_wl_i,
real, intent(in)  MDPR_wl,
type(output_pixel_bbflux), intent(inout), optional  GOUT_bbflux_pixel,
integer, intent(out)  NANG,
real, dimension(kmpar), intent(out)  ANGL,
type(kernels_triangle_bin), intent(inout)  KERNELS1,
type(kernels_lognormal_bin), intent(inout)  KERNELS2 
)

◆ get_temperature_profile()

subroutine mod_forward_model::get_temperature_profile ( type(discret_vertical_distribution), intent(in)  DISCRVD,
type(atm_atp_prof), intent(in)  ATM_PROF,
real, dimension(nlevel_gas), intent(out)  T_profile 
)

◆ set_surface_parameter_vectors()

subroutine mod_forward_model::set_surface_parameter_vectors ( type(retr_input_settings), intent(in)  RIN,
real, dimension(kbf), intent(in)  BRF_land,
real, dimension(kbf), intent(in)  BRP_land,
real, dimension(kbf), intent(in)  BRM_water,
integer, dimension(2), intent(out)  surf_land_par_num,
real, dimension(2*kbf), intent(out)  surf_land_par_vect,
integer, intent(out)  surf_water_par_num,
real, dimension(kbf), intent(out)  surf_water_par_vect 
)

◆ ss_particle_properties_subch_int()

subroutine mod_forward_model::ss_particle_properties_subch_int ( integer, intent(in)  Nsubchannels,
integer, intent(in)  ipix,
integer, intent(in)  IW,
integer, intent(in)  NSD,
integer, intent(in)  NANG,
type(output_segment_particles), intent(in)  GOUT_aerosol_Subchannels,
real, dimension(ksd,n_sub_channel_max), intent(inout)  RREAL_Subchannels,
real, dimension(ksd,n_sub_channel_max), intent(inout)  RIMAG_Subchannels,
real, dimension(n_sub_channel_max), intent(in)  bandwidth,
real, dimension(ksd), intent(inout)  RREAL,
real, dimension(ksd), intent(inout)  RIMAG,
type(output_segment_particles), intent(inout)  GOUT_aerosol 
)