f_esmf_scicompdestroy Subroutine

subroutine f_esmf_scicompdestroy(comp, rc)

Arguments

Type IntentOptional Attributes Name
type(ESMF_SciComp) :: comp
integer :: rc

Source Code

subroutine f_esmf_scicompdestroy(comp, rc)
  use ESMF_UtilTypesMod      ! ESMF utility types
  use ESMF_BaseMod           ! ESMF base class
  use ESMF_CompMod
  use ESMF_SciCompMod
  use ESMF_InitMacrosMod
  
  implicit none

  type(ESMF_SciComp)  :: comp
  integer             :: rc              

  call ESMF_SciCompDestroy(comp, rc=rc)

end subroutine f_esmf_scicompdestroy