GeomPFIO Derived Type

type, public, abstract :: GeomPFIO


Inherits

type~~geompfio~~InheritsGraph type~geompfio GeomPFIO MaplGeom MaplGeom type~geompfio->MaplGeom mapl_geom

Inherited by

type~~geompfio~~InheritedByGraph type~geompfio GeomPFIO type~gridpfio GridPFIO type~gridpfio->type~geompfio

Type-Bound Procedures

procedure, public, non_overridable :: get_collection_id

  • private pure function get_collection_id(this)

    Arguments

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

    Return Value integer

generic, public :: initialize => init_with_metadata, init_with_filename

  • private subroutine init_with_metadata(this, metadata, mapl_geom, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(GeomPFIO), intent(inout) :: this
    type(FileMetadata), intent(in) :: metadata
    type(MaplGeom), intent(in), pointer :: mapl_geom
    integer, intent(out), optional :: rc

  • private subroutine init_with_filename(this, file_name, mapl_geom, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(GeomPFIO), intent(inout) :: this
    character(len=*), intent(in) :: file_name
    type(MaplGeom), intent(in), pointer :: mapl_geom
    integer, intent(out), optional :: rc

procedure(I_request_data_from_file), public, deferred :: request_data_from_file

  • subroutine I_request_data_from_file(this, file_name, state, rc) Prototype

    Arguments

    Type IntentOptional Attributes Name
    class(GeomPFIO), intent(inout) :: this
    character(len=*), intent(in) :: file_name
    type(ESMF_State), intent(inout) :: state
    integer, intent(out), optional :: rc

procedure(I_stage_data_to_file), public, deferred :: stage_data_to_file

  • subroutine I_stage_data_to_file(this, bundle, filename, time_index, rc) Prototype

    Arguments

    Type IntentOptional Attributes Name
    class(GeomPFIO), intent(inout) :: this
    type(ESMF_FieldBundle), intent(in) :: bundle
    character(len=*), intent(in) :: filename
    integer, intent(in) :: time_index
    integer, intent(out), optional :: rc

procedure, public :: stage_time_to_file

  • private subroutine stage_time_to_file(this, filename, times, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(GeomPFIO), intent(inout) :: this
    character(len=*), intent(in) :: filename
    real, intent(in) :: times
    integer, intent(out), optional :: rc

procedure, public :: update_time_on_server

  • private subroutine update_time_on_server(this, time, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(GeomPFIO), intent(inout) :: this
    type(ESMF_Time), intent(in) :: time
    integer, intent(out), optional :: rc

Source Code

   type, abstract :: GeomPFIO
      private
      integer :: collection_id
      type(MaplGeom), pointer :: mapl_geom
   contains
      procedure(I_stage_data_to_file), deferred :: stage_data_to_file
      procedure(I_request_data_from_file), deferred :: request_data_from_file
      procedure, private :: init_with_metadata
      procedure, private :: init_with_filename
      generic :: initialize => init_with_metadata, init_with_filename
      procedure :: update_time_on_server
      procedure :: stage_time_to_file
      procedure, non_overridable :: get_collection_id
   end type GeomPFIO