mirror of
https://github.com/LCPQ/quantum_package
synced 2025-04-16 05:29:35 +02:00
Fixed truncate_wf_spin
This commit is contained in:
parent
c46f4c5014
commit
5906cb5ac3
@ -101,7 +101,7 @@ subroutine run
|
|||||||
print *, 'Energy', E
|
print *, 'Energy', E
|
||||||
exit
|
exit
|
||||||
enddo
|
enddo
|
||||||
call wf_of_psi_bilinear_matrix()
|
call wf_of_psi_bilinear_matrix(.True.)
|
||||||
call save_wavefunction
|
call save_wavefunction
|
||||||
|
|
||||||
deallocate (iorder, norm_sort)
|
deallocate (iorder, norm_sort)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user