type t = {
  x : float ;
  y : float ;
  z : float ;
}


external make : Point.t -> t = "%identity"