sig type t val width : Mlpost.Signature.Boxlike.t -> float val height : Mlpost.Signature.Boxlike.t -> float val set_pos : Mlpost.Signature.point -> Mlpost.Signature.Boxlike.t -> Mlpost.Signature.Boxlike.t end