diff options
author | desmettr <desmettr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-01-22 15:43:03 +0000 |
---|---|---|
committer | desmettr <desmettr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-01-22 15:43:03 +0000 |
commit | a9cee971280fe8d1fb20d4208d71f7c399902c7d (patch) | |
tree | a5e2545aa3aedc62ea755f6e72b982b6731e9877 /theories/Reals/R_sqrt.v | |
parent | 8e728fe2d82ea5b3d9431c5635171f16202d1272 (diff) |
Commentaires
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3585 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Reals/R_sqrt.v')
-rw-r--r-- | theories/Reals/R_sqrt.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Reals/R_sqrt.v b/theories/Reals/R_sqrt.v index 19e3d2602..35890cde8 100644 --- a/theories/Reals/R_sqrt.v +++ b/theories/Reals/R_sqrt.v @@ -12,7 +12,7 @@ Require Rbase. Require Rfunctions. Require Rsqrt_def. -(* Voici un prolongement continu de Rsqrt sur R *) +(* Here is a continuous extension of Rsqrt on R *) Definition sqrt : R->R := [x:R](Cases (case_Rabsolu x) of (leftT _) => R0 | (rightT a) => (Rsqrt (mknonnegreal x (Rle_sym2 ? ? a))) end). |