(** Guess for Hartree-Fock calculations. *) type guess = | Hcore of Lacaml.D.Mat.t | Huckel of Lacaml.D.Mat.t type t = guess val make : guess:[ `Hcore | `Huckel ] -> Simulation.t -> t