MAPL_TileGridIO Derived Type

type, public, extends(MAPL_GriddedIO) :: MAPL_TileGridIO


Inherits

type~~mapl_tilegridio~~InheritsGraph type~mapl_tilegridio MAPL_TileGridIO ESMF_Field ESMF_Field type~mapl_tilegridio->ESMF_Field field_in, field_out ESMF_FieldBundle ESMF_FieldBundle type~mapl_tilegridio->ESMF_FieldBundle bundle ESMF_RouteHandle ESMF_RouteHandle type~mapl_tilegridio->ESMF_RouteHandle routeHandle type~mapl_griddedio MAPL_GriddedIO type~mapl_tilegridio->type~mapl_griddedio type~tile_buffer tile_buffer type~mapl_tilegridio->type~tile_buffer tile_buffer type~mapl_griddedio->ESMF_FieldBundle output_bundle, input_bundle ESMF_Grid ESMF_Grid type~mapl_griddedio->ESMF_Grid output_grid ESMF_Time ESMF_Time type~mapl_griddedio->ESMF_Time startTime type~abstractregridder AbstractRegridder type~mapl_griddedio->type~abstractregridder regrid_handle type~filemetadata FileMetadata type~mapl_griddedio->type~filemetadata metadata type~filemetadatautils FileMetadataUtils type~mapl_griddedio->type~filemetadatautils current_file_metadata type~griddedioitemvector GriddedIOitemVector type~mapl_griddedio->type~griddedioitemvector items type~timedata timeData type~mapl_griddedio->type~timedata timeInfo type~verticaldata verticalData type~mapl_griddedio->type~verticaldata vdata type~regridderspec RegridderSpec type~abstractregridder->type~regridderspec spec StringIntegerMap StringIntegerMap type~filemetadata->StringIntegerMap dimensions StringVector StringVector type~filemetadata->StringVector order type~stringvariablemap StringVariableMap type~filemetadata->type~stringvariablemap variables type~variable Variable type~filemetadata->type~variable global_var type~filemetadatautils->type~filemetadata type~v_wrapper v_Wrapper type~griddedioitemvector->type~v_wrapper elements ESMF_Clock ESMF_Clock type~timedata->ESMF_Clock clock ESMF_TimeInterval ESMF_TimeInterval type~timedata->ESMF_TimeInterval offset type~esmftimevector ESMFTimeVector type~timedata->type~esmftimevector tvec type~verticaldata->ESMF_Field interp_var, phis_var, ts_var type~esmftimevector->ESMF_Time elements type~regridderspec->ESMF_Grid grid_in, grid_out type~set2~13 set2 type~stringvariablemap->type~set2~13 tree type~griddedioitem GriddedIOitem type~v_wrapper->type~griddedioitem item type~variable->StringVector dimensions type~stringattributemap StringAttributeMap type~variable->type~stringattributemap attributes type~unlimitedentity UnlimitedEntity type~variable->type~unlimitedentity const_value

Inherited by

type~~mapl_tilegridio~~InheritedByGraph type~mapl_tilegridio MAPL_TileGridIO type~extdatang_iobundle ExtDataNG_IOBundle type~extdatang_iobundle->type~mapl_tilegridio tile_io type~iobundlengvector IoBundleNGVector type~iobundlengvector->type~extdatang_iobundle elements type~iobundlengvectoriterator IoBundleNGVectorIterator type~iobundlengvectoriterator->type~extdatang_iobundle elements type~iobundlengvectorriterator IoBundleNGVectorRIterator type~iobundlengvectorriterator->type~extdatang_iobundle elements

Components

