open Util

let make ?guess simulation =
  if (Simulation.electrons simulation).Electrons.multiplicity = 1 then
    RHF.make ?guess simulation
  else
    invalid_arg "UHF or ROHF not implemented"


let to_string = HartreeFock_type.to_string