ESMF_GridCompGetInit Function

public recursive function ESMF_GridCompGetInit(d) result(GridCompGetInit)

Arguments

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

Return Value integer(kind=ESMF_KIND_I8)


Called by

ESMF_AttributeCopyGridCompToGridCompwESMF_GridCompGetInit
w
ESMF_AttributeGetAttPackGridCompw
w
ESMF_AttributeGetAttPackGridCompCHw
w
ESMF_AttributeGetAttPackGridCompCHListw
w
ESMF_AttributeGetAttPackGridCompI4w
w
ESMF_AttributeGetAttPackGridCompI4Listw
w
ESMF_AttributeGetAttPackGridCompI8w
w
ESMF_AttributeGetAttPackGridCompI8Listw
w
ESMF_AttributeGetAttPackGridCompLGw
w
ESMF_AttributeGetAttPackGridCompLGListw
w
ESMF_AttributeGetAttPackGridCompR4w
w
ESMF_AttributeGetAttPackGridCompR4Listw
w
ESMF_AttributeGetAttPackGridCompR8w
w
ESMF_AttributeGetAttPackGridCompR8Listw
w
ESMF_AttributeGetCountAttPackGridCompw
w
ESMF_AttributeGetCountGridCompw
w
ESMF_AttributeGetInfoByNamAPGridCompw
w
ESMF_AttributeGetInfoByNamGridCompw
w
ESMF_AttributeGetInfoByNumGridCompw
w
ESMF_AttributeGetObjGridCompCHw
w
ESMF_AttributeGetObjGridCompCHListw
w
ESMF_AttributeGetObjGridCompI4w
w
ESMF_AttributeGetObjGridCompI4Listw
w
ESMF_AttributeGetObjGridCompI8w
w
ESMF_AttributeGetObjGridCompI8Listw
w
ESMF_AttributeGetObjGridCompLGw
w
ESMF_AttributeGetObjGridCompLGListw
w
ESMF_AttributeGetObjGridCompR4w
w
ESMF_AttributeGetObjGridCompR4Listw
w
ESMF_AttributeGetObjGridCompR8w
w
ESMF_AttributeGetObjGridCompR8Listw
w
ESMF_AttributeReadGridCompw
w
ESMF_AttributeRemoveAttPackGridCompw
w
ESMF_AttributeSetAttPackGridCompCHw
w
ESMF_AttributeSetAttPackGridCompCHListw
w
ESMF_AttributeSetAttPackGridCompI4w
w
ESMF_AttributeSetAttPackGridCompI4Listw
w
ESMF_AttributeSetAttPackGridCompI8w
w
ESMF_AttributeSetAttPackGridCompI8Listw
w
ESMF_AttributeSetAttPackGridCompLGw
w
ESMF_AttributeSetAttPackGridCompLGListw
w
ESMF_AttributeSetAttPackGridCompR4w
w
ESMF_AttributeSetAttPackGridCompR4Listw
w
ESMF_AttributeSetAttPackGridCompR8w
w
ESMF_AttributeSetAttPackGridCompR8Listw
w
ESMF_AttributeSetObjGridCompCHw
w
ESMF_AttributeSetObjGridCompCHListw
w
ESMF_AttributeSetObjGridCompI4w
w
ESMF_AttributeSetObjGridCompI4Listw
w
ESMF_AttributeSetObjGridCompI8w
w
ESMF_AttributeSetObjGridCompI8Listw
w
ESMF_AttributeSetObjGridCompLGw
w
ESMF_AttributeSetObjGridCompLGListw
w
ESMF_AttributeSetObjGridCompR4w
w
ESMF_AttributeSetObjGridCompR4Listw
w
ESMF_AttributeSetObjGridCompR8w
w
ESMF_AttributeSetObjGridCompR8Listw
w
ESMF_AttributeUpdateGridCompw
w
ESMF_AttributeWriteGridCompw
w
ESMF_GridCompDestroyw
w
ESMF_GridCompEQw
w
ESMF_GridCompFinalizew
w
ESMF_GridCompFinalizeActw
w
ESMF_GridCompGetw
w
ESMF_GridCompGetEPPhaseCountw
w
ESMF_GridCompInitializew
w
ESMF_GridCompInitializeActw
w
ESMF_GridCompIsCreatedw
w
ESMF_GridCompIsPetLocalw
w
ESMF_GridCompPrintw
w
ESMF_GridCompReadRestartw
w
ESMF_GridCompRunw
w
ESMF_GridCompRunActw
w
ESMF_GridCompServiceLoopw
w
ESMF_GridCompSetw
w
ESMF_GridCompSetEntryPointw
w
ESMF_GridCompSetServicesw
w
ESMF_GridCompSetServicesCompw
w
ESMF_GridCompSetServicesShObjw
w
ESMF_GridCompSetServicesSockw
w
ESMF_GridCompSetVMw
w
ESMF_GridCompSetVMMaxPEsw
w
ESMF_GridCompSetVMMaxThreadsw
w
ESMF_GridCompSetVMMinThreadsw
w
ESMF_GridCompSetVMShObjw
w
ESMF_GridCompSetVMStdRedirectw
w
ESMF_GridCompValidatew
w
ESMF_GridCompWaitw
w
ESMF_GridCompWriteRestartw
w
ESMF_InfoDescribe%getInfoGridCompw
w
ESMF_InternalStateGridCompAddw
w
ESMF_InternalStateGridCompGetw
w
ESMF_InternalStateGridCompGetLw
w
ESMF_MethodGridCompAddw
w
ESMF_MethodGridCompAddRepw
w
ESMF_MethodGridCompAddRepShObjw
w
ESMF_MethodGridCompAddShObjw
w
ESMF_MethodGridCompExecutew
w
ESMF_MethodGridCompGetw
w
ESMF_MethodGridCompGetListw
w
ESMF_MethodGridCompRemovew
w

Source Code

  recursive function ESMF_GridCompGetInit(d) result (GridCompGetInit)
!
! !RETURN VALUE:
    ESMF_INIT_TYPE :: GridCompGetInit
!
! !ARGUMENTS:
    type(ESMF_GridComp), intent(in), optional :: d
!
! !DESCRIPTION:
! Get the initialization status of the Deep class {\tt GridComp}.
!
! The arguments are:
! \begin{description}
! \item[d]
!   {\tt ESMF\_GridComp} from which to retrieve status.
! \end{description}
!
!EOPI
!------------------------------------------------------------------------------
    if (present(d)) then
      GridCompGetInit = ESMF_INIT_GET(d)
    else
      GridCompGetInit = ESMF_INIT_CREATED
    endif
  end function ESMF_GridCompGetInit