From 53b2acb9befe13c0383b923d09a0d5a6c416449e Mon Sep 17 00:00:00 2001 From: Maxime Dénès Date: Mon, 5 Sep 2016 17:52:38 +0200 Subject: Test file for #5065 - Anomaly: Not a proof by induction --- test-suite/bugs/closed/5065.v | 6 ++++++ 1 file changed, 6 insertions(+) create mode 100644 test-suite/bugs/closed/5065.v diff --git a/test-suite/bugs/closed/5065.v b/test-suite/bugs/closed/5065.v new file mode 100644 index 0000000000..6bd677ba6f --- /dev/null +++ b/test-suite/bugs/closed/5065.v @@ -0,0 +1,6 @@ +Inductive foo := C1 : bar -> foo with bar := C2 : foo -> bar. + +Lemma L1 : foo -> True with L2 : bar -> True. +intros; clear L1 L2; abstract (exact I). +intros; exact I. +Qed. \ No newline at end of file -- cgit v1.2.3