sig
  type t = AGeom.point3d
  val of_point2d : ?z:float -> AGeom.point2d -> AGeom.Point3d.t
  val distance : AGeom.Point3d.t -> AGeom.Point3d.t -> float
  val midpoint : AGeom.Point3d.t -> AGeom.Point3d.t -> AGeom.Point3d.t
  val rand : AGeom.Point3d.t -> AGeom.Point3d.t -> AGeom.Point3d.t
  val srand :
    Random.State.t -> AGeom.Point3d.t -> AGeom.Point3d.t -> AGeom.Point3d.t
  val to_string : AGeom.Point3d.t -> string
  val of_string : string -> AGeom.Point3d.t
  module Infix :
    sig
      val ( -|- ) : AGeom.Point3d.t -> AGeom.Point3d.t -> AGeom.Point3d.t
      val ( <=> ) : AGeom.Point3d.t -> AGeom.Point3d.t -> float
      val ( ?. ) : AGeom.Point3d.t -> AGeom.Point3d.t -> AGeom.Point3d.t
    end
end