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