ESMF_AttributeGetInit Function

public function ESMF_AttributeGetInit(attpack)

Arguments

Type IntentOptional Attributes Name
type(ESMF_AttPack), intent(in), optional :: attpack

Return Value integer(kind=ESMF_KIND_I8)


Source Code

    function ESMF_AttributeGetInit(attpack)
      type(ESMF_AttPack), intent(in), optional :: attpack
      ESMF_INIT_TYPE :: ESMF_AttributeGetInit
    
      if (present(attpack)) then
          ESMF_AttributeGetInit=ESMF_INIT_GET(attpack)
      else
          ESMF_AttributeGetInit=ESMF_INIT_CREATED
      endif
    
    end function ESMF_AttributeGetInit