module Infix:sig
..end
val (-|-) : IntAGeom.Point2d.t -> IntAGeom.Point2d.t -> IntAGeom.Point2d.t
midpoint
val (<=>) : IntAGeom.Point2d.t -> IntAGeom.Point2d.t -> int
sq_dist
val ? : IntAGeom.Point2d.t -> IntAGeom.Point2d.t -> IntAGeom.Point2d.t
rand