Proof of Theorem rpnnen2lem11
| Step | Hyp | Ref
| Expression |
| 1 | | rpnnen2.3 |
. . . 4
⊢ (𝜑 → 𝐵 ⊆ ℕ) |
| 2 | | rpnnen2.2 |
. . . . 5
⊢ (𝜑 → 𝐴 ⊆ ℕ) |
| 3 | | rpnnen2.4 |
. . . . 5
⊢ (𝜑 → 𝑚 ∈ (𝐴 ∖ 𝐵)) |
| 4 | | eldifi 4131 |
. . . . . 6
⊢ (𝑚 ∈ (𝐴 ∖ 𝐵) → 𝑚 ∈ 𝐴) |
| 5 | | ssel2 3978 |
. . . . . 6
⊢ ((𝐴 ⊆ ℕ ∧ 𝑚 ∈ 𝐴) → 𝑚 ∈ ℕ) |
| 6 | 4, 5 | sylan2 593 |
. . . . 5
⊢ ((𝐴 ⊆ ℕ ∧ 𝑚 ∈ (𝐴 ∖ 𝐵)) → 𝑚 ∈ ℕ) |
| 7 | 2, 3, 6 | syl2anc 584 |
. . . 4
⊢ (𝜑 → 𝑚 ∈ ℕ) |
| 8 | | rpnnen2.1 |
. . . . 5
⊢ 𝐹 = (𝑥 ∈ 𝒫 ℕ ↦ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ 𝑥, ((1 / 3)↑𝑛), 0))) |
| 9 | 8 | rpnnen2lem6 16255 |
. . . 4
⊢ ((𝐵 ⊆ ℕ ∧ 𝑚 ∈ ℕ) →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ∈ ℝ) |
| 10 | 1, 7, 9 | syl2anc 584 |
. . 3
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ∈ ℝ) |
| 11 | | 3nn 12345 |
. . . . . 6
⊢ 3 ∈
ℕ |
| 12 | | nnrecre 12308 |
. . . . . 6
⊢ (3 ∈
ℕ → (1 / 3) ∈ ℝ) |
| 13 | 11, 12 | ax-mp 5 |
. . . . 5
⊢ (1 / 3)
∈ ℝ |
| 14 | 7 | nnnn0d 12587 |
. . . . 5
⊢ (𝜑 → 𝑚 ∈ ℕ0) |
| 15 | | reexpcl 14119 |
. . . . 5
⊢ (((1 / 3)
∈ ℝ ∧ 𝑚
∈ ℕ0) → ((1 / 3)↑𝑚) ∈ ℝ) |
| 16 | 13, 14, 15 | sylancr 587 |
. . . 4
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℝ) |
| 17 | 8 | rpnnen2lem6 16255 |
. . . . 5
⊢ ((𝐴 ⊆ ℕ ∧ 𝑚 ∈ ℕ) →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ∈ ℝ) |
| 18 | 2, 7, 17 | syl2anc 584 |
. . . 4
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ∈ ℝ) |
| 19 | | nnrp 13046 |
. . . . . . . . 9
⊢ (3 ∈
ℕ → 3 ∈ ℝ+) |
| 20 | | rpreccl 13061 |
. . . . . . . . 9
⊢ (3 ∈
ℝ+ → (1 / 3) ∈ ℝ+) |
| 21 | 11, 19, 20 | mp2b 10 |
. . . . . . . 8
⊢ (1 / 3)
∈ ℝ+ |
| 22 | 7 | nnzd 12640 |
. . . . . . . 8
⊢ (𝜑 → 𝑚 ∈ ℤ) |
| 23 | | rpexpcl 14121 |
. . . . . . . 8
⊢ (((1 / 3)
∈ ℝ+ ∧ 𝑚 ∈ ℤ) → ((1 / 3)↑𝑚) ∈
ℝ+) |
| 24 | 21, 22, 23 | sylancr 587 |
. . . . . . 7
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℝ+) |
| 25 | 24 | rpred 13077 |
. . . . . 6
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℝ) |
| 26 | 25 | rehalfcld 12513 |
. . . . 5
⊢ (𝜑 → (((1 / 3)↑𝑚) / 2) ∈
ℝ) |
| 27 | 3 | snssd 4809 |
. . . . . . . . 9
⊢ (𝜑 → {𝑚} ⊆ (𝐴 ∖ 𝐵)) |
| 28 | 2 | ssdifd 4145 |
. . . . . . . . 9
⊢ (𝜑 → (𝐴 ∖ 𝐵) ⊆ (ℕ ∖ 𝐵)) |
| 29 | 27, 28 | sstrd 3994 |
. . . . . . . 8
⊢ (𝜑 → {𝑚} ⊆ (ℕ ∖ 𝐵)) |
| 30 | 7 | snssd 4809 |
. . . . . . . . 9
⊢ (𝜑 → {𝑚} ⊆ ℕ) |
| 31 | | ssconb 4142 |
. . . . . . . . 9
⊢ ((𝐵 ⊆ ℕ ∧ {𝑚} ⊆ ℕ) → (𝐵 ⊆ (ℕ ∖ {𝑚}) ↔ {𝑚} ⊆ (ℕ ∖ 𝐵))) |
| 32 | 1, 30, 31 | syl2anc 584 |
. . . . . . . 8
⊢ (𝜑 → (𝐵 ⊆ (ℕ ∖ {𝑚}) ↔ {𝑚} ⊆ (ℕ ∖ 𝐵))) |
| 33 | 29, 32 | mpbird 257 |
. . . . . . 7
⊢ (𝜑 → 𝐵 ⊆ (ℕ ∖ {𝑚})) |
| 34 | | difssd 4137 |
. . . . . . 7
⊢ (𝜑 → (ℕ ∖ {𝑚}) ⊆
ℕ) |
| 35 | 8 | rpnnen2lem7 16256 |
. . . . . . 7
⊢ ((𝐵 ⊆ (ℕ ∖ {𝑚}) ∧ (ℕ ∖ {𝑚}) ⊆ ℕ ∧ 𝑚 ∈ ℕ) →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘)) |
| 36 | 33, 34, 7, 35 | syl3anc 1373 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘)) |
| 37 | 8 | rpnnen2lem9 16258 |
. . . . . . . 8
⊢ (𝑚 ∈ ℕ →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘) = (0 + (((1 / 3)↑(𝑚 + 1)) / (1 − (1 /
3))))) |
| 38 | 7, 37 | syl 17 |
. . . . . . 7
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘) = (0 + (((1 / 3)↑(𝑚 + 1)) / (1 − (1 /
3))))) |
| 39 | 13 | recni 11275 |
. . . . . . . . . . . 12
⊢ (1 / 3)
∈ ℂ |
| 40 | | expp1 14109 |
. . . . . . . . . . . 12
⊢ (((1 / 3)
∈ ℂ ∧ 𝑚
∈ ℕ0) → ((1 / 3)↑(𝑚 + 1)) = (((1 / 3)↑𝑚) · (1 / 3))) |
| 41 | 39, 14, 40 | sylancr 587 |
. . . . . . . . . . 11
⊢ (𝜑 → ((1 / 3)↑(𝑚 + 1)) = (((1 / 3)↑𝑚) · (1 /
3))) |
| 42 | 25 | recnd 11289 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℂ) |
| 43 | | 3cn 12347 |
. . . . . . . . . . . . 13
⊢ 3 ∈
ℂ |
| 44 | | 3ne0 12372 |
. . . . . . . . . . . . 13
⊢ 3 ≠
0 |
| 45 | | divrec 11938 |
. . . . . . . . . . . . 13
⊢ ((((1 /
3)↑𝑚) ∈ ℂ
∧ 3 ∈ ℂ ∧ 3 ≠ 0) → (((1 / 3)↑𝑚) / 3) = (((1 / 3)↑𝑚) · (1 / 3))) |
| 46 | 43, 44, 45 | mp3an23 1455 |
. . . . . . . . . . . 12
⊢ (((1 /
3)↑𝑚) ∈ ℂ
→ (((1 / 3)↑𝑚) /
3) = (((1 / 3)↑𝑚)
· (1 / 3))) |
| 47 | 42, 46 | syl 17 |
. . . . . . . . . . 11
⊢ (𝜑 → (((1 / 3)↑𝑚) / 3) = (((1 / 3)↑𝑚) · (1 /
3))) |
| 48 | 41, 47 | eqtr4d 2780 |
. . . . . . . . . 10
⊢ (𝜑 → ((1 / 3)↑(𝑚 + 1)) = (((1 / 3)↑𝑚) / 3)) |
| 49 | 48 | oveq1d 7446 |
. . . . . . . . 9
⊢ (𝜑 → (((1 / 3)↑(𝑚 + 1)) / (1 − (1 / 3))) =
((((1 / 3)↑𝑚) / 3) /
(1 − (1 / 3)))) |
| 50 | | ax-1cn 11213 |
. . . . . . . . . . . . 13
⊢ 1 ∈
ℂ |
| 51 | 43, 44 | pm3.2i 470 |
. . . . . . . . . . . . 13
⊢ (3 ∈
ℂ ∧ 3 ≠ 0) |
| 52 | | divsubdir 11961 |
. . . . . . . . . . . . 13
⊢ ((3
∈ ℂ ∧ 1 ∈ ℂ ∧ (3 ∈ ℂ ∧ 3 ≠ 0))
→ ((3 − 1) / 3) = ((3 / 3) − (1 / 3))) |
| 53 | 43, 50, 51, 52 | mp3an 1463 |
. . . . . . . . . . . 12
⊢ ((3
− 1) / 3) = ((3 / 3) − (1 / 3)) |
| 54 | | 3m1e2 12394 |
. . . . . . . . . . . . 13
⊢ (3
− 1) = 2 |
| 55 | 54 | oveq1i 7441 |
. . . . . . . . . . . 12
⊢ ((3
− 1) / 3) = (2 / 3) |
| 56 | 43, 44 | dividi 12000 |
. . . . . . . . . . . . 13
⊢ (3 / 3) =
1 |
| 57 | 56 | oveq1i 7441 |
. . . . . . . . . . . 12
⊢ ((3 / 3)
− (1 / 3)) = (1 − (1 / 3)) |
| 58 | 53, 55, 57 | 3eqtr3ri 2774 |
. . . . . . . . . . 11
⊢ (1
− (1 / 3)) = (2 / 3) |
| 59 | 58 | oveq2i 7442 |
. . . . . . . . . 10
⊢ ((((1 /
3)↑𝑚) / 3) / (1
− (1 / 3))) = ((((1 / 3)↑𝑚) / 3) / (2 / 3)) |
| 60 | | 2cnne0 12476 |
. . . . . . . . . . . 12
⊢ (2 ∈
ℂ ∧ 2 ≠ 0) |
| 61 | | divcan7 11976 |
. . . . . . . . . . . 12
⊢ ((((1 /
3)↑𝑚) ∈ ℂ
∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (3 ∈ ℂ ∧ 3 ≠
0)) → ((((1 / 3)↑𝑚) / 3) / (2 / 3)) = (((1 / 3)↑𝑚) / 2)) |
| 62 | 60, 51, 61 | mp3an23 1455 |
. . . . . . . . . . 11
⊢ (((1 /
3)↑𝑚) ∈ ℂ
→ ((((1 / 3)↑𝑚) /
3) / (2 / 3)) = (((1 / 3)↑𝑚) / 2)) |
| 63 | 42, 62 | syl 17 |
. . . . . . . . . 10
⊢ (𝜑 → ((((1 / 3)↑𝑚) / 3) / (2 / 3)) = (((1 /
3)↑𝑚) /
2)) |
| 64 | 59, 63 | eqtrid 2789 |
. . . . . . . . 9
⊢ (𝜑 → ((((1 / 3)↑𝑚) / 3) / (1 − (1 / 3))) =
(((1 / 3)↑𝑚) /
2)) |
| 65 | 49, 64 | eqtrd 2777 |
. . . . . . . 8
⊢ (𝜑 → (((1 / 3)↑(𝑚 + 1)) / (1 − (1 / 3))) =
(((1 / 3)↑𝑚) /
2)) |
| 66 | 65 | oveq2d 7447 |
. . . . . . 7
⊢ (𝜑 → (0 + (((1 / 3)↑(𝑚 + 1)) / (1 − (1 / 3)))) =
(0 + (((1 / 3)↑𝑚) /
2))) |
| 67 | 26 | recnd 11289 |
. . . . . . . 8
⊢ (𝜑 → (((1 / 3)↑𝑚) / 2) ∈
ℂ) |
| 68 | 67 | addlidd 11462 |
. . . . . . 7
⊢ (𝜑 → (0 + (((1 / 3)↑𝑚) / 2)) = (((1 / 3)↑𝑚) / 2)) |
| 69 | 38, 66, 68 | 3eqtrd 2781 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘) = (((1 / 3)↑𝑚) / 2)) |
| 70 | 36, 69 | breqtrd 5169 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ≤ (((1 / 3)↑𝑚) / 2)) |
| 71 | | rphalflt 13064 |
. . . . . 6
⊢ (((1 /
3)↑𝑚) ∈
ℝ+ → (((1 / 3)↑𝑚) / 2) < ((1 / 3)↑𝑚)) |
| 72 | 24, 71 | syl 17 |
. . . . 5
⊢ (𝜑 → (((1 / 3)↑𝑚) / 2) < ((1 / 3)↑𝑚)) |
| 73 | 10, 26, 25, 70, 72 | lelttrd 11419 |
. . . 4
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) < ((1 / 3)↑𝑚)) |
| 74 | | eluznn 12960 |
. . . . . . . . 9
⊢ ((𝑚 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘𝑚)) → 𝑘 ∈ ℕ) |
| 75 | 7, 74 | sylan 580 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ≥‘𝑚)) → 𝑘 ∈ ℕ) |
| 76 | 8 | rpnnen2lem1 16250 |
. . . . . . . 8
⊢ (({𝑚} ⊆ ℕ ∧ 𝑘 ∈ ℕ) → ((𝐹‘{𝑚})‘𝑘) = if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
| 77 | 30, 75, 76 | syl2an2r 685 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ≥‘𝑚)) → ((𝐹‘{𝑚})‘𝑘) = if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
| 78 | 77 | sumeq2dv 15738 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
| 79 | | uzid 12893 |
. . . . . . . . 9
⊢ (𝑚 ∈ ℤ → 𝑚 ∈
(ℤ≥‘𝑚)) |
| 80 | 22, 79 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → 𝑚 ∈ (ℤ≥‘𝑚)) |
| 81 | 80 | snssd 4809 |
. . . . . . 7
⊢ (𝜑 → {𝑚} ⊆ (ℤ≥‘𝑚)) |
| 82 | | vex 3484 |
. . . . . . . . 9
⊢ 𝑚 ∈ V |
| 83 | | oveq2 7439 |
. . . . . . . . . 10
⊢ (𝑘 = 𝑚 → ((1 / 3)↑𝑘) = ((1 / 3)↑𝑚)) |
| 84 | 83 | eleq1d 2826 |
. . . . . . . . 9
⊢ (𝑘 = 𝑚 → (((1 / 3)↑𝑘) ∈ ℂ ↔ ((1 / 3)↑𝑚) ∈
ℂ)) |
| 85 | 82, 84 | ralsn 4681 |
. . . . . . . 8
⊢
(∀𝑘 ∈
{𝑚} ((1 / 3)↑𝑘) ∈ ℂ ↔ ((1 /
3)↑𝑚) ∈
ℂ) |
| 86 | 42, 85 | sylibr 234 |
. . . . . . 7
⊢ (𝜑 → ∀𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) ∈ ℂ) |
| 87 | | ssidd 4007 |
. . . . . . . 8
⊢ (𝜑 →
(ℤ≥‘𝑚) ⊆ (ℤ≥‘𝑚)) |
| 88 | 87 | orcd 874 |
. . . . . . 7
⊢ (𝜑 →
((ℤ≥‘𝑚) ⊆ (ℤ≥‘𝑚) ∨
(ℤ≥‘𝑚) ∈ Fin)) |
| 89 | | sumss2 15762 |
. . . . . . 7
⊢ ((({𝑚} ⊆
(ℤ≥‘𝑚) ∧ ∀𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) ∈ ℂ) ∧
((ℤ≥‘𝑚) ⊆ (ℤ≥‘𝑚) ∨
(ℤ≥‘𝑚) ∈ Fin)) → Σ𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
| 90 | 81, 86, 88, 89 | syl21anc 838 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
| 91 | 83 | sumsn 15782 |
. . . . . . 7
⊢ ((𝑚 ∈ ℕ ∧ ((1 /
3)↑𝑚) ∈ ℂ)
→ Σ𝑘 ∈
{𝑚} ((1 / 3)↑𝑘) = ((1 / 3)↑𝑚)) |
| 92 | 7, 42, 91 | syl2anc 584 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) = ((1 / 3)↑𝑚)) |
| 93 | 78, 90, 92 | 3eqtr2d 2783 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) = ((1 / 3)↑𝑚)) |
| 94 | 3, 4 | syl 17 |
. . . . . . 7
⊢ (𝜑 → 𝑚 ∈ 𝐴) |
| 95 | 94 | snssd 4809 |
. . . . . 6
⊢ (𝜑 → {𝑚} ⊆ 𝐴) |
| 96 | 8 | rpnnen2lem7 16256 |
. . . . . 6
⊢ (({𝑚} ⊆ 𝐴 ∧ 𝐴 ⊆ ℕ ∧ 𝑚 ∈ ℕ) → Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
| 97 | 95, 2, 7, 96 | syl3anc 1373 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
| 98 | 93, 97 | eqbrtrrd 5167 |
. . . 4
⊢ (𝜑 → ((1 / 3)↑𝑚) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
| 99 | 10, 16, 18, 73, 98 | ltletrd 11421 |
. . 3
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) < Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
| 100 | 10, 99 | gtned 11396 |
. 2
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ≠ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘)) |
| 101 | | rpnnen2.5 |
. . . . 5
⊢ (𝜑 → ∀𝑛 ∈ ℕ (𝑛 < 𝑚 → (𝑛 ∈ 𝐴 ↔ 𝑛 ∈ 𝐵))) |
| 102 | | rpnnen2.6 |
. . . . 5
⊢ (𝜓 ↔ Σ𝑘 ∈ ℕ ((𝐹‘𝐴)‘𝑘) = Σ𝑘 ∈ ℕ ((𝐹‘𝐵)‘𝑘)) |
| 103 | 8, 2, 1, 3, 101, 102 | rpnnen2lem10 16259 |
. . . 4
⊢ ((𝜑 ∧ 𝜓) → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘)) |
| 104 | 103 | ex 412 |
. . 3
⊢ (𝜑 → (𝜓 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘))) |
| 105 | 104 | necon3ad 2953 |
. 2
⊢ (𝜑 → (Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ≠ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) → ¬ 𝜓)) |
| 106 | 100, 105 | mpd 15 |
1
⊢ (𝜑 → ¬ 𝜓) |