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