Proof of Theorem 0.999...OLD
| Step | Hyp | Ref
| Expression |
| 1 | | 10reOLD 11109 |
. . . . . . 7
⊢ 10 ∈
ℝ |
| 2 | 1 | recni 10052 |
. . . . . 6
⊢ 10 ∈
ℂ |
| 3 | | nnnn0 11299 |
. . . . . 6
⊢ (𝑘 ∈ ℕ → 𝑘 ∈
ℕ0) |
| 4 | | expcl 12878 |
. . . . . 6
⊢ ((10
∈ ℂ ∧ 𝑘
∈ ℕ0) → (10↑𝑘) ∈ ℂ) |
| 5 | 2, 3, 4 | sylancr 695 |
. . . . 5
⊢ (𝑘 ∈ ℕ →
(10↑𝑘) ∈
ℂ) |
| 6 | 2 | a1i 11 |
. . . . . 6
⊢ (𝑘 ∈ ℕ → 10 ∈
ℂ) |
| 7 | | 10posOLD 11123 |
. . . . . . . 8
⊢ 0 <
10 |
| 8 | 1, 7 | gt0ne0ii 10564 |
. . . . . . 7
⊢ 10 ≠
0 |
| 9 | 8 | a1i 11 |
. . . . . 6
⊢ (𝑘 ∈ ℕ → 10 ≠
0) |
| 10 | | nnz 11399 |
. . . . . 6
⊢ (𝑘 ∈ ℕ → 𝑘 ∈
ℤ) |
| 11 | 6, 9, 10 | expne0d 13014 |
. . . . 5
⊢ (𝑘 ∈ ℕ →
(10↑𝑘) ≠
0) |
| 12 | | 9cn 11108 |
. . . . . 6
⊢ 9 ∈
ℂ |
| 13 | | divrec 10701 |
. . . . . 6
⊢ ((9
∈ ℂ ∧ (10↑𝑘) ∈ ℂ ∧ (10↑𝑘) ≠ 0) → (9 /
(10↑𝑘)) = (9 ·
(1 / (10↑𝑘)))) |
| 14 | 12, 13 | mp3an1 1411 |
. . . . 5
⊢
(((10↑𝑘) ∈
ℂ ∧ (10↑𝑘)
≠ 0) → (9 / (10↑𝑘)) = (9 · (1 / (10↑𝑘)))) |
| 15 | 5, 11, 14 | syl2anc 693 |
. . . 4
⊢ (𝑘 ∈ ℕ → (9 /
(10↑𝑘)) = (9 ·
(1 / (10↑𝑘)))) |
| 16 | 6, 9, 10 | exprecd 13016 |
. . . . 5
⊢ (𝑘 ∈ ℕ → ((1 /
10)↑𝑘) = (1 /
(10↑𝑘))) |
| 17 | 16 | oveq2d 6666 |
. . . 4
⊢ (𝑘 ∈ ℕ → (9
· ((1 / 10)↑𝑘))
= (9 · (1 / (10↑𝑘)))) |
| 18 | 15, 17 | eqtr4d 2659 |
. . 3
⊢ (𝑘 ∈ ℕ → (9 /
(10↑𝑘)) = (9 ·
((1 / 10)↑𝑘))) |
| 19 | 18 | sumeq2i 14429 |
. 2
⊢
Σ𝑘 ∈
ℕ (9 / (10↑𝑘)) =
Σ𝑘 ∈ ℕ (9
· ((1 / 10)↑𝑘)) |
| 20 | 1, 8 | rereccli 10790 |
. . . . 5
⊢ (1 / 10)
∈ ℝ |
| 21 | 20 | recni 10052 |
. . . 4
⊢ (1 / 10)
∈ ℂ |
| 22 | | 0re 10040 |
. . . . . . 7
⊢ 0 ∈
ℝ |
| 23 | 1, 7 | recgt0ii 10929 |
. . . . . . 7
⊢ 0 < (1
/ 10) |
| 24 | 22, 20, 23 | ltleii 10160 |
. . . . . 6
⊢ 0 ≤ (1
/ 10) |
| 25 | 20 | absidi 14117 |
. . . . . 6
⊢ (0 ≤
(1 / 10) → (abs‘(1 / 10)) = (1 / 10)) |
| 26 | 24, 25 | ax-mp 5 |
. . . . 5
⊢
(abs‘(1 / 10)) = (1 / 10) |
| 27 | | 1lt10OLD 11238 |
. . . . . 6
⊢ 1 <
10 |
| 28 | | recgt1 10919 |
. . . . . . 7
⊢ ((10
∈ ℝ ∧ 0 < 10) → (1 < 10 ↔ (1 / 10) <
1)) |
| 29 | 1, 7, 28 | mp2an 708 |
. . . . . 6
⊢ (1 <
10 ↔ (1 / 10) < 1) |
| 30 | 27, 29 | mpbi 220 |
. . . . 5
⊢ (1 / 10)
< 1 |
| 31 | 26, 30 | eqbrtri 4674 |
. . . 4
⊢
(abs‘(1 / 10)) < 1 |
| 32 | | geoisum1c 14611 |
. . . 4
⊢ ((9
∈ ℂ ∧ (1 / 10) ∈ ℂ ∧ (abs‘(1 / 10)) < 1)
→ Σ𝑘 ∈
ℕ (9 · ((1 / 10)↑𝑘)) = ((9 · (1 / 10)) / (1 − (1 /
10)))) |
| 33 | 12, 21, 31, 32 | mp3an 1424 |
. . 3
⊢
Σ𝑘 ∈
ℕ (9 · ((1 / 10)↑𝑘)) = ((9 · (1 / 10)) / (1 − (1 /
10))) |
| 34 | 12, 2, 8 | divreci 10770 |
. . . 4
⊢ (9 / 10)
= (9 · (1 / 10)) |
| 35 | 12, 2, 8 | divcan2i 10768 |
. . . . . 6
⊢ (10
· (9 / 10)) = 9 |
| 36 | | ax-1cn 9994 |
. . . . . . . 8
⊢ 1 ∈
ℂ |
| 37 | 2, 36, 21 | subdii 10479 |
. . . . . . 7
⊢ (10
· (1 − (1 / 10))) = ((10 · 1) − (10 · (1 /
10))) |
| 38 | 2 | mulid1i 10042 |
. . . . . . . 8
⊢ (10
· 1) = 10 |
| 39 | 2, 8 | recidi 10756 |
. . . . . . . 8
⊢ (10
· (1 / 10)) = 1 |
| 40 | 38, 39 | oveq12i 6662 |
. . . . . . 7
⊢ ((10
· 1) − (10 · (1 / 10))) = (10 − 1) |
| 41 | 36, 12 | addcomi 10227 |
. . . . . . . . 9
⊢ (1 + 9) =
(9 + 1) |
| 42 | | df-10OLD 11087 |
. . . . . . . . 9
⊢ 10 = (9 +
1) |
| 43 | 41, 42 | eqtr4i 2647 |
. . . . . . . 8
⊢ (1 + 9) =
10 |
| 44 | 2, 36, 12, 43 | subaddrii 10370 |
. . . . . . 7
⊢ (10
− 1) = 9 |
| 45 | 37, 40, 44 | 3eqtrri 2649 |
. . . . . 6
⊢ 9 = (10
· (1 − (1 / 10))) |
| 46 | 35, 45 | eqtri 2644 |
. . . . 5
⊢ (10
· (9 / 10)) = (10 · (1 − (1 / 10))) |
| 47 | | 9re 11107 |
. . . . . . . 8
⊢ 9 ∈
ℝ |
| 48 | 47, 1, 8 | redivcli 10792 |
. . . . . . 7
⊢ (9 / 10)
∈ ℝ |
| 49 | 48 | recni 10052 |
. . . . . 6
⊢ (9 / 10)
∈ ℂ |
| 50 | 36, 21 | subcli 10357 |
. . . . . 6
⊢ (1
− (1 / 10)) ∈ ℂ |
| 51 | 49, 50, 2, 8 | mulcani 10666 |
. . . . 5
⊢ ((10
· (9 / 10)) = (10 · (1 − (1 / 10))) ↔ (9 / 10) = (1
− (1 / 10))) |
| 52 | 46, 51 | mpbi 220 |
. . . 4
⊢ (9 / 10)
= (1 − (1 / 10)) |
| 53 | 34, 52 | oveq12i 6662 |
. . 3
⊢ ((9 / 10)
/ (9 / 10)) = ((9 · (1 / 10)) / (1 − (1 / 10))) |
| 54 | | 9pos 11122 |
. . . . . 6
⊢ 0 <
9 |
| 55 | 47, 1, 54, 7 | divgt0ii 10941 |
. . . . 5
⊢ 0 < (9
/ 10) |
| 56 | 48, 55 | gt0ne0ii 10564 |
. . . 4
⊢ (9 / 10)
≠ 0 |
| 57 | 49, 56 | dividi 10758 |
. . 3
⊢ ((9 / 10)
/ (9 / 10)) = 1 |
| 58 | 33, 53, 57 | 3eqtr2i 2650 |
. 2
⊢
Σ𝑘 ∈
ℕ (9 · ((1 / 10)↑𝑘)) = 1 |
| 59 | 19, 58 | eqtri 2644 |
1
⊢
Σ𝑘 ∈
ℕ (9 / (10↑𝑘)) =
1 |