ExtDataNode Derived Type

type, public :: ExtDataNode


Inherits

type~~extdatanode~~InheritsGraph type~extdatanode ExtDataNode ESMF_Field ESMF_Field type~extdatanode->ESMF_Field field ESMF_Time ESMF_Time type~extdatanode->ESMF_Time time

Inherited by

type~~extdatanode~~InheritedByGraph type~extdatanode ExtDataNode type~extdatabracket ExtDataBracket type~extdatabracket->type~extdatanode left_node, right_node type~bracketingfields BracketingFields type~bracketingfields->type~extdatabracket comp1, comp2 type~primaryexport PrimaryExport type~primaryexport->type~bracketingfields modelGridFields type~vector_wrapper~6 vector_wrapper type~vector_wrapper~6->type~primaryexport item

Components

Type Visibility Attributes Name Initial
character(len=ESMF_MAXPATHLEN), public :: file
integer, public :: time_index
logical, public :: was_set = .false.
type(ESMF_Field), public :: field
type(ESMF_Time), public :: time

Type-Bound Procedures

procedure, public :: check_if_initialized

  • private function check_if_initialized(this, rc) result(field_initialized)

    Arguments

    Type IntentOptional Attributes Name
    class(ExtDataNode), intent(inout) :: this
    integer, intent(out), optional :: rc

    Return Value logical

procedure, public :: equals

  • private function equals(a, b)

    Arguments

    Type IntentOptional Attributes Name
    class(ExtDataNode), intent(in) :: a
    class(ExtDataNode), intent(in) :: b

    Return Value logical

procedure, public :: get

  • private subroutine get(this, unusable, field, time, file, time_index, was_set, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(ExtDataNode), intent(inout) :: this
    class(KeywordEnforcer), intent(in), optional :: unusable
    type(ESMF_Field), intent(out), optional :: field
    type(ESMF_Time), intent(out), optional :: time
    character(len=*), intent(out), optional :: file
    integer, intent(out), optional :: time_index
    logical, intent(out), optional :: was_set
    integer, intent(out), optional :: rc

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

  • private function equals(a, b)

    Arguments

    Type IntentOptional Attributes Name
    class(ExtDataNode), intent(in) :: a
    class(ExtDataNode), intent(in) :: b

    Return Value logical

procedure, public :: set

  • private subroutine set(this, unusable, field, time, file, time_index, was_set, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(ExtDataNode), intent(inout) :: this
    class(KeywordEnforcer), intent(in), optional :: unusable
    type(ESMF_Field), intent(in), optional :: field
    type(ESMF_Time), intent(in), optional :: time
    character(len=*), intent(in), optional :: file
    integer, intent(in), optional :: time_index
    logical, intent(in), optional :: was_set
    integer, intent(out), optional :: rc