TypekindAspect Derived Type

type, public, extends(StateItemAspect) :: TypekindAspect


Inherits

type~~typekindaspect~~InheritsGraph type~typekindaspect TypekindAspect ESMF_TypeKind_Flag ESMF_TypeKind_Flag type~typekindaspect->ESMF_TypeKind_Flag typekind type~stateitemaspect StateItemAspect type~typekindaspect->type~stateitemaspect

Inherited by

type~~typekindaspect~~InheritedByGraph type~typekindaspect TypekindAspect type~aspectcollection AspectCollection type~aspectcollection->type~typekindaspect typekind_aspect type~stateitemspec StateItemSpec type~stateitemspec->type~aspectcollection aspects type~variablespec VariableSpec type~variablespec->type~aspectcollection aspects type~actualptstateitemspecpair ActualPtStateItemSpecPair type~actualptstateitemspecpair->type~stateitemspec second type~bracketspec BracketSpec type~bracketspec->type~stateitemspec type~fieldspec~2 FieldSpec type~bracketspec->type~fieldspec~2 reference_spec, field_specs type~fieldspec~2->type~stateitemspec type~invalidspec InvalidSpec type~invalidspec->type~stateitemspec type~mockitemspec MockItemSpec type~mockitemspec->type~stateitemspec type~servicespec ServiceSpec type~servicespec->type~stateitemspec type~servicespec->type~variablespec variable_spec type~stateitemspecptr StateItemSpecPtr type~servicespec->type~stateitemspecptr dependency_specs type~stateitemextension StateItemExtension type~stateitemextension->type~stateitemspec spec type~stateitemspecpair StateItemSpecPair type~stateitemspecpair->type~stateitemspec second type~stateitemspecptr->type~stateitemspec ptr type~statespec StateSpec type~statespec->type~stateitemspec type~vector_wrapper~22 vector_wrapper type~vector_wrapper~22->type~stateitemspec item type~vector_wrapper~25 vector_wrapper type~vector_wrapper~25->type~variablespec item type~virtualptstateitemspecpair VirtualPtStateItemSpecPair type~virtualptstateitemspecpair->type~stateitemspec second type~wildcardspec WildcardSpec type~wildcardspec->type~stateitemspec reference_spec type~wildcardspec->type~stateitemspec type~actualptspecptrpair ActualPtSpecPtrPair type~actualptspecptrpair->type~stateitemspecptr second type~map_s_node~12 map_s_Node type~map_s_node~12->type~actualptstateitemspecpair value type~map_s_node~13 map_s_Node type~map_s_node~13->type~stateitemspecpair value type~map_s_node~15 map_s_Node type~map_s_node~15->type~virtualptstateitemspecpair value type~stateitemextensionptr StateItemExtensionPtr type~stateitemextensionptr->type~stateitemextension ptr type~stateitemvector StateItemVector type~stateitemvector->type~vector_wrapper~22 elements type~stateitemvectoriterator StateItemVectorIterator type~stateitemvectoriterator->type~vector_wrapper~22 elements type~variablespecvector VariableSpecVector type~variablespecvector->type~vector_wrapper~25 elements type~variablespecvectoriterator VariableSpecVectorIterator type~variablespecvectoriterator->type~vector_wrapper~25 elements type~vector_wrapper~21 vector_wrapper type~vector_wrapper~21->type~stateitemspecptr item type~vector_wrapper~24 vector_wrapper type~vector_wrapper~24->type~stateitemextension item type~virtualptstateitemptrpair VirtualPtStateItemPtrPair type~virtualptstateitemptrpair->type~stateitemspecptr second

Components

Type Visibility Attributes Name Initial
type(ESMF_TypeKind_Flag), public :: typekind = ESMF_TYPEKIND_R4

Constructor

public interface TypekindAspect

  • private function new_TypekindAspect(typekind) result(aspect)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TypeKind_Flag), intent(in), optional :: typekind

    Return Value type(TypekindAspect)


Type-Bound Procedures

procedure, public, non_overridable :: can_connect_to

  • private function can_connect_to(src, dst)

    Arguments

    Type IntentOptional Attributes Name
    class(StateItemAspect), intent(in) :: src
    class(StateItemAspect), intent(in) :: dst

    Return Value logical

procedure, public :: get_typekind

  • private function get_typekind(this) result(typekind)

    Arguments

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

    Return Value type(ESMF_TypeKind_Flag)

procedure, public, non_overridable :: is_mirror

  • private function is_mirror(this)

    Arguments

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

    Return Value logical

procedure, public, non_overridable :: is_time_dependent

  • private function is_time_dependent(this)

    Arguments

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

    Return Value logical

procedure, public :: make_action

  • private function make_action(src, dst, rc) result(action)

    Arguments

    Type IntentOptional Attributes Name
    class(TypekindAspect), intent(in) :: src
    class(StateItemAspect), intent(in) :: dst
    integer, intent(out), optional :: rc

    Return Value class(ExtensionAction), allocatable

procedure, public :: matches

  • private function matches(src, dst)

    Arguments

    Type IntentOptional Attributes Name
    class(TypekindAspect), intent(in) :: src
    class(StateItemAspect), intent(in) :: dst

    Return Value logical

procedure, public, non_overridable :: needs_extension_for

  • private function needs_extension_for(src, dst)

    Arguments

    Type IntentOptional Attributes Name
    class(StateItemAspect), intent(in) :: src
    class(StateItemAspect), intent(in) :: dst

    Return Value logical

procedure, public, non_overridable :: set_mirror

  • private subroutine set_mirror(this, mirror)

    Arguments

    Type IntentOptional Attributes Name
    class(StateItemAspect), intent(inout) :: this
    logical, intent(in), optional :: mirror

procedure, public, non_overridable :: set_time_dependent

  • private subroutine set_time_dependent(this, time_dependent)

    Arguments

    Type IntentOptional Attributes Name
    class(StateItemAspect), intent(inout) :: this
    logical, intent(in), optional :: time_dependent

procedure, public :: set_typekind

  • private subroutine set_typekind(this, typekind)

    Arguments

    Type IntentOptional Attributes Name
    class(TypekindAspect), intent(inout) :: this
    type(ESMF_TypeKind_Flag), intent(in) :: typekind

generic, public :: supports_conversion => supports_conversion_general, supports_conversion_specific

  • private function supports_conversion_general(src)

    Arguments

    Type IntentOptional Attributes Name
    class(GeomAspect), intent(in) :: src

    Return Value logical

  • private function supports_conversion_specific(src, dst)

    Arguments

    Type IntentOptional Attributes Name
    class(GeomAspect), intent(in) :: src
    class(StateItemAspect), intent(in) :: dst

    Return Value logical

procedure, public :: supports_conversion_general

  • private function supports_conversion_general(src)

    Arguments

    Type IntentOptional Attributes Name
    class(TypekindAspect), intent(in) :: src

    Return Value logical

procedure, public :: supports_conversion_specific

  • private function supports_conversion_specific(src, dst)

    Arguments

    Type IntentOptional Attributes Name
    class(TypekindAspect), intent(in) :: src
    class(StateItemAspect), intent(in) :: dst

    Return Value logical

Source Code

   type, extends(StateItemAspect) :: TypekindAspect
!#      private
      type(ESMF_Typekind_Flag) :: typekind = ESMF_TYPEKIND_R4 ! default
   contains
      procedure :: matches
      procedure :: supports_conversion_general
      procedure :: supports_conversion_specific
      procedure :: make_action

      procedure :: set_typekind
      procedure :: get_typekind
   end type TypekindAspect