ESMF_AttributeAddAttPackStdFieldBundle Subroutine

private subroutine ESMF_AttributeAddAttPackStdFieldBundle(target, convention, purpose, attrList, nestConvention, nestPurpose, attpack, rc)

Arguments

Type IntentOptional Attributes Name
type(ESMF_FieldBundle), intent(inout) :: target
character(len=*), intent(in) :: convention
character(len=*), intent(in) :: purpose
character(len=*), intent(in), optional, dimension(:) :: attrList
character(len=*), intent(in), optional :: nestConvention
character(len=*), intent(in), optional :: nestPurpose
type(ESMF_AttPack), intent(inout), optional :: attpack
integer, intent(out), optional :: rc

Calls

proc~~esmf_attributeaddattpackstdfieldbundle~~CallsGraph proc~esmf_attributeaddattpackstdfieldbundle ESMF_AttributeAddAttPackStdFieldBundle none~getinfo ESMF_InfoDescribe%GetInfo proc~esmf_attributeaddattpackstdfieldbundle->none~getinfo proc~esmf_attributeaddattpackstdinfo ESMF_AttributeAddAttPackStdInfo proc~esmf_attributeaddattpackstdfieldbundle->proc~esmf_attributeaddattpackstdinfo proc~esmf_logfounderror ESMF_LogFoundError proc~esmf_attributeaddattpackstdfieldbundle->proc~esmf_logfounderror proc~getinfoarray ESMF_InfoDescribe%getInfoArray none~getinfo->proc~getinfoarray proc~getinfoarraybundle ESMF_InfoDescribe%getInfoArrayBundle none~getinfo->proc~getinfoarraybundle proc~getinfocplcomp ESMF_InfoDescribe%getInfoCplComp none~getinfo->proc~getinfocplcomp proc~getinfodistgrid ESMF_InfoDescribe%getInfoDistGrid none~getinfo->proc~getinfodistgrid proc~getinfofield ESMF_InfoDescribe%getInfoField none~getinfo->proc~getinfofield proc~getinfofieldbundle ESMF_InfoDescribe%getInfoFieldBundle none~getinfo->proc~getinfofieldbundle proc~getinfogeom ESMF_InfoDescribe%getInfoGeom none~getinfo->proc~getinfogeom proc~getinfogrid ESMF_InfoDescribe%getInfoGrid none~getinfo->proc~getinfogrid proc~getinfogridcomp ESMF_InfoDescribe%getInfoGridComp none~getinfo->proc~getinfogridcomp proc~getinfolocstream ESMF_InfoDescribe%getInfoLocStream none~getinfo->proc~getinfolocstream proc~getinfomesh ESMF_InfoDescribe%getInfoMesh none~getinfo->proc~getinfomesh proc~getinfoscicomp ESMF_InfoDescribe%getInfoSciComp none~getinfo->proc~getinfoscicomp proc~getinfostate ESMF_InfoDescribe%getInfoState none~getinfo->proc~getinfostate proc~esmf_attributeaddattpackstdinfo->proc~esmf_logfounderror interface~esmf_infocreate ESMF_InfoCreate proc~esmf_attributeaddattpackstdinfo->interface~esmf_infocreate interface~esmf_infoget ESMF_InfoGet proc~esmf_attributeaddattpackstdinfo->interface~esmf_infoget interface~esmf_infoset ESMF_InfoSet proc~esmf_attributeaddattpackstdinfo->interface~esmf_infoset proc~attpack_initialize ESMF_AttPack%attpack_initialize proc~esmf_attributeaddattpackstdinfo->proc~attpack_initialize proc~esmf_infodestroy ESMF_InfoDestroy proc~esmf_attributeaddattpackstdinfo->proc~esmf_infodestroy proc~esmf_infoispresent ESMF_InfoIsPresent proc~esmf_attributeaddattpackstdinfo->proc~esmf_infoispresent proc~esmf_inforemove ESMF_InfoRemove proc~esmf_attributeaddattpackstdinfo->proc~esmf_inforemove proc~esmf_infosetnull ESMF_InfoSetNULL proc~esmf_attributeaddattpackstdinfo->proc~esmf_infosetnull esmf_breakpoint esmf_breakpoint proc~esmf_logfounderror->esmf_breakpoint proc~esmf_logrc2msg ESMF_LogRc2Msg proc~esmf_logfounderror->proc~esmf_logrc2msg proc~esmf_logwrite ESMF_LogWrite proc~esmf_logfounderror->proc~esmf_logwrite

Called by

