sig
type t = { x : int; y : int; }
val zero : Wlc.Geometry.Origin.t
val min :
Wlc.Geometry.Origin.t -> Wlc.Geometry.Origin.t -> Wlc.Geometry.Origin.t
val max :
Wlc.Geometry.Origin.t -> Wlc.Geometry.Origin.t -> Wlc.Geometry.Origin.t
end