inc_nstream_by_nstream_bybnd Subroutine
public pure subroutine inc_nstream_by_nstream_bybnd(ncol, nlay, ngpt, nmom1, nmom2, tau1, ssa1, p1, tau2, ssa2, p2, nbnd, gpt_lims) bind(C, name="0")
increment n-stream optical properties defined on g-points with a second set defined on bands
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ncol | array sizes |
||
| integer, | intent(in) | :: | nlay | array sizes |
||
| integer, | intent(in) | :: | ngpt | array sizes |
||
| integer, | intent(in) | :: | nmom1 | 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(nmom1, ncol,nlay,ngpt) | :: | p1 | moments of the phase function be modified |
|
| 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 |