vertical_distr.f90 File Reference
Functions/Subroutines | |
| subroutine | rt_discret_vertical_distr_with_gas (aerosol_analyt_prof, gas_abs_line, HGR_km, HMAX_atm_km, N_level, Hight_level_km, H0, sigma_aerosol, ifgas, gaspar, DISCRVD) |
| Routine prepares input and calls routine computing discret. More... | |
| subroutine | discret_vertical_distr_with_gas (HGR_km, HMAX_atm_km, distr_type, hm_km, sigma_km, nhinp_max, nhinp, hinp_km, vdinp, DISCRVD) |
| Routine computes discret verical distributions for. More... | |
| subroutine | rt_vertical_discret (RIN, igab, ikdist, IW, gas_abs_data_forw_im, iFlux, HGR_km, HVP_retr_km, HMAX_atm_km, NHVP_retr, H0, nsubchannels, sigma_aerosol, ipix, pixel_fit, DISCRVD) |
| subroutine | discrvd_single_atm_component (distr_type, hm_km, sigma_km, nhinp, hinp_km, vdinp, nhout, hout_km, xnorm, vdout) |
| Routine computes verical distributions at discret. More... | |
| subroutine | grid_altitudes_log (HGR_km, HMAX_atm_km, nhout, hout_km) |
| Routine computes given number of equdistant in natural. More... | |
| subroutine | grid_altitudes_lut_with_gas (HGR_km, HMAX_atm_km, nhinp, hinp_km, nhout, hout_km) |
| Routine returns altitudes including top of the atmosphere. More... | |
Detailed Description
Contains routines related to computation of discret vertical distributions for given number of altitudes to be used in in Successive Order of Scattering (SOS) radiative transfer routine
Function/Subroutine Documentation
◆ discret_vertical_distr_with_gas()
| subroutine discret_vertical_distr_with_gas | ( | real, intent(in) | HGR_km, |
| real, intent(in) | HMAX_atm_km, | ||
| character(len=20), dimension(nmm+nmg) | distr_type, | ||
| real, dimension(nmm+nmg), intent(in) | hm_km, | ||
| real, dimension(nmm+nmg), intent(in) | sigma_km, | ||
| integer, intent(in) | nhinp_max, | ||
| integer, dimension(nmm+nmg), intent(in) | nhinp, | ||
| real, dimension(nhinp_max,nmm+nmg), intent(in) | hinp_km, | ||
| real, dimension(nhinp_max,nmm+nmg), intent(in) | vdinp, | ||
| type(discret_vertical_distribution), intent(inout) | DISCRVD | ||
| ) |
Routine computes discret verical distributions for.
all assumed atmospheric components
- Parameters
-
[in] HGR_km - ground height above sea level in km [in] HMAX_atm_km - maximum height of atmosphere in km [in] distr_type - extinction vertical distributions [in] hm_km - mean/scale height for normal distribution [in] sigma_km - standard deviation for normal distribution [in] nhinp - number of altitudes for input LUT profile [in] hinp_km - altitudes for input LUT profile [in] vdinp - input LUT profile [out] DISCRVD - discret vertical distribution structure
◆ discrvd_single_atm_component()
| subroutine discrvd_single_atm_component | ( | character(len=20) | distr_type, |
| real, intent(in) | hm_km, | ||
| real, intent(in) | sigma_km, | ||
| integer, intent(in) | nhinp, | ||
| real, dimension(nhinp), intent(in) | hinp_km, | ||
| real, dimension(nhinp), intent(in) | vdinp, | ||
| integer, intent(in) | nhout, | ||
| real, dimension(nhout), intent(in) | hout_km, | ||
| real, intent(out) | xnorm, | ||
| real, dimension(nhout), intent(out) | vdout | ||
| ) |
Routine computes verical distributions at discret.
altitudes for given single atmospheric component
- Parameters
-
[in] distr_type - type of vertical distribution [in] hm_km - mean/scale height for normal/exponential distribution [in] sigma_km - standard deviation for normal distribution [in] nhinp - number of altitudes for input LUT distribution [in] hinp_km - altitudes for input LUT distribution [in] vdinp - input LUT distribution [in] nhout - number of altitudes for discret distribution [in] hout_km - altitudes for discret distribution [out] xnorm - norm of output distribution [out] vdout - discret vertical distribution
◆ grid_altitudes_log()
| subroutine grid_altitudes_log | ( | real, intent(in) | HGR_km, |
| real, intent(in) | HMAX_atm_km, | ||
| integer, intent(in) | nhout, | ||
| real, dimension(nhout), intent(out) | hout_km | ||
| ) |
Routine computes given number of equdistant in natural.
logarithm altitudes from top of the atmosphere altitude
to ground height above sea level
- Parameters
-
[in] HGR_km - ground height above sea level in km [in] HMAX_atm_km - top of the atmosphere altitude in km [in] nhout - number of altitudes [out] hout_km - output altitudes in descending order
◆ grid_altitudes_lut_with_gas()
| subroutine grid_altitudes_lut_with_gas | ( | real, intent(in) | HGR_km, |
| real, intent(in) | HMAX_atm_km, | ||
| integer, intent(in) | nhinp, | ||
| real, dimension(nhinp), intent(in) | hinp_km, | ||
| integer, intent(out) | nhout, | ||
| real, dimension(nhinp+2), intent(out) | hout_km | ||
| ) |
Routine returns altitudes including top of the atmosphere.
altitude and ground height above sea level
- Parameters
-
[in] HGR_km - ground height above sea level in km [in] HMAX_atm_km - top of the atmosphere altitude in km [in] nhinp - number of input altitudes [in] hinp_km - input altitudes in descending order [out] nhout - number of output altitudes [out] hout_km - output altitudes in descending order
◆ rt_discret_vertical_distr_with_gas()
| subroutine rt_discret_vertical_distr_with_gas | ( | logical, intent(in) | aerosol_analyt_prof, |
| logical, intent(in) | gas_abs_line, | ||
| real, intent(in) | HGR_km, | ||
| real, intent(in) | HMAX_atm_km, | ||
| integer, intent(in) | N_level, | ||
| real, dimension(kvert_wd), intent(in) | Hight_level_km, | ||
| real, dimension(kvertm,ksd), intent(in) | H0, | ||
| real, dimension(ksd), intent(in) | sigma_aerosol, | ||
| integer, intent(in) | ifgas, | ||
| real, intent(in) | gaspar, | ||
| type(discret_vertical_distribution), intent(inout) | DISCRVD | ||
| ) |
Routine prepares input and calls routine computing discret.
verical distributions for all assumed atmospheric components
- Parameters
-
[in] RT_SOS_SET - input settings structure for RTSOS [in] HGR_km - ground height above sea level [in] HMAX_atm_km - maximum height of atmosphere [in] NHVP_retr - number of altitudes for retrieved vertical profile [in] HVP_retr_km - altitudes for retrieved vertical profile [in] H0 - parameters of vertical distribution or distribution itself [in] sigma_aerosol - standard deviation for normal distribution [in] ifgas - defines presence of gas absorption in sdata structure [in] gaspar - gas absorption value from sdata structure [out] DISCRVD - discret vertical distribution structure
◆ rt_vertical_discret()
| subroutine rt_vertical_discret | ( | type(retr_input_settings), intent(in) | RIN, |
| logical, intent(in) | igab, | ||
| logical, intent(in) | ikdist, | ||
| integer, intent(in) | IW, | ||
| type (data_gas), intent(inout) | gas_abs_data_forw_im, | ||
| logical, intent(inout) | iFlux, | ||
| real, intent(in) | HGR_km, | ||
| real, dimension(kvertm), intent(in) | HVP_retr_km, | ||
| real, intent(in) | HMAX_atm_km, | ||
| integer, intent(in) | NHVP_retr, | ||
| real, dimension(kvertm,ksd), intent(inout) | H0, | ||
| integer, intent(in) | nsubchannels, | ||
| real, dimension(ksd), intent(in) | sigma_aerosol, | ||
| integer, intent(in) | ipix, | ||
| type(pixel), intent(inout) | pixel_fit, | ||
| type(discret_vertical_distribution), intent(inout) | DISCRVD | ||
| ) |