mirror of
https://github.com/pfloos/quack
synced 2024-11-03 12:43:48 +01:00
more cleanup
This commit is contained in:
parent
49fedf3307
commit
54adecd2a5
@ -64,6 +64,4 @@ subroutine print_UG0T0(nBas,nO,eHF,ENuc,EUHF,SigT,Z,eGT,EcGM,EcRPA)
|
||||
write(*,*)'-------------------------------------------------------------------------------'
|
||||
write(*,*)
|
||||
|
||||
end subroutine print_UG0T0
|
||||
|
||||
|
||||
end subroutine
|
||||
|
@ -74,6 +74,4 @@ subroutine print_evUGT(nBas,nO,nSCF,Conv,eHF,ENuc,EUHF,SigT,Z,eGT,EcGM,EcRPA)
|
||||
write(*,*)'-------------------------------------------------------------------------------'
|
||||
write(*,*)
|
||||
|
||||
end subroutine print_evUGT
|
||||
|
||||
|
||||
end subroutine
|
||||
|
@ -79,6 +79,4 @@ write(*,'(2X,A50,F15.6,A3)') 'ppRPA@qsGT correlation energy:',sum(EcRPA(:)),' au
|
||||
write(*,*)'-------------------------------------------'
|
||||
write(*,*)
|
||||
|
||||
end subroutine print_qsUGT
|
||||
|
||||
|
||||
end subroutine
|
||||
|
Loading…
Reference in New Issue
Block a user