module Transitive:sig..end
type t = {
|
carrier : |
|
leq : |
|
transitive : |
val make : Term.constr -> Term.constr -> Term.constr -> tval infer : Coq.goal_sigma ->
Term.constr -> Term.constr -> t * Coq.goal_sigmaval from_relation : Coq.goal_sigma -> Coq.Relation.t -> t * Coq.goal_sigmaval cps_from_relation : Coq.Relation.t ->
(t -> Proof_type.tactic) -> Proof_type.tacticval to_relation : t -> Coq.Relation.t