Make.1-B
type t
val width : t -> float
val height : t -> float
val set_pos : Mlpost.Signature.point -> t -> t