9
1
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-06-23 04:52:05 +02:00

modified print_ci_vectors

This commit is contained in:
Emmanuel Giner LCT 2019-05-07 12:14:39 +02:00
parent 64b4d5d4d7
commit 6673fc40eb

View File

@ -27,7 +27,7 @@ subroutine routine
do i = 1, N_det
print *, 'Determinant ', i
call debug_det(psi_det(1,1,i),N_int)
print '(4E20.12,X)', dabs(psi_coef(i,k), k=1,N_states)
print '(4E20.12,X)', (psi_coef(i,k), k=1,N_states)
print *, ''
print *, ''
enddo