anchor.diff:  PROGRAM driver
  -use num_types 
  +use num_types
   use derivative_structure_generator
   use io_utils
   implicit none
  
positive.code: integer k ! Number of colors/label types (i.e., binary, ternary, etc.)
  integer LatDim ! 2D or 3D parent lattice?
  integer nD ! Number of sites in the basis (i.e., number of points in the multilattice)
  real(dp), pointer :: d(:,:) => null()
  character(1) :: latTyp
  real(dp)  eps
  real(dp) :: parLV(3,3)
  
negative.code: logical fullLab,concCheck
  logical :: origCrossOutAlgorithm = .false.
  integer, pointer :: cRange(:,:)
  integer, allocatable :: label(:,:)
  integer, allocatable :: digit(:)
  integer, allocatable :: equivalencies(:)
  
  if (iargc()>=2) then
      call getarg(2,arg2)
  