subroutine mo_rte_solver_kernels::lw_two_stream |
( |
integer, intent(in) | ncol, |
|
|
integer, intent(in) | nlay, |
|
|
integer, intent(in) | ngpt, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(in) | tau, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(in) | w0, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(in) | g, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(out) | gamma1, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(out) | gamma2, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(out) | rdif, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(out) | tdif ) |
|
private |