anchor.diff:  
     useReduction = .true.
   
  +  ! Check arguments for Heuristic Mode
  +  useHeuristic = .true.
  +
  +  if ( COMMAND_ARGUMENT_COUNT() .EQ. 1 ) then
  +
  +     CALL GET_COMMAND_ARGUMENT(1, strtmp)
  +
  +     read(strtmp, *) useHeuristic
  +
  +  end if
  +  
     ! Start timing
   
     call SYSTEM_CLOCK(tini, ticks_ps)
  
positive.code:   implicit none
  
    ! LOCAL SCALARS
    logical      :: hasAppended, useReduction
    integer      :: allocerr, i, j, it, container, numberOfSolutions, &
         lastContainer, nAllocTrials, nCntnr
    ! Timing variables
  
negative.code:      write(*,*) 'Solving allocation problem'
       write(*,*)
  
       if ( useHeuristic ) call drawSol(x, filename, .false.)
          
       
       ! If in 'Heuristic Mode' do not go to solver
       do while ( .not. useHeuristic )
  
          ! Optimize
  
  