base_final_storage_frame Subroutine

  1. base_module.f90
  2. base
  3. base_final_storage_frame

public subroutine base_final_storage_frame(self)

Finalizer for the storage frame data type

Arguments

TypeIntentOptionalAttributesName
type(base_storage_frame) :: self

Contents

Source Code

base_final_storage_frame

Source Code

      subroutine base_final_storage_frame(self)
         !! author: David A. Minton 
         !! 
         !! Finalizer for the storage frame data type 
         implicit none
         type(base_storage_frame) :: self
   
         if (allocated(self%item)) deallocate(self%item)
   
         return
      end subroutine base_final_storage_frame