CONF_PAR_MM_DRIVER Derived Type

type, private, extends(CONF_PAR) :: CONF_PAR_MM_DRIVER


Components

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

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_mm_driver

  • private subroutine set_conf_par_mm_driver(this, mm_driver)

    Arguments

    Type IntentOptional Attributes Name
    class(CONF_PAR_MM_DRIVER), intent(inout) :: this
    character(len=*), intent(in), optional :: mm_driver

Source Code

   TYPE, EXTENDS(CONF_PAR) :: CONF_PAR_MM_DRIVER
      INTEGER :: val = -1, defval = -1

   CONTAINS

      PROCEDURE :: set => set_conf_par_mm_driver

   END TYPE CONF_PAR_MM_DRIVER