glc_elevclass_mod Module



Variables

Type Visibility Attributes Name Initial
integer, public, parameter :: GLC_ELEVCLASS_ERR_NONE = 0
integer, public, parameter :: GLC_ELEVCLASS_ERR_UNDEFINED = 1
integer, public, parameter :: GLC_ELEVCLASS_ERR_TOO_LOW = 2
integer, public, parameter :: GLC_ELEVCLASS_ERR_TOO_HIGH = 3
integer, public, parameter :: GLC_ELEVCLASS_STRLEN = 2

Interfaces

public interface glc_elevclass_init

  • private subroutine glc_elevclass_init_default(my_glc_nec)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: my_glc_nec
  • private subroutine glc_elevclass_init_override(my_glc_nec, my_topomax)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: my_glc_nec
    real(kind=r8), intent(in) :: my_topomax(0:)

Functions

public function glc_get_num_elevation_classes() result(num_elevation_classes)

Arguments

None

Return Value integer

public function glc_get_elevclass_bounds() result(elevclass_bounds)

Arguments

None

Return Value real(kind=r8), (0:glc_nec)

public function glc_mean_elevation_virtual(elevation_class) result(mean_elevation)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: elevation_class

Return Value real(kind=r8)

public function glc_elevclass_as_string(elevation_class) result(ec_string)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: elevation_class

Return Value character(len=GLC_ELEVCLASS_STRLEN)

public function glc_all_elevclass_strings(include_zero) result(ec_strings)

Arguments

Type IntentOptional Attributes Name
logical, intent(in), optional :: include_zero

Return Value character(len=GLC_ELEVCLASS_STRLEN), allocatable, (:)

public function glc_errcode_to_string(err_code) result(err_string)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: err_code

Return Value character(len=256)


Subroutines

public subroutine glc_elevclass_clean()

Arguments

None

public subroutine glc_get_elevation_class(topo, elevation_class, err_code)

Arguments

Type IntentOptional Attributes Name
real(kind=r8), intent(in) :: topo
integer, intent(out) :: elevation_class
integer, intent(out) :: err_code