gas_optics_ext_abstract Abstract Interface

abstract interface
public function gas_optics_ext_abstract(this, play, plev, tlay, gas_desc, optical_props, toa_src, col_dry) result(error_msg)

Arguments

TypeIntentOptionalAttributesName
class(ty_gas_optics), intent(in) :: this
real(kind=wp), intent(in), dimension(:,:):: play

layer pressures [Pa, mb]; (ncol,nlay) level pressures [Pa, mb]; (ncol,nlay+1) layer temperatures [K]; (ncol,nlay)

real(kind=wp), intent(in), dimension(:,:):: plev

layer pressures [Pa, mb]; (ncol,nlay) level pressures [Pa, mb]; (ncol,nlay+1) layer temperatures [K]; (ncol,nlay)

real(kind=wp), intent(in), dimension(:,:):: tlay

layer pressures [Pa, mb]; (ncol,nlay) level pressures [Pa, mb]; (ncol,nlay+1) layer temperatures [K]; (ncol,nlay)

type(ty_gas_concs), intent(in) :: gas_desc

Gas volume mixing ratios

class(ty_optical_props_arry), intent(inout) :: optical_props
real(kind=wp), intent(out), dimension(:,:):: toa_src

Incoming solar irradiance(ncol,ngpt)

real(kind=wp), intent(in), optional dimension(:,:), target:: col_dry

Column dry amount (molecules/cm^2); dim(ncol,nlay)

Return Value character(len=128)

Empty if successful