From 5ad859d36a38b05bf2700a9507bd61e8a8964a53 Mon Sep 17 00:00:00 2001 From: herbelin Date: Wed, 19 Dec 2001 09:14:42 +0000 Subject: NatRing (2ème) git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2326 85f007b7-540e-0410-9357-904b9bb8a0f7 --- test-suite/success/NatRing.v | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/test-suite/success/NatRing.v b/test-suite/success/NatRing.v index 47d9f9b5a5..6a1eeccc6c 100644 --- a/test-suite/success/NatRing.v +++ b/test-suite/success/NatRing.v @@ -1,5 +1,10 @@ Require ArithRing. -Goal (S (S O))=(plus (S O) (S O)). +Lemma l1 : (S (S O))=(plus (S O) (S O)). NatRing. Qed. + +Lemma l2 : (x:nat)(S (S x))=(plus (S O) (S x)). +Intro. +NatRing. +Qed. \ No newline at end of file -- cgit v1.2.3