anchor.diff:        if(i <= N_det_selectors) then
           preinteresting(0) += 1
           preinteresting(preinteresting(0)) = i
  -        preinteresting_det(:,:,preinteresting(0)) = psi_det_sorted(:,:,i)
  +        do j=1,N_int
  +          preinteresting_det(j,1,preinteresting(0)) = psi_det_sorted(j,1,i)
  +          preinteresting_det(j,2,preinteresting(0)) = psi_det_sorted(j,2,i)
  +        enddo
         else if(nt <= 2) then
           prefullinteresting(0) += 1
           prefullinteresting(prefullinteresting(0)) = i
  
positive.code:             h2 = hole_list(i2,s2)
              call apply_hole(pmask, s2,h2, mask, ok, N_int)
              banned = .false.
              bannedOrb(1:mo_tot_num, 1:2) = .true.
              do s3=1,2
                do i=1,N_particles(s3)
                  bannedOrb(particle_list(i,s3), s3) = .false.
  
negative.code:       if(nt == 4) call past_d2(banned, p, sp)
        if(nt == 3) call past_d1(bannedOrb, p)
      else
        if(interesting(i) /= i_gen) then
          continue
        else
  !       bandon = .true.
          if(sp == 3) then
            do j=1,mo_tot_num
              do k=1,mo_tot_num
                banned(j,k,2) = banned(k,j,1)
              enddo
            enddo
          else
            do k=1,mo_tot_num
            do l=k+1,mo_tot_num
  