10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-11-04 05:03:54 +01:00

Corrected bug

This commit is contained in:
Anthony Scemama 2016-10-09 23:00:14 +02:00
parent 617809538e
commit 4e829fd4b8

View File

@ -432,8 +432,8 @@ subroutine davidson_collector(zmq_to_qp_run_socket, zmq_socket_pull , v0, s0, LD
do j=1,N_states_diag do j=1,N_states_diag
!DIR$ IVDEP !DIR$ IVDEP
do i=1,dav_size do i=1,dav_size
vt(i,j) = v0t(j,i) v0(i,j) = v0t(j,i)
st(i,j) = s0t(j,i) s0(i,j) = s0t(j,i)
enddo enddo
enddo enddo