ESMF_XGridGetInit Function

public function ESMF_XGridGetInit(d)

Arguments

Type IntentOptional Attributes Name
type(ESMF_XGrid), intent(in), optional :: d

Return Value integer(kind=ESMF_KIND_I8)


Called by

proc~~esmf_xgridgetinit~~CalledByGraph proc~esmf_xgridgetinit ESMF_XGridGetInit proc~esmf_geomcreatexgrid ESMF_GeomCreateXGrid proc~esmf_geomcreatexgrid->proc~esmf_xgridgetinit proc~esmf_xgriddestroy ESMF_XGridDestroy proc~esmf_xgriddestroy->proc~esmf_xgridgetinit proc~esmf_xgrideq ESMF_XGridEQ proc~esmf_xgrideq->proc~esmf_xgridgetinit proc~esmf_xgridgetdefault ESMF_XGridGetDefault proc~esmf_xgridgetdefault->proc~esmf_xgridgetinit proc~esmf_xgridgetdg ESMF_XGridGetDG proc~esmf_xgridgetdg->proc~esmf_xgridgetinit proc~esmf_xgridgetele ESMF_XGridGetEle proc~esmf_xgridgetele->proc~esmf_xgridgetinit proc~esmf_xgridgetfieldbounds ESMF_XGridGetFieldBounds proc~esmf_xgridgetfieldbounds->proc~esmf_xgridgetinit proc~esmf_xgridgetgb ESMF_XGridGetGB proc~esmf_xgridgetgb->proc~esmf_xgridgetinit proc~esmf_xgridgetgeomobj ESMF_XGridGetGeomObj proc~esmf_xgridgetgeomobj->proc~esmf_xgridgetinit proc~esmf_xgridgetsmmspecfrac ESMF_XGridGetSMMSpecFrac proc~esmf_xgridgetsmmspecfrac->proc~esmf_xgridgetinit proc~esmf_xgridiscreated ESMF_XGridIsCreated proc~esmf_xgridiscreated->proc~esmf_xgridgetinit proc~esmf_xgridmatch ESMF_XGridMatch proc~esmf_xgridmatch->proc~esmf_xgridgetinit proc~esmf_xgridserialize ESMF_XGridSerialize proc~esmf_xgridserialize->proc~esmf_xgridgetinit proc~esmf_xgridvalidate ESMF_XGridValidate proc~esmf_xgridvalidate->proc~esmf_xgridgetinit

Source Code

    function ESMF_XGridGetInit(d)
!
! !ARGUMENTS:
       type(ESMF_XGrid), intent(in), optional :: d
       ESMF_INIT_TYPE :: ESMF_XGridGetInit
!
! !DESCRIPTION:
!      Get the initialization status of the Deep class {\tt xgrid}.
!
!     The arguments are:
!     \begin{description}
!     \item [s]
!           {\tt ESMF\_XGrid} from which to retrieve status.
!     \end{description}
!
!EOPI


       if (present(d)) then
         ESMF_XGridGetInit = ESMF_INIT_GET(d)
       else
         ESMF_XGridGetInit = ESMF_INIT_CREATED
       endif

    end function ESMF_XGridGetInit