sig
  type t = { cnt : int; exp : float; }
  val pp : Format.formatter -> Data.DATA.t -> unit
  val show : Data.DATA.t -> string
end