ESMF_ConfigGetInit Function

public function ESMF_ConfigGetInit(d)

Arguments

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

Return Value integer(kind=ESMF_KIND_I8)


Called by

ESMF_ConfigDestroywESMF_ConfigGetInit
w
ESMF_ConfigFindLabelw
w
ESMF_ConfigFindNextLabelw
w
ESMF_ConfigGetw
w
ESMF_ConfigGetCharw
w
ESMF_ConfigGetDimw
w
ESMF_ConfigGetFloatR4w
w
ESMF_ConfigGetFloatR8w
w
ESMF_ConfigGetFloatsR4w
w
ESMF_ConfigGetFloatsR8w
w
ESMF_ConfigGetIntI4w
w
ESMF_ConfigGetIntI8w
w
ESMF_ConfigGetIntsI4w
w
ESMF_ConfigGetIntsI8w
w
ESMF_ConfigGetLenw
w
ESMF_ConfigGetLogicalw
w
ESMF_ConfigGetLogicalsw
w
ESMF_ConfigGetStringw
w
ESMF_ConfigGetStringsw
w
ESMF_ConfigIsCreatedw
w
ESMF_ConfigLoadFilew
w
ESMF_ConfigLoadFile_1proc_w
w
ESMF_ConfigNextLinew
w
ESMF_ConfigParseAttributesw
w
ESMF_ConfigSetCurrentAttrUsedw
w
ESMF_ConfigSetIntI4w
w
ESMF_ConfigSetStringw
w
ESMF_ConfigValidatew
w
ESMF_CplCompCreatew
w
ESMF_CplCompSetw
w
ESMF_GridCompCreatew
w
ESMF_GridCompSetw
w

Source Code

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

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

    end function ESMF_ConfigGetInit