GAS_exc_gen_t Derived Type

type, private, extends(EnumBase_t) :: GAS_exc_gen_t


Contents


Components

Type Visibility Attributes Name Initial
integer, public :: val

Type-Bound Procedures

generic, public :: operator(==) => eq_EnumBase_t

  • private elemental function eq_EnumBase_t(this, other)

    Arguments

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

    Return Value logical

generic, public :: operator(/=) => neq_EnumBase_t

  • private elemental function neq_EnumBase_t(this, other)

    Arguments

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

    Return Value logical