mo_gas_optics_utils Module
Interfaces
public interface compute_Planck_source
-
public subroutine compute_Planck_source_1D(ncol, nnu, nus, dnus, T, source) bind(C, name="0")
Arguments
Type Intent Optional Attributes Name 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
Type Intent Optional Attributes Name 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 subroutine get_layer_mass(ncol, nlay, ngas, vmr, plev, mol_weights, m_dry, layer_mass)
mass (kg m^-2) each gas in the layer
Arguments
Type Intent Optional Attributes Name integer, intent(in) :: ncol integer, intent(in) :: nlay integer, intent(in) :: ngas real(kind=wp), intent(in), dimension(ngas, ncol, nlay ) :: vmr real(kind=wp), intent(in), dimension( ncol, nlay+1) :: plev real(kind=wp), intent(in), dimension(ngas) :: mol_weights real(kind=wp), intent(in) :: m_dry real(kind=wp), intent(out), dimension(ngas, ncol, nlay) :: layer_mass
interface
-
public function get_layer_number(ncol, nlay, vmr_h2o, plev) result(col_dry)
Number density (#/cm^-2) of dry air molecules "col_dry" in RRTMGP
Arguments
Type Intent Optional Attributes Name 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)