sig
  type t
  type repr
  val ctr : Mlpost.Pos.POS.t -> Mlpost.Point.t
  val height : Mlpost.Pos.POS.t -> Mlpost.Num.t
  val width : Mlpost.Pos.POS.t -> Mlpost.Num.t
  val shift : Mlpost.Point.t -> Mlpost.Pos.POS.repr -> Mlpost.Pos.POS.repr
  val center : Mlpost.Point.t -> Mlpost.Pos.POS.t -> Mlpost.Pos.POS.repr
  val v : Mlpost.Pos.POS.t -> Mlpost.Pos.POS.repr
end