naive hartree-fock code