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