|
(* This used to raise an anomaly in 8.8 *)
Inductive T := Tau (t : T).
Notation idT t := (match t with Tau t => Tau t end).
Lemma match_itree : forall (t : T), t = idT t.
Proof. destruct t; auto. Qed.
Lemma what (k : unit -> T) : k tt = k tt.
Proof. rewrite match_itree. Abort.
¤ 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.
|
