Require Import Coq.Arith.Arith Coq.Classes.Morphisms Coq.Classes.RelationClasses.
Coercion is_true : bool >-> Sortclass.
Global Instance: Transitive leb.
Admitted.
Goal forall x y z, leb x y -> leb y z -> True.
intros ??? H H'.
lazymatch goal with
| [ H : is_true (?R ?x ?y), H' : is_true (?R ?y ?z) |- _ ]
=> pose proof (transitivity H H' : is_true (R x z))
end.
exact I.
Qed.
¤ Dauer der Verarbeitung: 0.14 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|