diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-05-29 10:59:30 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-05-29 10:59:30 +0000 |
| commit | 7a05a712afb145bd8c41ad88dcabffbbd4fe0cf1 (patch) | |
| tree | 96da6366bba630dd2c2d76d7d17cb3c4dca94b57 /theories/Reals/Rseries.v | |
| parent | 0e32f3e1b0e8d5ea00d0495df691797eb7379a4e (diff) | |
Double Induction prend maintenant des noms d'hyppthèses
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2729 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Reals/Rseries.v')
| -rw-r--r-- | theories/Reals/Rseries.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Reals/Rseries.v b/theories/Reals/Rseries.v index c88cdfaf2..68e77d528 100644 --- a/theories/Reals/Rseries.v +++ b/theories/Reals/Rseries.v @@ -64,7 +64,7 @@ Qed. (*********) Lemma growing_prop:(n,m:nat)Un_growing->(ge n m)->(Rge (Un n) (Un m)). -Double Induction 1 2;Intros. +Double Induction n m;Intros. Unfold Rge;Right;Trivial. ElimType False;Unfold ge in H1;Generalize (le_Sn_O n0);Intro;Auto. Cut (ge n0 (0)). |