4
1
mirror of https://github.com/pfloos/quack synced 2024-06-02 11:25:28 +02:00

fix bug in GF3

This commit is contained in:
Pierre-Francois Loos 2019-04-29 09:54:36 +02:00
parent b93ee21573
commit 634e0ecf09
2 changed files with 5 additions and 5 deletions

View File

@ -7,7 +7,7 @@
# CIS TDHF ADC
F F F
# GF2 GF3
T F
T T
# G0W0 evGW qsGW
T F F
# MCMP2

View File

@ -453,6 +453,10 @@
Conv = maxval(abs(eGF3 - eOld))
! Print results
call print_GF3(nBas,nO,nSCF,Conv,e0,Z,eGF3)
! DIIS extrapolation
n_diis = min(n_diis+1,max_diis)
@ -464,10 +468,6 @@
eOld(:) = eGF3(:)
! Print results
call print_GF3(nBas,nO,nSCF,Conv,e0,Z,eGF3)
! Increment
nSCF = nSCF + 1