FatesIOVariableKindMod Module


Uses


Variables

Type Visibility Attributes Name Initial
character(len=*), public, parameter :: patch_r8 = 'PA_R8'
character(len=*), public, parameter :: patch_ground_r8 = 'PA_GRND_R8'
character(len=*), public, parameter :: patch_size_pft_r8 = 'PA_SCPF_R8'
character(len=*), public, parameter :: site_r8 = 'SI_R8'
character(len=*), public, parameter :: site_int = 'SI_INT'
character(len=*), public, parameter :: site_ground_r8 = 'SI_GRND_R8'
character(len=*), public, parameter :: site_size_pft_r8 = 'SI_SCPF_R8'
character(len=*), public, parameter :: site_size_r8 = 'SI_SCLS_R8'
character(len=*), public, parameter :: patch_int = 'PA_INT'
character(len=*), public, parameter :: cohort_r8 = 'CO_R8'
character(len=*), public, parameter :: cohort_int = 'CO_INT'
character(len=*), public, parameter :: site_pft_r8 = 'SI_PFT_R8'
character(len=*), public, parameter :: site_age_r8 = 'SI_AGE_R8'
character(len=*), public, parameter :: site_height_r8 = 'SI_HEIGHT_R8'
character(len=*), public, parameter :: site_fuel_r8 = 'SI_FUEL_R8'
character(len=*), public, parameter :: site_cwdsc_r8 = 'SI_CWDSC_R8'
character(len=*), public, parameter :: site_can_r8 = 'SI_CAN_R8'
character(len=*), public, parameter :: site_cnlf_r8 = 'SI_CNLF_R8'
character(len=*), public, parameter :: site_cnlfpft_r8 = 'SI_CNLFPFT_R8'
character(len=*), public, parameter :: site_scag_r8 = 'SI_SCAG_R8'
character(len=*), public, parameter :: site_scagpft_r8 = 'SI_SCAGPFT_R8'
character(len=*), public, parameter :: site_agepft_r8 = 'SI_AGEPFT_R8'
character(len=*), public, parameter :: site_elem_r8 = 'SI_ELEM_R8'
character(len=*), public, parameter :: site_elpft_r8 = 'SI_ELEMPFT_R8'
character(len=*), public, parameter :: site_elcwd_r8 = 'SI_ELEMCWD_R8'
character(len=*), public, parameter :: site_elage_r8 = 'SI_ELEMAGE_R8'

Derived Types

type, public ::  fates_io_variable_kind_type

Components

Type Visibility Attributes Name Initial
character(len=fates_long_string_length), public :: name
integer, public :: ndims
integer, public, allocatable :: dimsize(:)
integer, public :: dim1_index
integer, public :: dim2_index

Type-Bound Procedures

procedure, public :: Init
procedure, public :: set_active
procedure, public :: is_active

Functions

public function iotype_index(iotype_name, num_dim_kinds, dim_kinds) result(dk_index)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: iotype_name
integer, intent(in) :: num_dim_kinds
type(fates_io_variable_kind_type), intent(in) :: dim_kinds(:)

Return Value integer