solve_hf.f90 8.27 KB