anchor.diff:      class(tree) :: self
       integer, allocatable, intent(out) :: labeling(:)
   
  -    integer, allocatable :: clabeling(:), freeIndices(:), configList
  -    integer              :: ik, cIdx, iIdx, jIdx, ilc, jlc, nEmp, status
  +    integer, allocatable :: clabeling(:), freeIndices(:)
  +    integer              :: ik, cIdx, iIdx, ilc, jlc, nEmp, status
   
       allocate(labeling(self%n),STAT=status)
       if(status/=0) stop "Allocation failed in generateColoringFromLocation: labeling."
  
positive.code:     !!<local name="lastone">The index of the last '1' in the binary array.</local>
      !!<local name="d">Keeps track of how deep in the tree we are.</local>
      integer, allocatable :: new_labeling(:)
      integer :: site_i, nzeros, numones, lastone, nLeft, d, status
      integer :: ndigits(1), minl(1)
  
      d = self%depth()
      ! The labeling needs to have only '1's for the current color, have
  
negative.code:     !!<local name="min_stab_a">Temporary array for arrow stabilizers.</local>
      !!<local name="d">Keeps track of how deep in the tree we are.</local>
      integer :: rotatedlabel(size(label))
      integer :: perm_i, perm_j, stab_size, new_loc, d
  
      d = self%depth()
      ! Make sure that the number of stabilizers is initially 0
  