compute_cld_from_table Subroutine
public subroutine compute_cld_from_table(ncol, nlay, ngpt, mask, lwp, re, nsteps, step_size, offset, tau_table, ssa_table, asy_table, tau, taussa, taussag) 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), | dimension(ncol,nlay) | :: | mask | ||
| real(kind=wp), | intent(in), | dimension(ncol,nlay) | :: | lwp | ||
| real(kind=wp), | intent(in), | dimension(ncol,nlay) | :: | re | ||
| integer, | intent(in) | :: | nsteps | |||
| real(kind=wp), | intent(in) | :: | step_size | |||
| real(kind=wp), | intent(in) | :: | offset | |||
| real(kind=wp), | intent(in), | dimension(nsteps, ngpt) | :: | tau_table | ||
| real(kind=wp), | intent(in), | dimension(nsteps, ngpt) | :: | ssa_table | ||
| real(kind=wp), | intent(in), | dimension(nsteps, ngpt) | :: | asy_table | ||
| real(kind=wp), | intent(out), | dimension(ncol,nlay,ngpt) | :: | tau | ||
| real(kind=wp), | intent(out), | dimension(ncol,nlay,ngpt) | :: | taussa | ||
| real(kind=wp), | intent(out), | dimension(ncol,nlay,ngpt) | :: | taussag |