mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-11-14 01:53:49 +01:00
modified print_ci_vectors
This commit is contained in:
parent
64b4d5d4d7
commit
6673fc40eb
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user