aboutsummaryrefslogtreecommitdiff
path: root/theories/Arith
diff options
context:
space:
mode:
authorherbelin2002-10-13 13:15:45 +0000
committerherbelin2002-10-13 13:15:45 +0000
commit338dd533c27374771b0e880dcb74fba972dc79f1 (patch)
tree1cea40acefffd5ed9ca2f017a6242ac2e1074ea1 /theories/Arith
parentbbc37bb5a166a7eb43eddea6d0f2a8c7f4e977ba (diff)
Mise en place d'ensembles de notations symboliques pour nat, Z et R
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3125 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Arith')
-rwxr-xr-xtheories/Arith/Arith.v16
-rw-r--r--theories/Arith/ArithSyntax.v6
-rwxr-xr-xtheories/Arith/Plus.v3
3 files changed, 2 insertions, 23 deletions
diff --git a/theories/Arith/Arith.v b/theories/Arith/Arith.v
index 7af85c65ad..13c17aabb5 100755
--- a/theories/Arith/Arith.v
+++ b/theories/Arith/Arith.v
@@ -18,19 +18,3 @@ Require Export Between.
Require Export Minus.
Require Export Peano_dec.
Require Export Compare_dec.
-
-Axiom My_special_variable : nat -> nat.
-
-Grammar nat number :=.
-
-Grammar constr constr10 :=
- natural_nat [ nat:number($c) ] -> [$c].
-
-Grammar constr pattern :=
- natural_pat [ nat:pat_number($c) ] -> [$c].
-
-Syntax constr
- level 10:
- S [ (S $p) ] -> [$p:"nat_printer":9]
-| O [ O ] -> [ "0" ]
-.
diff --git a/theories/Arith/ArithSyntax.v b/theories/Arith/ArithSyntax.v
deleted file mode 100644
index cd762d4253..0000000000
--- a/theories/Arith/ArithSyntax.v
+++ /dev/null
@@ -1,6 +0,0 @@
-Infix 4 "+" plus.
-Infix 3 "*" mult.
-Infix 1 "<=" le.
-Infix 1 "<" lt.
-Infix 1 ">=" ge.
-(* Infix 1 ">" gt.*)
diff --git a/theories/Arith/Plus.v b/theories/Arith/Plus.v
index 5263cb3757..3ad37d13a4 100755
--- a/theories/Arith/Plus.v
+++ b/theories/Arith/Plus.v
@@ -12,7 +12,8 @@
Require Le.
Require Lt.
-Require ArithSyntax.
+
+Import nat_scope.
Lemma plus_sym : (n,m:nat)(n+m)=(m+n).
Proof.