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