10
1
mirror of https://github.com/pfloos/quack synced 2024-12-22 12:23:42 +01:00

comment use

This commit is contained in:
Pierre-Francois Loos 2024-11-28 09:40:14 +01:00
parent 2bdd48be2e
commit 6ff3fc2905
3 changed files with 5 additions and 5 deletions

View File

@ -32,8 +32,8 @@ subroutine ppLR_C(ispin,nOrb,nC,nO,nV,nR,nVV,lambda,e,ERI,Cpp)
! Define the chemical potential ! Define the chemical potential
! eF = e(nO) + e(nO+1) eF = e(nO) + e(nO+1)
eF = 0d0 ! eF = 0d0
! Build C matrix for the singlet manifold ! Build C matrix for the singlet manifold

View File

@ -30,8 +30,8 @@ subroutine ppLR_D(ispin,nOrb,nC,nO,nV,nR,nOO,lambda,e,ERI,Dpp)
! Define the chemical potential ! Define the chemical potential
! eF = e(nO) + e(nO+1) eF = e(nO) + e(nO+1)
eF = 0d0 ! eF = 0d0
! Build the D matrix for the singlet manifold ! Build the D matrix for the singlet manifold

View File

@ -1,6 +1,6 @@
subroutine phRRPA(dotest,TDA,doACFDT,exchange_kernel,singlet,triplet,nBas,nC,nO,nV,nR,nS,ENuc,ERHF,ERI,dipole_int,eHF) subroutine phRRPA(dotest,TDA,doACFDT,exchange_kernel,singlet,triplet,nBas,nC,nO,nV,nR,nS,ENuc,ERHF,ERI,dipole_int,eHF)
use cu_quack_module ! use cu_quack_module
! Perform a direct random phase approximation calculation ! Perform a direct random phase approximation calculation