sw_solver_noscat Subroutine
public subroutine sw_solver_noscat(ncol, nlay, ngpt, top_at_1, tau, mu0, inc_flux_dir, flux_dir) bind(C, name="0")
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ncol | |||
| integer, | intent(in) | :: | nlay | |||
| integer, | intent(in) | :: | ngpt | |||
| logical(kind=wl), | intent(in) | :: | top_at_1 | |||
| real(kind=wp), | intent(in), | dimension(ncol,nlay, ngpt) | :: | tau | ||
| real(kind=wp), | intent(in), | dimension(ncol,nlay ) | :: | mu0 | ||
| real(kind=wp), | intent(in), | dimension(ncol, ngpt) | :: | inc_flux_dir | ||
| real(kind=wp), | intent(out), | dimension(ncol,nlay+1,ngpt) | :: | flux_dir |