mo_cloud_optics_rrtmgp_kernels Module
Uses
-
- mo_rte_kind
-
Interfaces
interface
-
public subroutine compute_cld_from_pade(ncol, nlay, nbnd, nsizes, mask, lwp, re, m_ext, n_ext, re_bounds_ext, coeffs_ext, m_ssa, n_ssa, re_bounds_ssa, coeffs_ssa, m_asy, n_asy, re_bounds_asy, coeffs_asy, tau, taussa, taussag) bind(C, name="0")
Arguments
Type Intent Optional Attributes Name integer, intent(in) :: ncol integer, intent(in) :: nlay integer, intent(in) :: nbnd integer, intent(in) :: nsizes 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) :: m_ext integer, intent(in) :: n_ext real(kind=wp), intent(in), dimension(nsizes+1) :: re_bounds_ext real(kind=wp), intent(in), dimension(nbnd,nsizes,0:m_ext+n_ext) :: coeffs_ext integer, intent(in) :: m_ssa integer, intent(in) :: n_ssa real(kind=wp), intent(in), dimension(nsizes+1) :: re_bounds_ssa real(kind=wp), intent(in), dimension(nbnd,nsizes,0:m_ssa+n_ssa) :: coeffs_ssa integer, intent(in) :: m_asy integer, intent(in) :: n_asy real(kind=wp), intent(in), dimension(nsizes+1) :: re_bounds_asy real(kind=wp), intent(in), dimension(nbnd,nsizes,0:m_asy+n_asy) :: coeffs_asy real(kind=wp), dimension(ncol,nlay,nbnd) :: tau real(kind=wp), dimension(ncol,nlay,nbnd) :: taussa real(kind=wp), dimension(ncol,nlay,nbnd) :: taussag
interface
-
public subroutine compute_cld_from_table(ncol, nlay, nbnd, 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) :: nbnd 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, nbnd) :: tau_table real(kind=wp), intent(in), dimension(nsteps, nbnd) :: ssa_table real(kind=wp), intent(in), dimension(nsteps, nbnd) :: asy_table real(kind=wp), dimension(ncol,nlay,nbnd) :: tau real(kind=wp), dimension(ncol,nlay,nbnd) :: taussa real(kind=wp), dimension(ncol,nlay,nbnd) :: taussag