Type Visibility Attributes Name Initial
integer, public, allocatable :: chunking(:)
integer, public :: deflateLevel = 0
integer, public :: fraction
integer, public, allocatable :: i_index(:)
integer, public, allocatable :: j_index(:)
integer, public :: metadata_collection_id
integer, public :: nbits_to_keep = MAPL_NBITS_NOT_SET
integer, public :: quantizeAlgorithm = MAPL_NOQUANTIZE
integer, public :: quantizeLevel = 0
integer, public :: read_collection_id
integer, public :: regrid_hints = 0
integer, public :: regrid_method = REGRID_METHOD_BILINEAR
integer, public :: write_collection_id
integer, public :: zstandardLevel = 0
logical, public :: doVertRegrid = .false.
logical, public :: itemOrderAlphabetical = .true.
real, public, allocatable :: corner_lats(:,:)
real, public, allocatable :: corner_lons(:,:)
real, public, allocatable :: lats(:,:)
real, public, allocatable :: lons(:,:)
real, public, allocatable :: tilelats(:)
real, public, allocatable :: tilelons(:)
real, public, allocatable :: times(:)
type(ESMF_Field), public :: field_in
type(ESMF_Field), public :: field_out
type(ESMF_Grid), public :: output_grid
type(ESMF_RouteHandle), public :: routeHandle
type(ESMF_Time), public :: startTime
class(AbstractRegridder), public, pointer :: regrid_handle => null()
type(ESMF_FieldBundle), public :: bundle
type(ESMF_FieldBundle), public :: input_bundle
type(ESMF_FieldBundle), public :: output_bundle
type(FileMetadata), public, allocatable :: metadata
type(FileMetadataUtils), public, pointer :: current_file_metadata
type(GriddedIOitemVector), public :: items
type(tile_buffer), public, allocatable :: tile_buffer(:)
type(timeData), public :: timeInfo
type(verticalData), public :: vdata

Constructor

public interface MAPL_TileGridIO

  • private function new_MAPL_TileGridIO(metadata, input_bundle, output_bundle, write_collection_id, read_collection_id, metadata_collection_id, regrid_method, fraction, items, rc) result(TileGridIO)

    Arguments

    Type IntentOptional Attributes Name
    type(FileMetadata), intent(in), optional :: metadata
    type(ESMF_FieldBundle), intent(in), optional :: input_bundle
    type(ESMF_FieldBundle), intent(in), optional :: output_bundle
    integer, intent(in), optional :: write_collection_id
    integer, intent(in), optional :: read_collection_id
    integer, intent(in), optional :: metadata_collection_id
    integer, intent(in), optional :: regrid_method
    integer, intent(in), optional :: fraction
    type(GriddedIOitemVector), intent(in), optional :: items
    integer, intent(out), optional :: rc

    Return Value type(MAPL_TileGridIO)

  • private function new_MAPL_TileIO(bundle, read_collection_id) result(TileIO)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_FieldBundle), intent(in) :: bundle
    integer, intent(in) :: read_collection_id

    Return Value type(MAPL_TileGridIO)


Type-Bound Procedures

procedure, public :: CreateFileMetaData

  • private subroutine CreateFileMetaData(this, items, bundle, timeInfo, vdata, ogrid, global_attributes, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_TileGridIO), intent(inout), target :: this
    type(GriddedIOitemVector), intent(inout), target :: items
    type(ESMF_FieldBundle), intent(inout) :: bundle
    type(timeData), intent(inout) :: timeInfo
    type(verticalData), intent(inout), optional :: vdata
    type(ESMF_Grid), intent(inout), optional, pointer :: ogrid
    type(StringStringMap), intent(in), optional, target :: global_attributes
    integer, intent(out), optional :: rc

procedure, public :: CreateQuantizationInfo

  • private subroutine CreateQuantizationInfo(this, rc)

    Arguments

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

procedure, public :: CreateVariable

  • private subroutine CreateVariable(this, itemName, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_TileGridIO), intent(inout) :: this
    character(len=*), intent(in) :: itemName
    integer, intent(out), optional :: rc

procedure, public :: InitRedistHandle

  • private subroutine InitRedistHandle(this, rc)

    Arguments

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

procedure, public :: alphabatize_variables

  • private subroutine alphabatize_variables(this, nFixedVars, rc)

    Arguments

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

procedure, public :: bundlePost => bundlepost

  • private subroutine bundlepost(this, filename, oClients, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_TileGridIO), intent(inout), target :: this
    character(len=*), intent(in) :: filename
    type(ClientManager), intent(inout), optional :: oClients
    integer, intent(out), optional :: rc

