ESMF_XGridGeomBaseGetInit Function

public function ESMF_XGridGeomBaseGetInit(gridbase)

Arguments

Type IntentOptional Attributes Name
type(ESMF_XGridGeomBase), intent(in), optional :: gridbase

Return Value integer(kind=ESMF_KIND_I8)


Called by

proc~~esmf_xgridgeombasegetinit~~CalledByGraph proc~esmf_xgridgeombasegetinit ESMF_XGridGeomBaseGetInit proc~esmf_xgridgeombasedestroy ESMF_XGridGeomBaseDestroy proc~esmf_xgridgeombasedestroy->proc~esmf_xgridgeombasegetinit proc~esmf_xgridgeombaseget ESMF_XGridGeomBaseGet proc~esmf_xgridgeombaseget->proc~esmf_xgridgeombasegetinit proc~esmf_xgridgeombasegetarrayinfo ESMF_XGridGeomBaseGetArrayInfo proc~esmf_xgridgeombasegetarrayinfo->proc~esmf_xgridgeombasegetinit proc~esmf_xgridgeombasegetplocalde ESMF_XGridGeomBaseGetPLocalDe proc~esmf_xgridgeombasegetplocalde->proc~esmf_xgridgeombasegetinit proc~esmf_xgridgeombasematch ESMF_XGridGeomBaseMatch proc~esmf_xgridgeombasematch->proc~esmf_xgridgeombasegetinit proc~esmf_xgridgeombaseserialize ESMF_XGridGeomBaseSerialize proc~esmf_xgridgeombaseserialize->proc~esmf_xgridgeombasegetinit proc~esmf_xgridgeombasevalidate ESMF_XGridGeomBaseValidate proc~esmf_xgridgeombasevalidate->proc~esmf_xgridgeombasegetinit proc~esmf_geomget ESMF_GeomGet proc~esmf_geomget->proc~esmf_xgridgeombaseget proc~esmf_xgridcreate ESMF_XGridCreate proc~esmf_xgridcreate->proc~esmf_xgridgeombaseget proc~esmf_xgriddestroy ESMF_XGridDestroy proc~esmf_xgriddestroy->proc~esmf_xgridgeombasedestroy proc~esmf_xgriddistgridsonline ESMF_XGridDistGridsOnline proc~esmf_xgriddistgridsonline->proc~esmf_xgridgeombaseget proc~esmf_xgridgetdefault ESMF_XGridGetDefault proc~esmf_xgridgetdefault->proc~esmf_xgridgeombaseget proc~esmf_xgridmatch ESMF_XGridMatch proc~esmf_xgridmatch->proc~esmf_xgridgeombasematch proc~esmf_xgridserialize ESMF_XGridSerialize proc~esmf_xgridserialize->proc~esmf_xgridgeombaseserialize

Source Code

      function ESMF_XGridGeomBaseGetInit(gridbase)
!
! !RETURN VALUE:
      ESMF_INIT_TYPE :: ESMF_XGridGeomBaseGetInit
!
! !ARGUMENTS:
      type(ESMF_XGridGeomBase), intent(in), optional :: gridbase
!
! !DESCRIPTION:
! Access deep object init code.
!
! The arguments are:
! \begin{description}
! \item [gridbase]
! Grid Base object.
! \end{description}
!
!EOPI

    if (present(gridbase)) then
      ESMF_XGridGeomBaseGetInit = ESMF_INIT_GET(gridbase)
    else
      ESMF_XGridGeomBaseGetInit = ESMF_INIT_CREATED
    endif

    end function ESMF_XGridGeomBaseGetInit