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