mirror of
https://github.com/LCPQ/quantum_package
synced 2024-12-23 04:43:50 +01:00
Fixed CSC
This commit is contained in:
commit
3b2d23c745
@ -941,7 +941,6 @@ END_PROVIDER
|
|||||||
psi_det_alpha_unique, idx0, psi_det_alpha_unique(1,i), N_int, &
|
psi_det_alpha_unique, idx0, psi_det_alpha_unique(1,i), N_int, &
|
||||||
N_det_alpha_unique, s, j)
|
N_det_alpha_unique, s, j)
|
||||||
singles_alpha_csc_idx(i+1) = int(j,8)
|
singles_alpha_csc_idx(i+1) = int(j,8)
|
||||||
enddo
|
|
||||||
!$OMP END DO
|
!$OMP END DO
|
||||||
deallocate(s)
|
deallocate(s)
|
||||||
!$OMP END PARALLEL
|
!$OMP END PARALLEL
|
||||||
|
Loading…
Reference in New Issue
Block a user