diff options
| author |  corbinea <corbinea@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-07-05 11:58:31 +0000 |
|---|---|---|
| committer | corbinea <corbinea@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-07-05 11:58:31 +0000 |
| commit | 239e24b749014df5fbd83663ba4e865ab8e81db0 (patch) | |
| tree | 19a2e63bb0ca75a4b9b9f66abaf51b5b0717e120 /test-suite/success | |
| parent | 80c2fb9228ece1d7ce2cc5e631ee24fa9bd7f843 (diff) | |
Added a new uncompleteness bug found in Tauto.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2838 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success')
| -rw-r--r-- | test-suite/success/Tauto.v | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/test-suite/success/Tauto.v b/test-suite/success/Tauto.v index ecaaf80d4..f751d52bf 100644 --- a/test-suite/success/Tauto.v +++ b/test-suite/success/Tauto.v @@ -179,6 +179,16 @@ Proof. Tauto. Save. +(* A bug found by Freek Wiedijk <freek@cs.kun.nl> *) +Lemma new_bug: +Goal ((A<->B)->(B<->C)) -> + ((B<->C)->(C<->A)) -> + ((C<->A)->(A<->B)) -> + (A<->B). +Proof. + Tauto. +Save. + (* A private club has the following rules : * * . rule 1 : Every non-scottish member wears red socks |