co_object Derived Type

  1. co_object_interface.f90
  2. co_object_interface
  3. co_object

type, public, abstract :: co_object


Contents

Variables

Type-Bound Procedures


Components

TypeVisibility AttributesNameInitial
logical, private :: defined =.false.

Default initialization indicates not yet user-defined
logical, private, allocatable:: facilitate_type_extension[:]

Type-Bound Procedures

procedure, public :: mark_as_defined

  • interface

    private pure module subroutine mark_as_defined(this)

    Mark the co_object as user-defined

    Arguments

    Type IntentOptional AttributesName
    class(co_object), intent(inout) :: this

procedure, public :: user_defined

  • interface

    private pure module function user_defined(this) result(is_defined)

    Return a boolean result indicating whether this co_object has been initialized since its declaration

    Arguments

    Type IntentOptional AttributesName
    class(co_object), intent(in) :: this

    Return Value logical