diff options
author | mayero <mayero@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-06-04 12:32:39 +0000 |
---|---|---|
committer | mayero <mayero@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-06-04 12:32:39 +0000 |
commit | 0316891a0eeb8d88cd5cc225fd4bb18e3583a271 (patch) | |
tree | 9af6ae3ad960e647b5a6a1eba0842d6b52d08dc8 /theories | |
parent | b5221c0c8aca9c8051fa4b4db75324afa41027fc (diff) |
Correction bug outside
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1778 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories')
-rw-r--r-- | theories/Reals/Rsyntax.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Reals/Rsyntax.v b/theories/Reals/Rsyntax.v index 4afaa83ac..9a14dae65 100644 --- a/theories/Reals/Rsyntax.v +++ b/theories/Reals/Rsyntax.v @@ -110,7 +110,7 @@ Syntax constr level 7: Rplus [ (Rplus $n1 $n2) ] -> [ [<hov 0> "``"(REXPR $n1):E "+" [0 0] (REXPR $n2):L "``"] ] - | Rconst [(Rplus $r R1)] -> [$r:"r_printer_outside"] + | Rconst [(Rplus R1 $r)] -> [$r:"r_printer_outside"] | Rminus [ (Rminus $n1 $n2) ] -> [ [<hov 0> "``"(REXPR $n1):E "-" [0 0] (REXPR $n2):L "``"] ] ; |