10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-06-26 15:12:14 +02:00

Removed memory bottleneck

This commit is contained in:
Anthony Scemama 2017-07-14 21:49:32 +00:00
parent 5906cb5ac3
commit 24725e60e6

View File

@ -1217,7 +1217,6 @@ subroutine wf_of_psi_bilinear_matrix(truncate)
integer :: idx
integer, external :: get_index_in_psi_det_sorted_bit
double precision :: norm(N_states)
PROVIDE psi_bilinear_matrix
do k=1,N_det
i = psi_bilinear_matrix_rows(k)