increment_2stream_by_2stream Subroutine
public pure subroutine increment_2stream_by_2stream(ncol, nlay, ngpt, tau1, ssa1, g1, tau2, ssa2, g2) bind(C, name="0")
increment two-stream optical properties with a second set
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ncol | array sizes |
||
| integer, | intent(in) | :: | nlay | array sizes |
||
| integer, | intent(in) | :: | ngpt | array sizes |
||
| real(kind=wp), | intent(inout), | dimension(ncol,nlay,ngpt) | :: | tau1 | optical properties to be modified |
|
| real(kind=wp), | intent(inout), | dimension(ncol,nlay,ngpt) | :: | ssa1 | optical properties to be modified |
|
| real(kind=wp), | intent(inout), | dimension(ncol,nlay,ngpt) | :: | g1 | optical properties to be modified |
|
| real(kind=wp), | intent(in), | dimension(ncol,nlay,ngpt) | :: | tau2 | optical properties to be added to original |
|
| real(kind=wp), | intent(in), | dimension(ncol,nlay,ngpt) | :: | ssa2 | optical properties to be added to original |
|
| real(kind=wp), | intent(in), | dimension(ncol,nlay,ngpt) | :: | g2 | optical properties to be added to original |