anchor.diff:      module procedure::realloc2DDArr
       module procedure::reallocStr
       module procedure::realloc1DHtr1DIArr
  +    module procedure::realloc1DHtr2DDArr
     end interface
     public::reallocArr
     
  
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:   !> 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
  