CCPP SciDoc v7.0.0  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ compute_all_from_pade()

subroutine mo_cloud_optics::compute_all_from_pade ( integer, intent(in) ncol,
integer, intent(in) nlay,
integer, intent(in) nbnd,
integer, intent(in) nsizes,
logical(wl), dimension(ncol,nlay), intent(in) mask,
real(wp), dimension(ncol,nlay), intent(in) lwp,
real(wp), dimension(ncol,nlay), intent(in) re,
integer, intent(in) m_ext,
integer, intent(in) n_ext,
real(wp), dimension(nsizes+1), intent(in) re_bounds_ext,
real(wp), dimension(nbnd,nsizes,0:m_ext+n_ext), intent(in) coeffs_ext,
integer, intent(in) m_ssa,
integer, intent(in) n_ssa,
real(wp), dimension(nsizes+1), intent(in) re_bounds_ssa,
real(wp), dimension(nbnd,nsizes,0:m_ssa+n_ssa), intent(in) coeffs_ssa,
integer, intent(in) m_asy,
integer, intent(in) n_asy,
real(wp), dimension(nsizes+1), intent(in) re_bounds_asy,
real(wp), dimension(nbnd,nsizes,0:m_asy+n_asy), intent(in) coeffs_asy,
real(wp), dimension(ncol,nlay,nbnd) tau,
real(wp), dimension(ncol,nlay,nbnd) taussa,
real(wp), dimension(ncol,nlay,nbnd) taussag )
private