diff options
Diffstat (limited to 'test-suite/success/Discriminate.v')
-rw-r--r-- | test-suite/success/Discriminate.v | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test-suite/success/Discriminate.v b/test-suite/success/Discriminate.v index 39d2f4bb..f28c83de 100644 --- a/test-suite/success/Discriminate.v +++ b/test-suite/success/Discriminate.v @@ -2,10 +2,10 @@ (* Check that Discriminate tries Intro until *) -Lemma l1 : O=(S O)->False. -Discriminate 1. +Lemma l1 : 0 = 1 -> False. + discriminate 1. Qed. -Lemma l2 : (H:O=(S O))H==H. -Discriminate H. +Lemma l2 : forall H : 0 = 1, H = H. + discriminate H. Qed. |