Module AltErgoLib.Xliteral

type builtin = Symbols.builtin =
  1. | LE
  2. | LT
  3. | IsConstr of Hstring.t
type 'a view =
  1. | Eq of 'a * 'a
  2. | Distinct of bool * 'a list
  3. | Builtin of bool * builtin * 'a list
  4. | Pred of 'a * bool
type 'a atom_view
module type OrderedType = sig ... end
module type S = sig ... end
val print_view : ?lbl:string -> (Stdlib.Format.formatter -> 'a -> unit) -> Stdlib.Format.formatter -> 'a view -> unit
module Make (X : OrderedType) : S with type elt = X.t