sig
  module P : POS
  type t
  type repr = P.repr list
  val ctr : t -> Point.t
  val height : t -> Num.t
  val width : t -> Num.t
  val shift : Point.t -> repr -> repr
  val v : t -> repr
  val horizontal :
    ?dx:Mlpost.Num.t -> ?pos:Mlpost.Command.position -> P.t list -> t
  val vertical :
    ?dy:Mlpost.Num.t -> ?pos:Mlpost.Command.position -> P.t list -> t
end