procedure, public :: check_chunking

  • private subroutine check_chunking(this, lev_size, rc)

    Arguments

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

procedure, public :: destroy

  • private subroutine destroy(this, rc)

    Arguments

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

procedure, public :: modifyTime

  • private subroutine modifyTime(this, oClients, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_GriddedIO), intent(inout) :: this
    type(ClientManager), intent(inout), optional :: oClients
    integer, intent(out), optional :: rc

procedure, public :: modifyTimeIncrement

  • private subroutine modifyTimeIncrement(this, frequency, rc)

    Arguments

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

procedure, public :: process_data_from_file

  • private subroutine process_data_from_file(this, rc)

    Arguments

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

procedure, public :: regridScalar => RegridScalar

  • private subroutine RegridScalar(this, itemName, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_TileGridIO), intent(inout) :: this
    character(len=*), intent(in) :: itemName
    integer, intent(out), optional :: rc

procedure, public :: regridVector => RegridVector

  • private subroutine RegridVector(this, xName, yName, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_GriddedIO), intent(inout) :: this
    character(len=*), intent(in) :: xName
    character(len=*), intent(in) :: yName
    integer, intent(out), optional :: rc

procedure, public :: request_data_from_file

  • private subroutine request_data_from_file(this, filename, timeindex, rc)

    Arguments

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

procedure, public :: set_default_chunking

  • private subroutine set_default_chunking(this, rc)

    Arguments

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

procedure, public :: set_param

  • private subroutine set_param(this, deflation, quantize_algorithm, quantize_level, zstandard_level, chunking, nbits_to_keep, regrid_method, itemOrder, write_collection_id, regrid_hints, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_GriddedIO), intent(inout) :: this
    integer, intent(in), optional :: deflation
    integer, intent(in), optional :: quantize_algorithm
    integer, intent(in), optional :: quantize_level
    integer, intent(in), optional :: zstandard_level
    integer, intent(in), optional :: chunking(:)
    integer, intent(in), optional :: nbits_to_keep
    integer, intent(in), optional :: regrid_method
    logical, intent(in), optional :: itemOrder
    integer, intent(in), optional :: write_collection_id
    integer, intent(in), optional :: regrid_hints
    integer, intent(out), optional :: rc

procedure, public :: stage2DLatLon

  • private subroutine stage2DLatLon(this, fileName, oClients, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_TileGridIO), intent(inout), target :: this
    character(len=*), intent(in) :: fileName
    type(ClientManager), intent(inout), optional, target :: oClients
    integer, intent(out), optional :: rc

procedure, public :: stageData

  • private subroutine stageData(this, field, fileName, tIndex, oClients, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_TileGridIO), intent(inout) :: this
    type(ESMF_Field), intent(inout) :: field
    character(len=*), intent(in) :: fileName
    integer, intent(in) :: tIndex
    type(ClientManager), intent(inout), optional :: oClients
    integer, intent(out), optional :: rc

procedure, public :: swap_undef_value

  • private subroutine swap_undef_value(this, fname, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MAPL_TileGridIO), intent(inout) :: this
    character(len=*), intent(in) :: fname
    integer, intent(out), optional :: rc

Source Code

  type, extends(MAPL_GriddedIO) :: MAPL_TileGridIO
     type(ESMF_FieldBundle)         :: bundle
     type(tile_buffer), allocatable :: tile_buffer(:)
     type(ESMF_Field)               :: field_in, field_out
     type(ESMF_RouteHandle)         :: routeHandle
     real, allocatable              :: tilelons(:), tilelats(:)
     integer, allocatable           :: i_index(:), j_index(:)
     contains
        procedure :: CreateFileMetaData
        procedure :: CreateVariable
        procedure :: CreateQuantizationInfo
        procedure :: bundlePost
        procedure :: stageData
        procedure :: stage2DLatLon
        procedure :: regridScalar
        procedure :: request_data_from_file
        procedure :: process_data_from_file
        procedure :: swap_undef_value
        procedure :: destroy
        procedure :: InitRedistHandle
  end type MAPL_TileGridIO