radiation_ecckd_interface Module


Used by

  • module~~radiation_ecckd_interface~~UsedByGraph module~radiation_ecckd_interface radiation_ecckd_interface proc~set_gas_units~7 set_gas_units proc~set_gas_units~7->module~radiation_ecckd_interface proc~radiation radiation proc~radiation->module~radiation_ecckd_interface proc~setup_radiation setup_radiation proc~setup_radiation->module~radiation_ecckd_interface proc~setup_radiation~2 setup_radiation proc~setup_radiation~2->module~radiation_ecckd_interface proc~set_gas_units set_gas_units proc~set_gas_units->module~radiation_ecckd_interface proc~radiation~2 radiation proc~radiation~2->module~radiation_ecckd_interface

Contents


Subroutines

public subroutine setup_gas_optics(config)

Arguments

Type IntentOptional Attributes Name
type(config_type), intent(inout), target :: config

public subroutine set_gas_units(gas)

Arguments

Type IntentOptional Attributes Name
type(gas_type), intent(inout) :: gas

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)

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