Une passe sur les réels:

- Renommage de Rlt_not_le de Fourier_util en Rlt_not_le_frac_opp pour
  éviter la confusion avec le Rlt_not_le de RIneq.
- Quelques variantes de lemmes en plus dans RIneq.
- Déplacement des énoncés de sigT dans sig (y compris la complétude)
  et utilisation de la notation { l:R | }.
- Suppression hypothèse inutile de ln_exists1.
- Ajout notation ² pour Rsqr.

Au passage:
- Déplacement de dec_inh_nat_subset_has_unique_least_element
  de ChoiceFacts vers Wf_nat.
- Correction de l'espace en trop dans les notations de Specif.v liées à "&".
- MAJ fichier CHANGES

Note: il reste un axiome dans Ranalysis (raison technique: Ltac ne
sait pas manipuler un terme ouvert) et dans Rtrigo.v ("sin PI/2 = 1"
non prouvé).



git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10710 85f007b7-540e-0410-9357-904b9bb8a0f7

1 files changed, 2 insertions, 2 deletions

diff --git a/theories/Reals/Rtrigo_alt.v b/theories/Reals/Rtrigo_alt.v
index d6ab9a4ce..36ed0c1a0 100644
--- a/theories/Reals/Rtrigo_alt.v
+++ b/theories/Reals/Rtrigo_alt.v
@@ -137,7 +137,7 @@ Proof.
   ring.
   assert (X := exist_sin (Rsqr a)); elim X; intros.
   cut (x = sin a / a).
-  intro; rewrite H3 in p; unfold sin_in in p; unfold infinit_sum in p;
+  intro; rewrite H3 in p; unfold sin_in in p; unfold infinite_sum in p;
     unfold R_dist in p; unfold Un_cv in |- *; unfold R_dist in |- *; 
       intros.
   cut (0 < eps / Rabs a).
@@ -327,7 +327,7 @@ Proof.
   apply (fun m n p:nat => mult_le_compat_l p n m); apply le_n_S; assumption.
   assert (X := exist_cos (Rsqr a0)); elim X; intros.
   cut (x = cos a0).
-  intro; rewrite H4 in p; unfold cos_in in p; unfold infinit_sum in p;
+  intro; rewrite H4 in p; unfold cos_in in p; unfold infinite_sum in p;
     unfold R_dist in p; unfold Un_cv in |- *; unfold R_dist in |- *; 
       intros.
   elim (p _ H5); intros N H6.