mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-11-14 18:13:51 +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
|
do i = 1, N_det
|
||||||
print *, 'Determinant ', i
|
print *, 'Determinant ', i
|
||||||
call debug_det(psi_det(1,1,i),N_int)
|
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 *, ''
|
||||||
print *, ''
|
print *, ''
|
||||||
enddo
|
enddo
|
||||||
|
Loading…
Reference in New Issue
Block a user