module type S_Term = sig .. end
sig
end
include Literal.S
val mk_pred : Term.t -> t
Term.t -> t
val vrai : t
t
val faux : t