anchor.diff:          ! initial walker.
   
           use errors, only: stop_all
  -        use parallel, only: nprocs, parent
  +        use hashing, only: murmurhash_bit_string
  +        use parallel, only: iproc, nprocs, parent
           use utils, only: int_fmt
   
           use basis, only: basis_length
  
positive.code:             case(hub_real)
                  H00 = slater_condon0_hub_real(f0)
              end select
          end if
  
          if (parent) then
  
negative.code:         use system, only: nel, nalpha, nbeta, system_type, hub_real, hub_k
  
          integer :: ierr
          integer :: i, iproc_ref
          integer :: step
  
          if (nprocs > 1) call stop_all('init_fciqmc','Not (yet!) a parallel algorithm.')
  