inc_2stream_by_nstream_bybnd Interface

interface

increment 2-stream optical properties defined on g-points with n-stream properties set defined on bands


public pure subroutine inc_2stream_by_nstream_bybnd(ncol, nlay, ngpt, nmom2, tau1, ssa1, g1, tau2, ssa2, p2, nbnd, gpt_lims) bind(C, name="0")

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: ncol

array sizes

integer, intent(in) :: nlay

array sizes

integer, intent(in) :: ngpt

array sizes

integer, intent(in) :: nmom2

array sizes

real(kind=wp), intent(inout), dimension(ncol,nlay,ngpt):: tau1

optical properties to be modified (defined on g-points)

real(kind=wp), intent(inout), dimension(ncol,nlay,ngpt):: ssa1

optical properties to be modified (defined on g-points)

real(kind=wp), intent(inout), dimension(ncol,nlay,ngpt):: g1

optical properties to be modified (defined on g-points)

real(kind=wp), intent(in), dimension(ncol,nlay,nbnd):: tau2

optical properties to be added to original (defined on bands)

real(kind=wp), intent(in), dimension(ncol,nlay,nbnd):: ssa2

optical properties to be added to original (defined on bands)

real(kind=wp), intent(in), dimension(nmom2, ncol,nlay,nbnd):: p2

moments of the phase function to be added

integer, intent(in) :: nbnd

array sizes

integer, intent(in), dimension(2,nbnd):: gpt_lims

Starting and ending gpoint for each band