anchor.diff:    !> destructor of typeHtr1DIArr
     elemental subroutine purgeHtr1DIArr(this)
       type(typeHtr1DIArr),intent(inout)::this !< this 1D integer allocatable array
  +    
  +    if(allocated(this%dat)) deallocate(this%dat)
  +  end subroutine
  +  
  +  !> destructor of typeHtr2DDArr
  +  elemental subroutine purgeHtr2DDArr(this)
  +    type(typeHtr2DDArr),intent(inout)::this !< this 2D double allocatable array
       
       if(allocated(this%dat)) deallocate(this%dat)
     end subroutine
  
positive.code:     end if
    end subroutine
    
    !> extend the integer allocatable array arr by l or by 1
    pure subroutine extendIArr(arr,l)
      integer,allocatable,intent(inout)::arr(:) !< integer array to be extended
  
negative.code:     integer,allocatable::dat(:) !< 1D integer allocatable array
    contains
      !FIXME:final::purgeHtr1DIArr
    end type
    
    !> heterogeneous 2D double allocatable array
    type,public::typeHtr2DDArr
      double precision,allocatable::dat(:,:) !< 2D double allocatable array
    contains
      !FIXME:final::purgeHtr2DDArr
    end type
    
    !> general data linked list
  