proc~~esmf_attributeaddattpackstdfieldbundle~~CalledByGraph proc~esmf_attributeaddattpackstdfieldbundle ESMF_AttributeAddAttPackStdFieldBundle interface~esmf_attributeadd ESMF_AttributeAdd interface~esmf_attributeadd->proc~esmf_attributeaddattpackstdfieldbundle proc~checkcomponentmetadata checkComponentMetadata proc~checkcomponentmetadata->interface~esmf_attributeadd proc~checkfieldmetadata checkFieldMetadata proc~checkfieldmetadata->interface~esmf_attributeadd proc~checkstate checkState proc~checkstate->interface~esmf_attributeadd proc~nuopc_checkcplcomponentmetadata NUOPC_CheckCplComponentMetadata proc~nuopc_checkcplcomponentmetadata->interface~esmf_attributeadd proc~nuopc_checkfield NUOPC_CheckField proc~nuopc_checkfield->interface~esmf_attributeadd proc~nuopc_checkgridcomponentmetadata NUOPC_CheckGridComponentMetadata proc~nuopc_checkgridcomponentmetadata->interface~esmf_attributeadd proc~nuopc_checkstate NUOPC_CheckState proc~nuopc_checkstate->interface~esmf_attributeadd proc~nuopc_cplcompattributeadd NUOPC_CplCompAttributeAdd proc~nuopc_cplcompattributeadd->interface~esmf_attributeadd proc~nuopc_cplcompattributeinit NUOPC_CplCompAttributeInit proc~nuopc_cplcompattributeinit->interface~esmf_attributeadd proc~nuopc_cplcompattributereset NUOPC_CplCompAttributeReset proc~nuopc_cplcompattributereset->interface~esmf_attributeadd proc~nuopc_gridcompattributeadd NUOPC_GridCompAttributeAdd proc~nuopc_gridcompattributeadd->interface~esmf_attributeadd proc~nuopc_gridcompattributeinit NUOPC_GridCompAttributeInit proc~nuopc_gridcompattributeinit->interface~esmf_attributeadd proc~nuopc_gridcompattributereset NUOPC_GridCompAttributeReset proc~nuopc_gridcompattributereset->interface~esmf_attributeadd proc~nuopc_initattributesfield NUOPC_InitAttributesField proc~nuopc_initattributesfield->interface~esmf_attributeadd proc~nuopc_initattributesstate NUOPC_InitAttributesState proc~nuopc_initattributesstate->interface~esmf_attributeadd proc~user_init~62 user_init proc~user_init~62->interface~esmf_attributeadd proc~user_init~68 user_init proc~user_init~68->interface~esmf_attributeadd proc~usercpl_init~3 usercpl_init proc~usercpl_init~3->interface~esmf_attributeadd proc~userm1_init userm1_init proc~userm1_init->interface~esmf_attributeadd proc~userm1_init~2 userm1_init proc~userm1_init~2->interface~esmf_attributeadd proc~userm1_init~4 userm1_init proc~userm1_init~4->interface~esmf_attributeadd proc~userm1_init~5 userm1_init proc~userm1_init~5->interface~esmf_attributeadd proc~userm1_init~6 userm1_init proc~userm1_init~6->interface~esmf_attributeadd proc~userm1_run userm1_run proc~userm1_run->interface~esmf_attributeadd proc~userm1_run~2 userm1_run proc~userm1_run~2->interface~esmf_attributeadd proc~userm1_run~4 userm1_run proc~userm1_run~4->interface~esmf_attributeadd program~esmf_arrayioutest ESMF_ArrayIOUTest program~esmf_arrayioutest->interface~esmf_attributeadd program~esmf_fieldbundleioutest ESMF_FieldBundleIOUTest program~esmf_fieldbundleioutest->interface~esmf_attributeadd program~esmf_fieldioutest ESMF_FieldIOUTest program~esmf_fieldioutest->interface~esmf_attributeadd program~esmf_scompex ESMF_SCompEx program~esmf_scompex->interface~esmf_attributeadd

Source Code

subroutine ESMF_AttributeAddAttPackStdFieldBundle(target, convention, purpose, attrList, nestConvention, nestPurpose, attpack, rc)
  type(ESMF_FieldBundle), intent(inout) :: target
  character(len=*), intent(in) :: convention
  character(len=*), intent(in) :: purpose
  character(len=*), dimension(:), intent(in), optional :: attrList
  character(len=*), intent(in), optional :: nestConvention
  character(len=*), intent(in), optional :: nestPurpose
  type(ESMF_AttPack), intent(inout), optional :: attpack
  integer, intent(out), optional :: rc

  integer :: localrc
  type(ESMF_Info) :: info
  type(ESMF_InfoDescribe) :: eidesc

  localrc = ESMF_FAILURE
  if (present(rc)) rc = ESMF_RC_NOT_IMPL

  info = eidesc%GetInfo(target, rc=localrc)
  if (ESMF_LogFoundError(localrc, ESMF_ERR_PASSTHRU, ESMF_CONTEXT, rcToReturn=rc)) return

  call ESMF_AttributeAddAttPackStdInfo(info, convention, purpose, attrList, nestConvention, nestPurpose, attpack, localrc)
  if (ESMF_LogFoundError(localrc, ESMF_ERR_PASSTHRU, ESMF_CONTEXT, rcToReturn=rc)) return

  if (present(rc)) rc = ESMF_SUCCESS
end subroutine ESMF_AttributeAddAttPackStdFieldBundle