anchor.diff:          !    restart_in: input options for HDF5 restart files.
           !    sparse_hamil: true if using a sparse matrix for the Hamiltonian.
   
  +        use csr, only: csrp_t
  +
           use energy_evaluation, only: update_shift
           use parallel, only: parent, iproc
  +        use fciqmc_data, only: write_fciqmc_report_header, write_fciqmc_report
           use qmc_data, only: qmc_in_t, restart_in_t, reference_t, particle_t, qmc_state_t
           use qmc_common, only: dump_restart_file_wrapper
           use spawn_data, only: spawn_t
  
positive.code:         !    pop: main population on each site before (input) and after (output)
          !         annihilation.
   
          type(spawn_t), intent(in)  :: spawn
          integer(int_p), intent(inout) :: pop(:,:)
  
  
negative.code: use const
  use dSFMT_interface
  use errors
  
  implicit none
  
  