sig
  type t = Gg.size2
  val dim : int
  val v : float -> float -> Gg.size2
  val w : Gg.size2 -> float
  val h : Gg.size2 -> float
  val zero : Gg.size2
  val unit : Gg.size2
end