sig type t = { w : int; h : int; } val zero : Wlc.Geometry.Size.t val min : Wlc.Geometry.Size.t -> Wlc.Geometry.Size.t -> Wlc.Geometry.Size.t val max : Wlc.Geometry.Size.t -> Wlc.Geometry.Size.t -> Wlc.Geometry.Size.t end