radiation_ecckd_interface Module


Contents

Subroutines


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