CONF_PAR Derived Type

type, private, ABSTRACT :: CONF_PAR


Components

Type Visibility Attributes Name Initial
character(len=1), public :: source = 'D'
character(len=max_paramter_name_len), public :: name = ""

Type-Bound Procedures

procedure, public, non_overridable :: env_value => conf_par_env_value

  • private function conf_par_env_value(this, env_val) result(status)

    Arguments

    Type IntentOptional Attributes Name
    class(CONF_PAR), intent(inout) :: this
    class(*), intent(out) :: env_val

    Return Value logical

procedure, public, non_overridable :: print_source

  • private function print_source(this)

    Arguments

    Type IntentOptional Attributes Name
    class(CONF_PAR), intent(in) :: this

    Return Value character(len=3)

Source Code

   TYPE, ABSTRACT :: CONF_PAR
      CHARACTER :: source = 'D' ! Possible values are: D=Default, E=Environment, U=User code
      CHARACTER(len=max_paramter_name_len) :: name = ""

   CONTAINS

      PROCEDURE, NON_OVERRIDABLE :: env_value => conf_par_env_value
      PROCEDURE, NON_OVERRIDABLE :: print_source

   END TYPE CONF_PAR