From a4deb2c27bdbbba5053c0b25a326ee24a2f42e1a Mon Sep 17 00:00:00 2001
From: msozeau
Date: Sun, 16 Mar 2008 14:50:35 +0000
Subject: Misc: Add test for bug 1704, now closed. Add usual syntax for lists
 in Program.Syntax along with stronger implicits. Update dependent induction
 test file using unicode syntax.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10682 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 test-suite/bugs/closed/shouldsucceed/1704.v | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 test-suite/bugs/closed/shouldsucceed/1704.v

(limited to 'test-suite/bugs')

diff --git a/test-suite/bugs/closed/shouldsucceed/1704.v b/test-suite/bugs/closed/shouldsucceed/1704.v
new file mode 100644
index 0000000000..81b2216901
--- /dev/null
+++ b/test-suite/bugs/closed/shouldsucceed/1704.v
@@ -0,0 +1,17 @@
+
+Require Import Setoid.
+Parameter E : nat -> nat -> Prop.
+Axiom E_equiv : equiv nat E.
+Add Relation nat E
+reflexivity proved by (proj1 E_equiv)
+symmetry proved by (proj2 (proj2 E_equiv))
+transitivity proved by (proj1 (proj2 E_equiv))
+as E_rel.
+Notation "x == y" := (E x y) (at level 70, no associativity).
+Axiom r : False -> 0 == 1.
+Goal 0 == 0.
+Proof.
+rewrite r.
+refl.
+admit.
+Qed.
-- 
cgit v1.2.3