ESMF_SciCompGetInit Function

public function ESMF_SciCompGetInit(d)

Arguments

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

Return Value integer(kind=ESMF_KIND_I8)


Called by

ESMF_AttributeCopySciCompToSciCompwESMF_SciCompGetInit
w
ESMF_AttributeGetAttPackSciCompw
w
ESMF_AttributeGetAttPackSciCompCHw
w
ESMF_AttributeGetAttPackSciCompCHListw
w
ESMF_AttributeGetAttPackSciCompI4w
w
ESMF_AttributeGetAttPackSciCompI4Listw
w
ESMF_AttributeGetAttPackSciCompI8w
w
ESMF_AttributeGetAttPackSciCompI8Listw
w
ESMF_AttributeGetAttPackSciCompLGw
w
ESMF_AttributeGetAttPackSciCompLGListw
w
ESMF_AttributeGetAttPackSciCompR4w
w
ESMF_AttributeGetAttPackSciCompR4Listw
w
ESMF_AttributeGetAttPackSciCompR8w
w
ESMF_AttributeGetAttPackSciCompR8Listw
w
ESMF_AttributeGetCountAttPackSciCompw
w
ESMF_AttributeGetCountSciCompw
w
ESMF_AttributeGetInfoByNamAPSciCompw
w
ESMF_AttributeGetInfoByNamSciCompw
w
ESMF_AttributeGetInfoByNumSciCompw
w
ESMF_AttributeGetObjSciCompCHw
w
ESMF_AttributeGetObjSciCompCHListw
w
ESMF_AttributeGetObjSciCompI4w
w
ESMF_AttributeGetObjSciCompI4Listw
w
ESMF_AttributeGetObjSciCompI8w
w
ESMF_AttributeGetObjSciCompI8Listw
w
ESMF_AttributeGetObjSciCompLGw
w
ESMF_AttributeGetObjSciCompLGListw
w
ESMF_AttributeGetObjSciCompR4w
w
ESMF_AttributeGetObjSciCompR4Listw
w
ESMF_AttributeGetObjSciCompR8w
w
ESMF_AttributeGetObjSciCompR8Listw
w
ESMF_AttributeReadSciCompw
w
ESMF_AttributeRemoveAttPackSciCompw
w
ESMF_AttributeSetAttPackSciCompCHw
w
ESMF_AttributeSetAttPackSciCompCHListw
w
ESMF_AttributeSetAttPackSciCompI4w
w
ESMF_AttributeSetAttPackSciCompI4Listw
w
ESMF_AttributeSetAttPackSciCompI8w
w
ESMF_AttributeSetAttPackSciCompI8Listw
w
ESMF_AttributeSetAttPackSciCompLGw
w
ESMF_AttributeSetAttPackSciCompLGListw
w
ESMF_AttributeSetAttPackSciCompR4w
w
ESMF_AttributeSetAttPackSciCompR4Listw
w
ESMF_AttributeSetAttPackSciCompR8w
w
ESMF_AttributeSetAttPackSciCompR8Listw
w
ESMF_AttributeSetObjSciCompCHw
w
ESMF_AttributeSetObjSciCompCHListw
w
ESMF_AttributeSetObjSciCompI4w
w
ESMF_AttributeSetObjSciCompI4Listw
w
ESMF_AttributeSetObjSciCompI8w
w
ESMF_AttributeSetObjSciCompI8Listw
w
ESMF_AttributeSetObjSciCompLGw
w
ESMF_AttributeSetObjSciCompLGListw
w
ESMF_AttributeSetObjSciCompR4w
w
ESMF_AttributeSetObjSciCompR4Listw
w
ESMF_AttributeSetObjSciCompR8w
w
ESMF_AttributeSetObjSciCompR8Listw
w
ESMF_AttributeUpdateSciCompw
w
ESMF_AttributeWriteSciCompw
w
ESMF_InfoDescribe%getInfoSciCompw
w
ESMF_SciCompDestroyw
w
ESMF_SciCompEQw
w
ESMF_SciCompGetw
w
ESMF_SciCompIsCreatedw
w
ESMF_SciCompPrintw
w
ESMF_SciCompSetw
w
ESMF_SciCompValidatew
w

Source Code

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