lw_solver_2stream Subroutine

public subroutine lw_solver_2stream(ncol, nlay, ngpt, top_at_1, tau, ssa, g, lay_source, lev_source, sfc_emis, sfc_src, inc_flux, flux_up, flux_dn) bind(C, name="0")

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: ncol
integer, intent(in) :: nlay
integer, intent(in) :: ngpt
logical(kind=wl), intent(in) :: top_at_1
real(kind=wp), intent(in), dimension(ncol,nlay, ngpt):: tau
real(kind=wp), intent(in), dimension(ncol,nlay, ngpt):: ssa
real(kind=wp), intent(in), dimension(ncol,nlay, ngpt):: g
real(kind=wp), intent(in), dimension(ncol,nlay, ngpt):: lay_source
real(kind=wp), intent(in), dimension(ncol,nlay+1,ngpt):: lev_source
real(kind=wp), intent(in), dimension(ncol, ngpt):: sfc_emis
real(kind=wp), intent(in), dimension(ncol, ngpt):: sfc_src
real(kind=wp), intent(in), dimension(ncol, ngpt):: inc_flux
real(kind=wp), intent(out), dimension(ncol,nlay+1,ngpt):: flux_up
real(kind=wp), intent(out), dimension(ncol,nlay+1,ngpt):: flux_dn

Contents

None