anchor.diff:          !    sys: system being studied.
   
           use parallel
  -        use loadbal_data
  -        use load_balancing
  +
           use annihilation, only: direct_annihilation
           use basis, only: basis_length, nbasis
           use bloom_handler, only: bloom_stats_t, accumulate_bloom_stats
  
positive.code:         integer :: nspawned, ndeath
          type(excit) :: connection
          real(p) :: hmatel
          integer :: dummy=0
          logical :: soft_exit
  
          real :: t1
  
negative.code:         call initial_fciqmc_status(sys)
          ! Initialise timer.
          call cpu_time(t1)
  
          do ireport = 1, nreport
  
              ! Zero report cycle quantities.
              call init_report_loop(bloom_stats)
  
              do icycle = 1, ncycles
  
                  call init_mc_cycle(nattempts, ndeath)
  
                  do idet = 1, tot_walkers ! loop over walkers/dets
  
                      cdet%f => walker_dets(:,idet)
  