summaryrefslogtreecommitdiff
path: root/test-suite/success/Decompose.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/success/Decompose.v')
-rw-r--r--test-suite/success/Decompose.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/success/Decompose.v b/test-suite/success/Decompose.v
new file mode 100644
index 00000000..21a3ab5d
--- /dev/null
+++ b/test-suite/success/Decompose.v
@@ -0,0 +1,7 @@
+(* This was a Decompose bug reported by Randy Pollack (29 Mar 2000) *)
+
+Goal (O=O/\((x:nat)(x=x)->(x=x)/\((y:nat)y=y->y=y)))-> True.
+Intro H.
+Decompose [and] H. (* Was failing *)
+
+Abort.