summaryrefslogtreecommitdiff
path: root/test-suite/bugs/opened/3100.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/bugs/opened/3100.v')
-rw-r--r--test-suite/bugs/opened/3100.v9
1 files changed, 9 insertions, 0 deletions
diff --git a/test-suite/bugs/opened/3100.v b/test-suite/bugs/opened/3100.v
new file mode 100644
index 00000000..6f35a74d
--- /dev/null
+++ b/test-suite/bugs/opened/3100.v
@@ -0,0 +1,9 @@
+Fixpoint F (n : nat) (A : Type) : Type :=
+ match n with
+ | 0 => True
+ | S n => forall (x : A), F n (x = x)
+ end.
+
+Goal forall A n, (forall (x : A) (e : x = x), F n (e = e)).
+intros A n.
+Fail change (forall x, F n (x = x)) with (F (S n)).