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 | ||
) |