MaplGrid Derived Type

type, public :: MaplGrid


Inherits

type~~maplgrid~~InheritsGraph type~maplgrid MaplGrid ESMF_DELayout ESMF_DELayout type~maplgrid->ESMF_DELayout LAYOUT ESMF_Grid ESMF_Grid type~maplgrid->ESMF_Grid ESMFGRID

Inherited by

type~~maplgrid~~InheritedByGraph type~maplgrid MaplGrid type~baseframeworkcomponent BaseFrameworkComponent type~baseframeworkcomponent->type~maplgrid grid type~subcomponent SubComponent type~subcomponent->type~maplgrid grid type~maplgenericcomponent MaplGenericComponent type~maplgenericcomponent->type~baseframeworkcomponent type~maplgenericcomponent->type~subcomponent subcomponents type~mapl_metacomp MAPL_MetaComp type~mapl_metacomp->type~maplgenericcomponent type~namedcomponent NamedComponent type~namedcomponent->type~maplgenericcomponent type~historytrajectory HistoryTrajectory type~historytrajectory->type~mapl_metacomp GENSTATE type~masksamplergeosat MaskSamplerGeosat type~masksamplergeosat->type~mapl_metacomp GENSTATE type~stationsampler StationSampler type~stationsampler->type~mapl_metacomp GENSTATE

Components

Type Visibility Attributes Name Initial
integer, public :: IM
integer, public :: IM_WORLD
integer, public :: IOgathercomm
integer, public :: IOscattercomm
integer, public :: JM
integer, public :: JM_WORLD
integer, public :: LM
integer, public :: MYID
integer, public :: NX
integer, public :: NX0
integer, public :: NY
integer, public :: NY0
integer, public :: VERTDIM
integer, public :: Xcomm
integer, public :: Ycomm
integer, public :: comm
integer, public, allocatable :: i1(:)
integer, public, allocatable :: in(:)
integer, public, allocatable :: j1(:)
integer, public, allocatable :: jn(:)
integer, public :: num_readers
integer, public :: num_writers
integer, public :: readers_comm
integer, public :: writers_comm
logical, public :: split_checkpoint = .false.
logical, public :: split_restart = .false.
logical, public :: write_restart_by_oserver = .false.
real, public, pointer :: LATS(:,:)
real, public, pointer :: LONS(:,:)
type(ESMF_DELayout), public :: LAYOUT
type(ESMF_Grid), public :: ESMFGRID

Type-Bound Procedures

procedure, public :: set

  • private subroutine set(this, grid, unusable, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(MaplGrid), intent(inout) :: this
    type(ESMF_Grid), intent(in) :: grid
    class(KeywordEnforcer), intent(in), optional :: unusable
    integer, intent(out), optional :: rc

Source Code

   type :: MaplGrid
      type(ESMF_Grid)                          :: ESMFGRID
      type(ESMF_DELayout)                      :: LAYOUT
      real, pointer                        :: LATS(:,:)
      real, pointer                        :: LONS(:,:)
      integer                                  :: VERTDIM
      integer                                  :: IM_WORLD, JM_WORLD ! Global counts
      integer                                  :: IM, JM, LM ! Local counts
      integer                                  :: MYID, NX, NY, NX0, NY0
      integer                                  :: comm
      integer                                  :: Xcomm, Ycomm
      integer                                  :: readers_comm, IOscattercomm
      integer                                  :: writers_comm, IOgathercomm
      integer                                  :: num_readers, num_writers
      logical                                  :: split_checkpoint = .false. ! only apply to cubed-sphere grid
      logical                                  :: split_restart = .false. ! only apply to cubed-sphere grid
      logical                                  :: write_restart_by_oserver = .false.
      integer, allocatable                      :: i1(:), in(:), j1(:), jn(:)

   contains
      procedure :: set
   end type MaplGrid