diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-02-14 15:57:26 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-02-14 15:57:26 +0000 |
| commit | 41bf87dd6a35255596638f1b1983a0b2d0d071b8 (patch) | |
| tree | ccbbad2e2d414c5fc73639bd20a205d6eea67ab5 /theories/Wellfounded/Disjoint_Union.v | |
| parent | a7de8633c23fe66ee32463d78dae89661805c2d1 (diff) | |
Renommage des variables dans les schémas d'induction
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1387 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Wellfounded/Disjoint_Union.v')
| -rw-r--r-- | theories/Wellfounded/Disjoint_Union.v | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/theories/Wellfounded/Disjoint_Union.v b/theories/Wellfounded/Disjoint_Union.v index 162a31e83..d29262427 100644 --- a/theories/Wellfounded/Disjoint_Union.v +++ b/theories/Wellfounded/Disjoint_Union.v @@ -42,13 +42,13 @@ Proof. Intros. Unfold well_founded . Induction a. - Intro. - Apply (acc_A_sum y). - Apply (H y). + Intro a0. + Apply (acc_A_sum a0). + Apply (H a0). - Intro. - Apply (acc_B_sum H y). - Apply (H0 y). + Intro b. + Apply (acc_B_sum H b). + Apply (H0 b). Qed. End Wf_Disjoint_Union. |