diff options
author | 2007-07-13 14:55:03 +0000 | |
---|---|---|
committer | 2007-07-13 14:55:03 +0000 | |
commit | 246909f2c587ed798bc42b65fb90c7b77dfa52b7 (patch) | |
tree | 0ea9ba42784b09b9478b32d4dafc01c3b81124d1 /theories/Num/Nat/NSyntax.v | |
parent | a2b33be15a16de033506da6a4e8b407eaf951054 (diff) |
Répertoire Numbers poursuit l'objectif entamé en syntaxe V7 dans le
répertoire Num. Suppression de ce dernier de l'archive courante.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9995 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Num/Nat/NSyntax.v')
-rw-r--r-- | theories/Num/Nat/NSyntax.v | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/theories/Num/Nat/NSyntax.v b/theories/Num/Nat/NSyntax.v deleted file mode 100644 index 9752dd2e9..000000000 --- a/theories/Num/Nat/NSyntax.v +++ /dev/null @@ -1,26 +0,0 @@ - -(*s Syntax for arithmetic *) - -Infix 6 "<" lt. -Infix 6 "<=" le. -Infix 6 ">" gt. -Infix 6 ">=" ge. - -(*i Infix 7 "+" plus. i*) - -Grammar constr lassoc_constr4 := - squash_sum - [ lassoc_constr4($c1) "+" lassoc_constr4($c2) ] -> - case [$c2] of - (SQUASH $T2) -> - case [$c1] of - (SQUASH $T1) -> [ (sumbool $T1 $T2) ] (* {T1}+{T2} *) - | $_ -> [ (sumor $c1 $T2) ] (* c1+{T2} *) - esac - | $_ -> [ (add $c1 $c2) ] (* c1+c2 *) - esac. - -Syntax constr - level 4: - sum [ (add $t1 $t2) ] -> [ [<hov 0> $t1:E [0 1] "+" $t2:L ] ] -.
\ No newline at end of file |