diff options
author | mayero <mayero@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-02-08 23:35:50 +0000 |
---|---|---|
committer | mayero <mayero@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-02-08 23:35:50 +0000 |
commit | e0554d32bf6a5deedd586b66c48aaa78b11ba0e7 (patch) | |
tree | 698b8e1a4d323badea8dd0fbac816d0ab2d61527 /theories | |
parent | 88b85cce4234e7a7ca48e45c83d9d7504d200ccd (diff) |
modif de la syntax: assoc a droite pour Ring
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1359 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories')
-rw-r--r-- | theories/Reals/Rsyntax.v | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/theories/Reals/Rsyntax.v b/theories/Reals/Rsyntax.v index 04f5bd911..5f8b0d7a3 100644 --- a/theories/Reals/Rsyntax.v +++ b/theories/Reals/Rsyntax.v @@ -163,9 +163,6 @@ Syntax constr Rmult_inside [<<(REXPR <<(Rmult $n1 $n2)>>)>>] -> [ (REXPR $n1):E "*" [0 0] (REXPR $n2):L ] -(* |Rdiv_inside - [<<(REXPR <<(Rdiv $n1 $n2)>>)>>] - -> [ (REXPR $n1):E "/" [0 0] (REXPR $n2):L ]*) ; level 5: @@ -179,7 +176,7 @@ Syntax constr level 0: Rzero_inside [<<(REXPR <<R0>>)>>] -> ["0"] | Rone_inside [<<(REXPR <<R1>>)>>] -> ["1"] - | Rconst_inside [<<(REXPR <<(Rplus $r R1)>>)>>] -> [$r:"r_printer"]. + | Rconst_inside [<<(REXPR <<(Rplus R1 $r)>>)>>] -> [$r:"r_printer"]. |