anchor.diff:                                          nspawned = 0_int_p
                                       end if
                                   else
  -                                    call create_spawned_particle_ptr(sys%basis, qs%ref, cdet, connection, nspawned, ispace, &
  +                                    call create_spawned_particle_ptr(sys%basis, qs%ref, cdet, connection, nspawned, target_space, &
                                                                            qs%spawn_store%spawn)
                                   end if
                                   if (abs(nspawned) >= bloom_stats%nparticles_encoded) &
  
positive.code:                             end if
                              if (nspawned_im /= 0_int_p) then
                                  if (imag) then
                                      target_space = ispace - 1
                                  else
                                      target_space = ispace + 1
                                  end if
  
negative.code:         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, target_space
          type(excit_t) :: connection
  