destroy_all Subroutine

public subroutine destroy_all(info)

Arguments

Type IntentOptional Attributes Name
type(ESMF_Info), intent(inout), allocatable :: info(:)

Calls

proc~~destroy_all~~CallsGraph proc~destroy_all destroy_all ESMF_InfoDestroy ESMF_InfoDestroy proc~destroy_all->ESMF_InfoDestroy

Called by

proc~~destroy_all~~CalledByGraph proc~destroy_all destroy_all proc~deallocate_destroy deallocate_destroy proc~deallocate_destroy->proc~destroy_all proc~safe_dealloc safe_dealloc proc~safe_dealloc->proc~deallocate_destroy proc~test_get_num_levels test_get_num_levels proc~test_get_num_levels->proc~safe_dealloc proc~test_get_ungridded_dims test_get_ungridded_dims proc~test_get_ungridded_dims->proc~safe_dealloc proc~test_get_vertical_dim_spec_names test_get_vertical_dim_spec_names proc~test_get_vertical_dim_spec_names->proc~safe_dealloc

Source Code

   subroutine destroy_all(info)
      type(ESMF_Info), allocatable, intent(inout) :: info(:)
      integer :: i

      do i = 1, size(info)
         call ESMF_InfoDestroy(info(i))
      end do

   end subroutine destroy_all