type nucleus =
  {
    element: Element.t ;
    coord: Angstrom.t;
  }

type xyz_file =
  {
    number_of_atoms : int;
    file_title : string;
    nuclei : nucleus list;
  }