Step | Hyp | Ref
| Expression |
1 | | itcovalt2.f |
. . . . 5
β’ πΉ = (π β β0 β¦ ((2
Β· π) + πΆ)) |
2 | | nn0ex 12443 |
. . . . . 6
β’
β0 β V |
3 | 2 | mptex 7193 |
. . . . 5
β’ (π β β0
β¦ ((2 Β· π) +
πΆ)) β
V |
4 | 1, 3 | eqeltri 2828 |
. . . 4
β’ πΉ β V |
5 | | simpl 483 |
. . . 4
β’ ((π¦ β β0
β§ πΆ β
β0) β π¦ β β0) |
6 | | simpr 485 |
. . . 4
β’ (((π¦ β β0
β§ πΆ β
β0) β§ ((IterCompβπΉ)βπ¦) = (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) β ((IterCompβπΉ)βπ¦) = (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) |
7 | | itcovalsucov 46907 |
. . . 4
β’ ((πΉ β V β§ π¦ β β0
β§ ((IterCompβπΉ)βπ¦) = (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) β ((IterCompβπΉ)β(π¦ + 1)) = (πΉ β (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ)))) |
8 | 4, 5, 6, 7 | mp3an2ani 1468 |
. . 3
β’ (((π¦ β β0
β§ πΆ β
β0) β§ ((IterCompβπΉ)βπ¦) = (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) β ((IterCompβπΉ)β(π¦ + 1)) = (πΉ β (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ)))) |
9 | | 2nn 12250 |
. . . . . . . . 9
β’ 2 β
β |
10 | 9 | a1i 11 |
. . . . . . . 8
β’ (π¦ β β0
β 2 β β) |
11 | | id 22 |
. . . . . . . 8
β’ (π¦ β β0
β π¦ β
β0) |
12 | 10, 11 | nnexpcld 14173 |
. . . . . . 7
β’ (π¦ β β0
β (2βπ¦) β
β) |
13 | | itcovalt2lem2lem1 46912 |
. . . . . . 7
β’
((((2βπ¦) β
β β§ πΆ β
β0) β§ π β β0) β (((π + πΆ) Β· (2βπ¦)) β πΆ) β
β0) |
14 | 12, 13 | sylanl1 678 |
. . . . . 6
β’ (((π¦ β β0
β§ πΆ β
β0) β§ π β β0) β (((π + πΆ) Β· (2βπ¦)) β πΆ) β
β0) |
15 | | eqidd 2732 |
. . . . . 6
β’ ((π¦ β β0
β§ πΆ β
β0) β (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ)) = (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) |
16 | | oveq2 7385 |
. . . . . . . . . 10
β’ (π = π β (2 Β· π) = (2 Β· π)) |
17 | 16 | oveq1d 7392 |
. . . . . . . . 9
β’ (π = π β ((2 Β· π) + πΆ) = ((2 Β· π) + πΆ)) |
18 | 17 | cbvmptv 5238 |
. . . . . . . 8
β’ (π β β0
β¦ ((2 Β· π) +
πΆ)) = (π β β0 β¦ ((2
Β· π) + πΆ)) |
19 | 1, 18 | eqtri 2759 |
. . . . . . 7
β’ πΉ = (π β β0 β¦ ((2
Β· π) + πΆ)) |
20 | 19 | a1i 11 |
. . . . . 6
β’ ((π¦ β β0
β§ πΆ β
β0) β πΉ = (π β β0 β¦ ((2
Β· π) + πΆ))) |
21 | | oveq2 7385 |
. . . . . . 7
β’ (π = (((π + πΆ) Β· (2βπ¦)) β πΆ) β (2 Β· π) = (2 Β· (((π + πΆ) Β· (2βπ¦)) β πΆ))) |
22 | 21 | oveq1d 7392 |
. . . . . 6
β’ (π = (((π + πΆ) Β· (2βπ¦)) β πΆ) β ((2 Β· π) + πΆ) = ((2 Β· (((π + πΆ) Β· (2βπ¦)) β πΆ)) + πΆ)) |
23 | 14, 15, 20, 22 | fmptco 7095 |
. . . . 5
β’ ((π¦ β β0
β§ πΆ β
β0) β (πΉ β (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) = (π β β0 β¦ ((2
Β· (((π + πΆ) Β· (2βπ¦)) β πΆ)) + πΆ))) |
24 | | itcovalt2lem2lem2 46913 |
. . . . . 6
β’ (((π¦ β β0
β§ πΆ β
β0) β§ π β β0) β ((2
Β· (((π + πΆ) Β· (2βπ¦)) β πΆ)) + πΆ) = (((π + πΆ) Β· (2β(π¦ + 1))) β πΆ)) |
25 | 24 | mpteq2dva 5225 |
. . . . 5
β’ ((π¦ β β0
β§ πΆ β
β0) β (π β β0 β¦ ((2
Β· (((π + πΆ) Β· (2βπ¦)) β πΆ)) + πΆ)) = (π β β0 β¦ (((π + πΆ) Β· (2β(π¦ + 1))) β πΆ))) |
26 | 23, 25 | eqtrd 2771 |
. . . 4
β’ ((π¦ β β0
β§ πΆ β
β0) β (πΉ β (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) = (π β β0 β¦ (((π + πΆ) Β· (2β(π¦ + 1))) β πΆ))) |
27 | 26 | adantr 481 |
. . 3
β’ (((π¦ β β0
β§ πΆ β
β0) β§ ((IterCompβπΉ)βπ¦) = (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) β (πΉ β (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) = (π β β0 β¦ (((π + πΆ) Β· (2β(π¦ + 1))) β πΆ))) |
28 | 8, 27 | eqtrd 2771 |
. 2
β’ (((π¦ β β0
β§ πΆ β
β0) β§ ((IterCompβπΉ)βπ¦) = (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ))) β ((IterCompβπΉ)β(π¦ + 1)) = (π β β0 β¦ (((π + πΆ) Β· (2β(π¦ + 1))) β πΆ))) |
29 | 28 | ex 413 |
1
β’ ((π¦ β β0
β§ πΆ β
β0) β (((IterCompβπΉ)βπ¦) = (π β β0 β¦ (((π + πΆ) Β· (2βπ¦)) β πΆ)) β ((IterCompβπΉ)β(π¦ + 1)) = (π β β0 β¦ (((π + πΆ) Β· (2β(π¦ + 1))) β πΆ)))) |