diff options
| author |  coq <coq@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-04-20 16:00:43 +0000 |
|---|---|---|
| committer | coq <coq@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-04-20 16:00:43 +0000 |
| commit | d857c99c6c985eb36ce8a4b2667dc0b5ccca115c (patch) | |
| tree | 2ea53c80dd3319b24c38b15cb5be5a582c9b302a /theories/Reals/Rbase.v | |
| parent | 4837b599b4f158decc91f615a25e3a636c6ced5d (diff) | |
Library doc adjustments (until page 140)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1655 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Reals/Rbase.v')
| -rw-r--r-- | theories/Reals/Rbase.v | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/theories/Reals/Rbase.v b/theories/Reals/Rbase.v index 898783cbc..4b4ab6351 100644 --- a/theories/Reals/Rbase.v +++ b/theories/Reals/Rbase.v @@ -286,13 +286,14 @@ Lemma Rplus_Ropp:(x,y:R)``x+y==0``->``y== -x``. | Ring ]. Save. -(* New *) +(*i New i*) Hint eqT_R_congr : real := Resolve (congr_eqT R). Lemma Rplus_plus_r:(r,r1,r2:R)(r1==r2)->``r+r1==r+r2``. Auto with real. Save. -(* Old *) Hints Resolve Rplus_plus_r : v62. + +(*i Old i*)Hints Resolve Rplus_plus_r : v62. (**********) Lemma r_Rplus_plus:(r,r1,r2:R)``r+r1==r+r2``->r1==r2. @@ -358,7 +359,8 @@ Hints Resolve Rmult_1r : real. Lemma Rmult_mult_r:(r,r1,r2:R)r1==r2->``r*r1==r*r2``. Auto with real. Save. -(* OLD *) Hints Resolve Rmult_mult_r : v62. + +(*i OLD i*)Hints Resolve Rmult_mult_r : v62. (**********) Lemma r_Rmult_mult:(r,r1,r2:R)(``r*r1==r*r2``)->``r<>0``->(r1==r2). |