sig
  type t
  val one : Cvalue.CardinalEstimate.t
  val pretty : Format.formatter -> Cvalue.CardinalEstimate.t -> unit
  val pretty_long_log10 :
    Format.formatter -> Cvalue.CardinalEstimate.t -> unit
end