anchor.diff:    call get_command_argument(1, sa)
     read(sa,*) N
   
  +  !if (N < 100) call eMsg('Please use size >= 100')
  +
     call get_command_argument(2, sa)
     read(sa,*) nIterations
   
  
positive.code:   tree = KdTree(a2D)
  
    ia = search%nearest(tree, a2D, [0.d0, 0.d0])
    call search%kNearest(tree, a2D, [0.d0, 0.d0], 10, da)
  
    c1D = a1D**2.d0
    c1D = c1D + b1D**2.d0
  
negative.code:   ! Sorting routines
    use m_Sort
    use m_Select
    use m_Searching
    use m_maths
    use m_KdTree
  
  