mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-12-21 19:13:29 +01:00
Merge branch 'master' into features_emsl
This commit is contained in:
commit
d923ba2752
@ -5,5 +5,4 @@ Basis sets can be easily downloaded from the Basis Set Exchange Website
|
|||||||
https://www.basissetexchange.org , or using the command-line tool they
|
https://www.basissetexchange.org , or using the command-line tool they
|
||||||
provide.
|
provide.
|
||||||
|
|
||||||
|
In addition, you can use the qp_basis tool to install new basis sets.
|
||||||
|
|
@ -489,25 +489,6 @@ subroutine save_wavefunction
|
|||||||
endif
|
endif
|
||||||
end
|
end
|
||||||
|
|
||||||
subroutine save_wavefunction_qmcpack
|
|
||||||
implicit none
|
|
||||||
use bitmasks
|
|
||||||
BEGIN_DOC
|
|
||||||
! Save the wave function into the |EZFIO| file
|
|
||||||
END_DOC
|
|
||||||
|
|
||||||
! Trick to avoid re-reading the wave function every time N_det changes
|
|
||||||
! This Trick destroys determinants when saving for qmcpack
|
|
||||||
!read_wf = .False.
|
|
||||||
|
|
||||||
if (N_det < N_states) then
|
|
||||||
return
|
|
||||||
endif
|
|
||||||
if (mpi_master) then
|
|
||||||
call save_wavefunction_general(N_det,N_states,psi_det_sorted,size(psi_coef_sorted,1),psi_coef_sorted)
|
|
||||||
endif
|
|
||||||
end
|
|
||||||
|
|
||||||
|
|
||||||
subroutine save_wavefunction_unsorted
|
subroutine save_wavefunction_unsorted
|
||||||
implicit none
|
implicit none
|
||||||
|
Loading…
Reference in New Issue
Block a user