ESMF_XGridGeomBaseDestroy Subroutine

public subroutine ESMF_XGridGeomBaseDestroy(gridbase, rc)

Arguments

Type IntentOptional Attributes Name
type(ESMF_XGridGeomBase) :: gridbase
integer, intent(out), optional :: rc

Calls

proc~~esmf_xgridgeombasedestroy~~CallsGraph proc~esmf_xgridgeombasedestroy ESMF_XGridGeomBaseDestroy proc~esmf_imerr ESMF_IMErr proc~esmf_xgridgeombasedestroy->proc~esmf_imerr proc~esmf_xgridgeombasegetinit ESMF_XGridGeomBaseGetInit proc~esmf_xgridgeombasedestroy->proc~esmf_xgridgeombasegetinit proc~esmf_initcheckdeep ESMF_InitCheckDeep proc~esmf_imerr->proc~esmf_initcheckdeep proc~esmf_logfounderror ESMF_LogFoundError proc~esmf_imerr->proc~esmf_logfounderror 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 c_esmc_loggeterrormsg c_esmc_loggeterrormsg proc~esmf_logrc2msg->c_esmc_loggeterrormsg c_esmc_vmwtime c_esmc_vmwtime proc~esmf_logwrite->c_esmc_vmwtime proc~esmf_logclose ESMF_LogClose proc~esmf_logwrite->proc~esmf_logclose proc~esmf_logflush ESMF_LogFlush proc~esmf_logwrite->proc~esmf_logflush proc~esmf_logopenfile ESMF_LogOpenFile proc~esmf_logwrite->proc~esmf_logopenfile proc~esmf_utiliounitflush ESMF_UtilIOUnitFlush proc~esmf_logwrite->proc~esmf_utiliounitflush proc~esmf_utilstring2array ESMF_UtilString2Array proc~esmf_logwrite->proc~esmf_utilstring2array

Called by

proc~~esmf_xgridgeombasedestroy~~CalledByGraph proc~esmf_xgridgeombasedestroy ESMF_XGridGeomBaseDestroy proc~esmf_xgriddestroy ESMF_XGridDestroy proc~esmf_xgriddestroy->proc~esmf_xgridgeombasedestroy proc~esmf_fielddestructgeom ESMF_FieldDestructGeom proc~esmf_fielddestructgeom->proc~esmf_xgriddestroy proc~f_esmf_xgriddestroy f_esmf_xgriddestroy proc~f_esmf_xgriddestroy->proc~esmf_xgriddestroy proc~flux_exchange flux_exchange proc~flux_exchange->proc~esmf_xgriddestroy proc~flux_exchange_sph flux_exchange_sph proc~flux_exchange_sph->proc~esmf_xgriddestroy proc~flux_exchange_sph_mesh flux_exchange_sph_mesh proc~flux_exchange_sph_mesh->proc~esmf_xgriddestroy proc~flux_exchange_sph~2 flux_exchange_sph proc~flux_exchange_sph~2->proc~esmf_xgriddestroy proc~flux_exchange~2 flux_exchange proc~flux_exchange~2->proc~esmf_xgriddestroy proc~test3 test3 proc~test3->proc~esmf_xgriddestroy proc~test4 test4 proc~test4->proc~esmf_xgriddestroy proc~test5 test5 proc~test5->proc~esmf_xgriddestroy proc~test6 test6 proc~test6->proc~esmf_xgriddestroy proc~test8 test8 proc~test8->proc~esmf_xgriddestroy proc~test_cart_bilinear_xgrid test_cart_bilinear_xgrid proc~test_cart_bilinear_xgrid->proc~esmf_xgriddestroy proc~test_regrid2xg test_regrid2xg proc~test_regrid2xg->proc~esmf_xgriddestroy proc~test_regrid2xg_clip test_regrid2xg_clip proc~test_regrid2xg_clip->proc~esmf_xgriddestroy proc~test_regrid2xg_contain test_regrid2xg_contain proc~test_regrid2xg_contain->proc~esmf_xgriddestroy proc~test_regrid2xg_half test_regrid2xg_half proc~test_regrid2xg_half->proc~esmf_xgriddestroy proc~test_regrid2xg_online test_regrid2xg_online proc~test_regrid2xg_online->proc~esmf_xgriddestroy proc~test_regrid2xgsph test_regrid2xgSph proc~test_regrid2xgsph->proc~esmf_xgriddestroy proc~test_regrid2xgsph~2 test_regrid2xgSph proc~test_regrid2xgsph~2->proc~esmf_xgriddestroy proc~test_regridxg test_regridxg proc~test_regridxg->proc~esmf_xgriddestroy proc~test_regridxg_const test_regridxg_const proc~test_regridxg_const->proc~esmf_xgriddestroy proc~test_side_and_elem_info test_side_and_elem_info proc~test_side_and_elem_info->proc~esmf_xgriddestroy proc~test_sph_bilinear_xgrid test_sph_bilinear_xgrid proc~test_sph_bilinear_xgrid->proc~esmf_xgriddestroy proc~user_final~7 user_final proc~user_final~7->proc~esmf_xgriddestroy proc~user_final~9 user_final proc~user_final~9->proc~esmf_xgriddestroy program~esmf_xgridex ESMF_XGridEx program~esmf_xgridex->proc~esmf_xgriddestroy program~esmf_xgridsparsematex ESMF_XGridSparseMatEx program~esmf_xgridsparsematex->proc~esmf_xgriddestroy program~esmf_xgridutest ESMF_XGridUTest program~esmf_xgridutest->proc~esmf_xgriddestroy

Source Code

      subroutine ESMF_XGridGeomBaseDestroy(gridbase, rc)
!
! !ARGUMENTS:
      type(ESMF_XGridGeomBase) :: gridbase
      integer, intent(out), optional :: rc
!
! !DESCRIPTION:
!   Destroys an {\tt ESMF\_GridBase} object. This call does not destroy wrapped
!   Grid, or other Grid objects.
!
!     The arguments are:
!     \begin{description}
!     \item[gridbase]
!          {\tt ESMF\_XGridGeomBase} to be destroyed.
!     \item[{[rc]}]
!          Return code; equals {\tt ESMF\_SUCCESS} if there are no errors.
!     \end{description}
!
!EOPI

    ! Initialize return code; assume failure until success is certain
    if (present(rc)) rc = ESMF_RC_NOT_IMPL

    ! Check init status of arguments
    ESMF_INIT_CHECK_DEEP(ESMF_XGridGeomBaseGetInit, gridbase, rc)

    ! do _not_ deallocate/nullify GeomBase memory here because ESMF
    ! garbage collection will handle cleaning up GeomBase allocations

    ! Set init code
    ESMF_INIT_SET_DELETED(gridbase)

    ! Return successfully
    if (present(rc)) rc = ESMF_SUCCESS

 end subroutine ESMF_XGridGeomBaseDestroy