anchor.diff:    subroutine test_sort_items_with_id
   
       use packdat, only : loadData, nTItems, nItems, iLength, &
  -         iWidth, iId, nContainers, setCurrContainer, cLength, &
  -         cWidth, cId, reset
  -
  -    use items, only : ItemType
  +         iWidth, iId, reset, sortItems
  +
  +    use items, only : ItemType, toVector
   
       use containers, only : Container, emptyCContainer
   
  
positive.code:     
      filename = "data.txt"
  
      ! Test 1
      
      qIt = (/10, 0, 0, 0/)
      
      call createFiles(it, nit, cont, ncont, qIt)
      
      call loadData(filename)
  
    end subroutine test_sort_items_with_id
  
  
  
negative.code:     
      integer :: qIt(4)
  
      real(8), allocatable :: x(:)
  
      type(ItemType) :: it(nit)
  
      type(Container) :: cont(1)
      
      call reset()
  
  