mo_cloud_optics_rrtmgp_kernels Module


Uses

    • mo_rte_kind
  • module~~mo_cloud_optics_rrtmgp_kernels~2~~UsesGraph module~mo_cloud_optics_rrtmgp_kernels~2 mo_cloud_optics_rrtmgp_kernels mo_rte_kind mo_rte_kind module~mo_cloud_optics_rrtmgp_kernels~2->mo_rte_kind

Contents


Subroutines

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

TypeIntentOptionalAttributesName
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

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

TypeIntentOptionalAttributesName
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