sig
  val bp : float -> Mlpost.Num.scale
  val pt : float -> Mlpost.Num.scale
  val cm : float -> Mlpost.Num.scale
  val mm : float -> Mlpost.Num.scale
  val inch : float -> Mlpost.Num.scale
end