sig
type t = {
carrier : Term.constr;
eq : Term.constr;
equivalence : Term.constr;
}
val make : Term.constr -> Term.constr -> Term.constr -> Coq.Equivalence.t
val infer :
Coq.goal_sigma ->
Term.constr -> Term.constr -> Coq.Equivalence.t * Coq.goal_sigma
val from_relation :
Coq.goal_sigma -> Coq.Relation.t -> Coq.Equivalence.t * Coq.goal_sigma
val cps_from_relation :
Coq.Relation.t ->
(Coq.Equivalence.t -> Proof_type.tactic) -> Proof_type.tactic
val to_relation : Coq.Equivalence.t -> Coq.Relation.t
val split : Coq.Equivalence.t -> Term.constr * Term.constr * Term.constr
end