Proof of Theorem geolim
| Step | Hyp | Ref
| Expression |
| 1 | | opreq1 3974 |
. . . . . . . 8
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → (A↑k) = ( if((A
∈ ℂ ⋀ (abs ‘A) < 1), A,
0)↑k)) |
| 2 | 1 | eqeq2d 1489 |
. . . . . . 7
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → (y = (A↑k) ↔
y = ( if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0)↑k))) |
| 3 | 2 | anbi2d 618 |
. . . . . 6
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → ((k ∈ ℕ0
⋀ y =
(A↑k)) ↔ (k
∈ ℕ0 ⋀
y = ( if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0)↑k)))) |
| 4 | 3 | opabbidv 2675 |
. . . . 5
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → {〈k, y〉∣(k ∈ ℕ0 ⋀
y = (A↑k))} =
{〈k,
y〉∣(k ∈ ℕ0
⋀ y = (
if((A ∈
ℂ ⋀ (abs
‘A) < 1), A, 0)↑k))}) |
| 5 | 4 | opreq2d 3982 |
. . . 4
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → ( + seq0{〈k, y〉∣(k ∈ ℕ0 ⋀
y = (A↑k))}) = (
+ seq0{〈k, y〉∣(k ∈ ℕ0 ⋀
y = ( if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0)↑k))})) |
| 6 | | opreq2 3975 |
. . . . 5
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → (1 − A) = (1 −
if((A ∈
ℂ ⋀ (abs
‘A) < 1), A, 0))) |
| 7 | 6 | opreq2d 3982 |
. . . 4
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → (1 / (1 − A)) = (1 / (1
− if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0)))) |
| 8 | 5, 7 | breq12d 2636 |
. . 3
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → (( + seq0{〈k, y〉∣(k ∈ ℕ0 ⋀
y = (A↑k))})
⇝ (1 / (1 − A)) ↔ ( + seq0{〈k, y〉∣(k ∈ ℕ0
⋀ y = (
if((A ∈
ℂ ⋀ (abs
‘A) < 1), A, 0)↑k))})
⇝ (1 / (1 − if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0))))) |
| 9 | | eqid 1478 |
. . . 4
⊢ {〈k, y〉∣(k ∈ ℕ0
⋀ y = (
if((A ∈
ℂ ⋀ (abs
‘A) < 1), A, 0)↑k))}
= {〈k,
y〉∣(k ∈ ℕ0
⋀ y = (
if((A ∈
ℂ ⋀ (abs
‘A) < 1), A, 0)↑k))} |
| 10 | | eleq1 1537 |
. . . . . . 7
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → (A ∈ ℂ ↔
if((A ∈
ℂ ⋀ (abs
‘A) < 1), A, 0) ∈ ℂ)) |
| 11 | | fveq2 3730 |
. . . . . . . 8
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → (abs ‘A) = (abs ‘
if((A ∈
ℂ ⋀ (abs
‘A) < 1), A, 0))) |
| 12 | 11 | breq1d 2634 |
. . . . . . 7
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → ((abs ‘A) < 1 ↔
(abs ‘ if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0)) < 1)) |
| 13 | 10, 12 | anbi12d 630 |
. . . . . 6
⊢ (A = if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) → ((A ∈ ℂ ⋀ (abs ‘A) < 1) ↔ ( if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0) ∈ ℂ ⋀ (abs
‘ if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0)) < 1))) |
| 14 | | eleq1 1537 |
. . . . . . 7
⊢ (0 = if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0) → (0 ∈
ℂ ↔ if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0) ∈ ℂ)) |
| 15 | | fveq2 3730 |
. . . . . . . 8
⊢ (0 = if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0) → (abs ‘0) = (abs ‘
if((A ∈
ℂ ⋀ (abs
‘A) < 1), A, 0))) |
| 16 | 15 | breq1d 2634 |
. . . . . . 7
⊢ (0 = if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0) → ((abs ‘0) < 1 ↔ (abs
‘ if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0)) < 1)) |
| 17 | 14, 16 | anbi12d 630 |
. . . . . 6
⊢ (0 = if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0) → ((0 ∈
ℂ ⋀ (abs
‘0) < 1) ↔ ( if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0) ∈ ℂ
⋀ (abs ‘ if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0)) < 1))) |
| 18 | | 0cn 5340 |
. . . . . . 7
⊢ 0 ∈ ℂ |
| 19 | | abs0 6877 |
. . . . . . . 8
⊢ (abs ‘0) =
0 |
| 20 | | lt01 5692 |
. . . . . . . 8
⊢ 0 < 1 |
| 21 | 19, 20 | eqbrtr 2639 |
. . . . . . 7
⊢ (abs ‘0) <
1 |
| 22 | 18, 21 | pm3.2i 285 |
. . . . . 6
⊢ (0 ∈ ℂ ⋀ (abs ‘0) < 1) |
| 23 | 13, 17, 22 | elimhyp 2394 |
. . . . 5
⊢ ( if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0) ∈ ℂ ⋀ (abs
‘ if((A ∈ ℂ ⋀ (abs ‘A) < 1), A,
0)) < 1) |
| 24 | 23 | pm3.26i 320 |
. . . 4
⊢ if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0) ∈ ℂ |
| 25 | 23 | pm3.27i 324 |
. . . 4
⊢ (abs ‘ if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0)) < 1 |
| 26 | 9, 24, 25 | geolimi 7236 |
. . 3
⊢ ( + seq0{〈k, y〉∣(k ∈ ℕ0
⋀ y = (
if((A ∈
ℂ ⋀ (abs
‘A) < 1), A, 0)↑k))})
⇝ (1 / (1 − if((A ∈ ℂ ⋀ (abs
‘A) < 1), A, 0))) |
| 27 | 8, 26 | dedth 2387 |
. 2
⊢ ((A ∈ ℂ ⋀ (abs
‘A) < 1) → ( +
seq0{〈k, y〉∣(k ∈ ℕ0 ⋀
y = (A↑k))})
⇝ (1 / (1 − A))) |
| 28 | | geolim.1 |
. . 3
⊢ F = {〈k, y〉∣(k ∈ ℕ0 ⋀
y = (A↑k))} |
| 29 | 28 | opreq2i 3978 |
. 2
⊢ ( +
seq0F) = ( +
seq0{〈k, y〉∣(k ∈ ℕ0 ⋀
y = (A↑k))}) |
| 30 | 27, 29 | syl5eqbr 2653 |
1
⊢ ((A ∈ ℂ ⋀ (abs
‘A) < 1) → ( +
seq0F) ⇝ (1 / (1 − A))) |