flux_type Derived Type

type, public :: flux_type


Contents


Components

Type Visibility Attributes Name Initial
real(kind=jprb), public, allocatable, dimension(:,:) :: lw_up
real(kind=jprb), public, allocatable, dimension(:,:) :: lw_dn
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_up
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_direct
real(kind=jprb), public, allocatable, dimension(:,:) :: lw_up_clear
real(kind=jprb), public, allocatable, dimension(:,:) :: lw_dn_clear
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_up_clear
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_clear
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_direct_clear
real(kind=jprb), public, allocatable, dimension(:,:,:) :: lw_up_band
real(kind=jprb), public, allocatable, dimension(:,:,:) :: lw_dn_band
real(kind=jprb), public, allocatable, dimension(:,:,:) :: sw_up_band
real(kind=jprb), public, allocatable, dimension(:,:,:) :: sw_dn_band
real(kind=jprb), public, allocatable, dimension(:,:,:) :: sw_dn_direct_band
real(kind=jprb), public, allocatable, dimension(:,:,:) :: lw_up_clear_band
real(kind=jprb), public, allocatable, dimension(:,:,:) :: lw_dn_clear_band
real(kind=jprb), public, allocatable, dimension(:,:,:) :: sw_up_clear_band
real(kind=jprb), public, allocatable, dimension(:,:,:) :: sw_dn_clear_band
real(kind=jprb), public, allocatable, dimension(:,:,:) :: sw_dn_direct_clear_band
real(kind=jprb), public, allocatable, dimension(:,:) :: lw_dn_surf_g
real(kind=jprb), public, allocatable, dimension(:,:) :: lw_dn_surf_clear_g
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_diffuse_surf_g
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_direct_surf_g
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_diffuse_surf_clear_g
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_direct_surf_clear_g
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_surf_band
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_direct_surf_band
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_surf_clear_band
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_direct_surf_clear_band
real(kind=jprb), public, allocatable, dimension(:,:) :: lw_dn_surf_canopy
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_diffuse_surf_canopy
real(kind=jprb), public, allocatable, dimension(:,:) :: sw_dn_direct_surf_canopy
real(kind=jprb), public, allocatable, dimension(:) :: cloud_cover_lw
real(kind=jprb), public, allocatable, dimension(:) :: cloud_cover_sw
real(kind=jprb), public, allocatable, dimension(:,:) :: lw_derivatives

Type-Bound Procedures

procedure, public :: allocate => allocate_flux_type

  • public subroutine allocate_flux_type(this, config, istartcol, iendcol, nlev)

    Arguments

    Type IntentOptional Attributes Name
    class(flux_type), intent(inout) :: this
    type(config_type), intent(in) :: config
    integer, intent(in) :: istartcol
    integer, intent(in) :: iendcol
    integer, intent(in) :: nlev

procedure, public :: deallocate => deallocate_flux_type

procedure, public :: calc_surface_spectral

  • public subroutine calc_surface_spectral(this, config, istartcol, iendcol)

    Arguments

    Type IntentOptional Attributes Name
    class(flux_type), intent(inout) :: this
    type(config_type), intent(in) :: config
    integer, intent(in) :: istartcol
    integer, intent(in) :: iendcol

procedure, public :: out_of_physical_bounds

  • public function out_of_physical_bounds(this, istartcol, iendcol) result(is_bad)

    Arguments

    Type IntentOptional Attributes Name
    class(flux_type), intent(inout) :: this
    integer, intent(in), optional :: istartcol
    integer, intent(in), optional :: iendcol

    Return Value logical

procedure, public :: heating_rate_out_of_physical_bounds

  • public function heating_rate_out_of_physical_bounds(this, nlev, istartcol, iendcol, pressure_hl) result(is_bad)

    Arguments

    Type IntentOptional Attributes Name
    class(flux_type), intent(inout) :: this
    integer, intent(in) :: nlev
    integer, intent(in) :: istartcol
    integer, intent(in) :: iendcol
    real(kind=jprb), intent(in) :: pressure_hl(:,:)

    Return Value logical