(* Submitted by Houda Anoun *)
Module toto.
Ltac titi := auto.
End toto.
Module ti.
Import toto.
Ltac equal := match goal with
| |- (?X1 = ?X1) => titi
| |- _ => idtac
end.
End ti.
Import ti.
Definition simple : forall a : nat, a = a.
intro.
equal.
Qed.
¤ Dauer der Verarbeitung: 0.15 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.
|