pure subroutine mo_optical_props_kernels::increment_2stream_by_nstream |
( |
integer, intent(in) | ncol, |
|
|
integer, intent(in) | nlay, |
|
|
integer, intent(in) | ngpt, |
|
|
integer, intent(in) | nmom2, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(inout) | tau1, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(inout) | ssa1, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(inout) | g1, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(in) | tau2, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(in) | ssa2, |
|
|
real(wp), dimension(nmom2, ncol,nlay,ngpt), intent(in) | p2 ) |