aboutsummaryrefslogtreecommitdiff
path: root/test-suite
diff options
context:
space:
mode:
authordelahaye2001-06-15 21:54:45 +0000
committerdelahaye2001-06-15 21:54:45 +0000
commit686b7d347ba8dc9a4e032cd4c6cb38da93c38188 (patch)
tree9a460732642bee4e80140d0db3d1e825015ee929 /test-suite
parent560dd7089c3f5304db9596486ea423484f86c891 (diff)
Fix d'un bug de Tauto
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1787 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/success/Tauto.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/success/Tauto.v b/test-suite/success/Tauto.v
index 6e8bf0f140..ecaaf80d4f 100644
--- a/test-suite/success/Tauto.v
+++ b/test-suite/success/Tauto.v
@@ -172,6 +172,13 @@ Proof.
Tauto.
Save.
+(* A bug from CNF form *)
+Lemma old_bug3:
+ ((~A\/B)/\(~B\/B)/\(~A\/~B)/\(~B\/~B)->False)->~((A->B)->B)->False.
+Proof.
+ Tauto.
+Save.
+
(* A private club has the following rules :
*
* . rule 1 : Every non-scottish member wears red socks