From 110be8e24c9207ef8da5ef09b2f43da4fa02b197 Mon Sep 17 00:00:00 2001 From: bertot Date: Mon, 9 Dec 2002 13:59:39 +0000 Subject: Add an example with Ring. Modified obj_magic.out because some formulas changed representation. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3403 85f007b7-540e-0410-9357-904b9bb8a0f7 --- test-suite/parser/obj_magic.out | 36 +++++++++++++++++++++++++++--------- test-suite/parser/obj_magic.v | 1 + 2 files changed, 28 insertions(+), 9 deletions(-) (limited to 'test-suite') diff --git a/test-suite/parser/obj_magic.out b/test-suite/parser/obj_magic.out index fef49b8f6..bb0d67265 100644 --- a/test-suite/parser/obj_magic.out +++ b/test-suite/parser/obj_magic.out @@ -38,6 +38,9 @@ b n vernac$binder 2 +n +vernac$binder_ne_list +1 a vernac$ident c @@ -249,11 +252,8 @@ a vernac$int 1 a -vernac$ident -eq -n -vernac$existvarc -0 +vernac$string +_ = _ a vernac$ident a @@ -261,10 +261,10 @@ a vernac$ident b n -vernac$formula_ne_list -3 +vernac$formula_list +2 n -vernac$appc +vernac$notation 2 n vernac$none @@ -419,6 +419,24 @@ vernac$use_inversion n vernac$solve 2 +a +vernac$int +1 +a +vernac$ident +a +a +vernac$ident +b +n +vernac$formula_list +2 +n +vernac$ring +1 +n +vernac$solve +2 n vernac$lr 0 @@ -478,6 +496,6 @@ vernac$hintrewrite 4 n vernac$command_list -19 +20 e blabla diff --git a/test-suite/parser/obj_magic.v b/test-suite/parser/obj_magic.v index 6cdbdd13f..aeb975b59 100644 --- a/test-suite/parser/obj_magic.v +++ b/test-suite/parser/obj_magic.v @@ -15,6 +15,7 @@ Prolog [A (B c)] 4. EApply H with 1:= H2 a:= b. Inversion H using (A b). Inversion H using (A b) in H1 H2. +Ring a b. Hint Rewrite -> [ (A b) ] in v. Hint Rewrite <- [ (A b) ] in v using Auto. -- cgit v1.2.3