mo_gas_optics_utils Module


Contents


Interfaces

public interface compute_Planck_source

  • public subroutine compute_Planck_source_1D(ncol, nnu, nus, dnus, T, source) bind(C, name="0")

    Arguments

    TypeIntentOptionalAttributesName
    integer, intent(in) :: ncol
    integer, intent(in) :: nnu
    real(kind=wp), intent(in), dimension(nnu):: nus
    real(kind=wp), intent(in), dimension(nnu):: dnus
    real(kind=wp), intent(in), dimension(ncol):: T
    real(kind=wp), intent(out), dimension(ncol, nnu):: source
  • public subroutine compute_Planck_source_2D(ncol, nlay, nnu, nus, dnus, T, source) bind(C, name="0")

    Arguments

    TypeIntentOptionalAttributesName
    integer, intent(in) :: ncol
    integer, intent(in) :: nlay
    integer, intent(in) :: nnu
    real(kind=wp), intent(in), dimension(nnu):: nus
    real(kind=wp), intent(in), dimension(nnu):: dnus
    real(kind=wp), intent(in), dimension(ncol, nlay):: T
    real(kind=wp), intent(out), dimension(ncol, nlay, nnu):: source

interface

  • public function get_layer_number(ncol, nlay, vmr_h2o, plev) result(col_dry)

    Number density (#/m^-2) of dry air molecules "col_dry" in RRTMGP

    Arguments

    TypeIntentOptionalAttributesName
    integer, intent(in) :: ncol
    integer, intent(in) :: nlay
    real(kind=wp), intent(in), dimension(ncol, nlay ):: vmr_h2o
    real(kind=wp), intent(in), dimension(ncol, nlay+1):: plev

    Return Value real(kind=wp),dimension(ncol, nlay)

interface

  • public function interp_tlev_from_tlay(ncol, nlay, tlay, play, plev) result(tlev)

    Temperature at layer boundaries, interpolated from layer centers

    Arguments

    TypeIntentOptionalAttributesName
    integer, intent(in) :: ncol
    integer, intent(in) :: nlay
    real(kind=wp), intent(in), dimension(ncol, nlay ):: tlay
    real(kind=wp), intent(in), dimension(ncol, nlay ):: play
    real(kind=wp), intent(in), dimension(ncol, nlay+1):: plev

    Return Value real(kind=wp),dimension(ncol, nlay+1)