9
1
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-12-22 19:43:32 +01:00

Add explicit dependence of psi_coef to psi_det for safety

This commit is contained in:
Anthony Scemama 2024-10-16 14:57:07 +02:00
parent f847686387
commit 6fed07bde6

View File

@ -187,6 +187,10 @@ BEGIN_PROVIDER [ double precision, psi_coef, (psi_det_size,N_states) ]
logical :: exists logical :: exists
character*(64) :: label character*(64) :: label
! Make psi_coef depend on psi_det explicitly to detect potential problems
! if psi_det changes and psi_coef is kept constant
PROVIDE psi_det
PROVIDE read_wf N_det mo_label ezfio_filename PROVIDE read_wf N_det mo_label ezfio_filename
psi_coef = 0.d0 psi_coef = 0.d0
do i=1,min(N_states,psi_det_size) do i=1,min(N_states,psi_det_size)