mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-06-24 06:02:26 +02:00
22 lines
277 B
Fortran
22 lines
277 B
Fortran
program print_e_scf
|
|
call run
|
|
end
|
|
|
|
subroutine run
|
|
|
|
use bitmasks
|
|
implicit none
|
|
|
|
!if (is_complex) then
|
|
! call print_debug_scf_complex
|
|
!endif
|
|
|
|
print*,'hf 1e,2e,total energy'
|
|
print*,hf_one_electron_energy
|
|
print*,hf_two_electron_energy
|
|
print*,hf_energy
|
|
|
|
end
|
|
|
|
|