gas_optics Subroutine

public subroutine gas_optics(ncol, nlev, istartcol, iendcol, config, single_level, thermodynamics, gas, od_lw, od_sw, ssa_sw, lw_albedo, planck_hl, lw_emission, incoming_sw)

Uses

  • proc~~gas_optics~5~~UsesGraph proc~gas_optics~5 gas_optics module~parrrtm~3 PARRRTM proc~gas_optics~5->module~parrrtm~3 module~yoerrtm YOERRTM proc~gas_optics~5->module~yoerrtm module~yomhook yomhook proc~gas_optics~5->module~yomhook module~radiation_config radiation_config proc~gas_optics~5->module~radiation_config module~parkind1~2 PARKIND1 proc~gas_optics~5->module~parkind1~2 module~radiation_gas~2 radiation_gas proc~gas_optics~5->module~radiation_gas~2 module~radiation_single_level~2 radiation_single_level proc~gas_optics~5->module~radiation_single_level~2 module~radiation_thermodynamics~2 radiation_thermodynamics proc~gas_optics~5->module~radiation_thermodynamics~2 module~yoesrtm~2 YOESRTM proc~gas_optics~5->module~yoesrtm~2 module~parrrtm~3->module~parkind1~2 module~yoerrtm->module~parrrtm~3 module~yoerrtm->module~parkind1~2 module~radiation_config->module~parkind1~2 module~radiation_general_cloud_optics_data radiation_general_cloud_optics_data module~radiation_config->module~radiation_general_cloud_optics_data module~radiation_cloud_cover radiation_cloud_cover module~radiation_config->module~radiation_cloud_cover module~radiation_pdf_sampler~2 radiation_pdf_sampler module~radiation_config->module~radiation_pdf_sampler~2 module~radiation_aerosol_optics_data~2 radiation_aerosol_optics_data module~radiation_config->module~radiation_aerosol_optics_data~2 module~radiation_cloud_optics_data~2 radiation_cloud_optics_data module~radiation_config->module~radiation_cloud_optics_data~2 module~radiation_ecckd~2 radiation_ecckd module~radiation_config->module~radiation_ecckd~2 module~radiation_gas~2->module~parkind1~2 module~radiation_gas_constants radiation_gas_constants module~radiation_gas~2->module~radiation_gas_constants module~radiation_single_level~2->module~parkind1~2 module~radiation_thermodynamics~2->module~parkind1~2 module~yoesrtm~2->module~parkind1~2 module~parsrtm~4 PARSRTM module~yoesrtm~2->module~parsrtm~4 module~radiation_general_cloud_optics_data->module~parkind1~2 module~radiation_cloud_cover->module~parkind1~2 module~radiation_pdf_sampler~2->module~parkind1~2 module~radiation_aerosol_optics_data~2->module~parkind1~2 module~radiation_io~2 radiation_io module~radiation_aerosol_optics_data~2->module~radiation_io~2 module~radiation_gas_constants->module~parkind1~2 module~parsrtm~4->module~parkind1~2 module~radiation_cloud_optics_data~2->module~parkind1~2 module~radiation_ecckd~2->module~parkind1~2 module~radiation_ecckd~2->module~radiation_gas_constants module~radiation_ecckd_gas radiation_ecckd_gas module~radiation_ecckd~2->module~radiation_ecckd_gas module~radiation_spectral_definition~2 radiation_spectral_definition module~radiation_ecckd~2->module~radiation_spectral_definition~2 module~yomlun_ifsaux YOMLUN_IFSAUX module~radiation_io~2->module~yomlun_ifsaux module~radiation_ecckd_gas->module~parkind1~2 module~radiation_ecckd_gas->module~radiation_gas_constants module~radiation_spectral_definition~2->module~parkind1~2 module~yomlun_ifsaux->module~parkind1~2

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ncol
integer, intent(in) :: nlev
integer, intent(in) :: istartcol
integer, intent(in) :: iendcol
type(config_type), intent(in) :: config
type(single_level_type), intent(in) :: single_level
type(thermodynamics_type), intent(in) :: thermodynamics
type(gas_type), intent(in) :: gas
real(kind=jprb), intent(out), dimension(config%n_g_lw,nlev,istartcol:iendcol) :: od_lw
real(kind=jprb), intent(out), dimension(config%n_g_sw,nlev,istartcol:iendcol) :: od_sw
real(kind=jprb), intent(out), dimension(config%n_g_sw,nlev,istartcol:iendcol) :: ssa_sw
real(kind=jprb), intent(in), optional, dimension(config%n_g_lw,istartcol:iendcol) :: lw_albedo
real(kind=jprb), intent(out), optional, dimension(config%n_g_lw,nlev+1,istartcol:iendcol) :: planck_hl
real(kind=jprb), intent(out), optional, dimension(config%n_g_lw,istartcol:iendcol) :: lw_emission
real(kind=jprb), intent(out), optional, dimension(config%n_g_sw,istartcol:iendcol) :: incoming_sw

Calls

proc~~gas_optics~5~~CallsGraph proc~gas_optics~5 gas_optics proc~dr_hook dr_hook proc~gas_optics~5->proc~dr_hook proc~planck_function_atmos~2 planck_function_atmos proc~gas_optics~5->proc~planck_function_atmos~2 proc~planck_function_surf~2 planck_function_surf proc~gas_optics~5->proc~planck_function_surf~2 proc~planck_function_atmos~2->proc~dr_hook proc~planck_function_surf~2->proc~dr_hook

Contents