CONF_PAR_LOGICAL Derived Type

type, private, extends(CONF_PAR) :: CONF_PAR_LOGICAL


Components

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

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)

procedure, public :: set => set_conf_par_logical

  • private subroutine set_conf_par_logical(this, logical_val)

    Arguments

    Type IntentOptional Attributes Name
    class(CONF_PAR_LOGICAL), intent(inout) :: this
    logical, intent(in), optional :: logical_val

Source Code

   TYPE, EXTENDS(CONF_PAR) :: CONF_PAR_LOGICAL
      LOGICAL :: val = .FALSE., defval = .FALSE.

   CONTAINS

      PROCEDURE :: set => set_conf_par_logical

   END TYPE CONF_PAR_LOGICAL