f_esmf_configdestroy Subroutine

subroutine f_esmf_configdestroy(config, rc)

Arguments

Type IntentOptional Attributes Name
type(ESMF_Config) :: config
integer, intent(out) :: rc

Source Code

   subroutine f_esmf_configdestroy(config, rc)
     use ESMF_UtilTypesMod    ! ESMF base class
     use ESMF_BaseMod    ! ESMF base class
     use ESMF_ConfigMod

     implicit none

     type(ESMF_Config) :: config
     integer, intent(out) :: rc     

     ! Initialize return code; assume routine not implemented
     rc = ESMF_RC_NOT_IMPL

     call ESMF_ConfigDestroy(config, rc=rc)

   end subroutine f_esmf_configdestroy