anchor.diff:          character(36) :: uuid_restart
   
           logical :: soft_exit, write_restart_shift, error
  -        logical :: determ_parent, determ_child
  +        logical :: determ_parent
   
           real :: t1, t2
   
  
positive.code:         type(json_out_t) :: js
          type(qmc_in_t) :: qmc_in_loc
  
          integer :: idet, ireport, icycle, iparticle, ideterm, ierr, ispace
          integer :: iter, semi_stoch_iter
          integer(int_64) :: nattempts
          real(dp), allocatable :: nparticles_old(:)
  
          integer(i0) :: f_child(sys%basis%string_len)
          integer(int_p) :: nspawned, nspawned_im, scratch
          integer(int_p) ::  ndeath, ndeath_im
          integer :: nattempts_current_det, nspawn_events
          type(excit_t) :: connection
  
negative.code: 
                          nattempts_current_det = decide_nattempts(rng, real_population(ispace))
  
                          call do_fciqmc_spawning_attempt(rng, qs%spawn_store%spawn, bloom_stats, sys, qs, nattempts_current_det, &
                                                          cdet, determ, determ_parent, qs%psip_list%pops(ispace, idet), &
                                                          sys%read_in%comp .and. modulo(ispace,2)==0, &
                                                          ispace, nspawned, nspawned_im, logging_info)
  
                          ! Clone or die.
  
                      end do
                      if (.not. determ_parent) then
                          call stochastic_death(rng, sys, qs, cdet%fock_sum, qs%psip_list%dat(1,idet), proj_energy_old, &
                                          qs%shift(1), logging_info, qs%psip_list%pops(1,idet), &
                                          qs%psip_list%nparticles(1), ndeath)
                          if (sys%read_in%comp) then
                              call stochastic_death(rng, sys, qs, cdet%fock_sum, qs%psip_list%dat(1,idet), proj_energy_old, &
                                              qs%shift(1), logging_info, qs%psip_list%pops(2,idet), &
                                              qs%psip_list%nparticles(2), ndeath)
                          end if
                      end if
                  end do
  
                  associate(pl=>qs%psip_list, spawn=>qs%spawn_store%spawn, spawn_recv=>qs%spawn_store%spawn_recv)
  