9
1
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-06-16 09:35:19 +02:00

added condition in lccsd
Some checks failed
continuous-integration/drone/push Build is failing

This commit is contained in:
eginer 2023-08-09 16:59:47 +02:00
parent 0440def363
commit 1a2632c280

View File

@ -31,7 +31,9 @@
print*,'ecorr = ',ecorr
Dress_jj(1) = 0.d0
do i = 2, N_det
Dress_jj(i) = ecorr
if(ecorr + H_jj(i) .gt. H_jj(1))then
Dress_jj(i) = ecorr
endif
enddo
eafter = lccsd_energies(1)
converged = (dabs(eafter - ebefore).lt.thresh)