sig
  type t = Up | Down | Near
  val pretty : Format.formatter -> Numerors_utils.Rounding.t -> unit
  val eq : Numerors_utils.Rounding.t -> Numerors_utils.Rounding.t -> bool
end