mirror of
https://github.com/pfloos/quack
synced 2025-05-06 15:14:55 +02:00
bug fix
This commit is contained in:
parent
8502661ccf
commit
a5e799ca98
@ -84,10 +84,9 @@ subroutine complex_cRG0F2(dotest,dophBSE,doppBSE,TDA,dBSE,dTDA,singlet,triplet,l
|
||||
|
||||
write(*,*) ' *** Quasiparticle energies obtained by root search *** '
|
||||
write(*,*)
|
||||
call complex_cRGF2_self_energy_diag(eta,nOrb,nC,nO,nV,nR,Re_eHF,Im_eHF,ERI,Re_SigC,Im_SigC,Re_Z,Im_Z)
|
||||
call complex_cRGF2_QP_graph(eta,nOrb,nC,nO,nV,nR,Re_eHF,Im_eHF,ERI,Re_eGFlin,Im_eGFlin,&
|
||||
Re_eHF,Im_eHF,Re_eGF,Im_eGF,Re_Z,Im_Z)
|
||||
|
||||
call complex_cRGF2_self_energy_diag(eta,nOrb,nC,nO,nV,nR,Re_eGF,Im_eGF,ERI,Re_SigC,Im_SigC,Re_Z,Im_Z)
|
||||
end if
|
||||
|
||||
! Print results
|
||||
|
Loading…
x
Reference in New Issue
Block a user