Proof of Theorem rpnnen2lem11
Step | Hyp | Ref
| Expression |
1 | | rpnnen2.3 |
. . . 4
⊢ (𝜑 → 𝐵 ⊆ ℕ) |
2 | | rpnnen2.2 |
. . . . 5
⊢ (𝜑 → 𝐴 ⊆ ℕ) |
3 | | rpnnen2.4 |
. . . . 5
⊢ (𝜑 → 𝑚 ∈ (𝐴 ∖ 𝐵)) |
4 | | eldifi 4057 |
. . . . . 6
⊢ (𝑚 ∈ (𝐴 ∖ 𝐵) → 𝑚 ∈ 𝐴) |
5 | | ssel2 3912 |
. . . . . 6
⊢ ((𝐴 ⊆ ℕ ∧ 𝑚 ∈ 𝐴) → 𝑚 ∈ ℕ) |
6 | 4, 5 | sylan2 592 |
. . . . 5
⊢ ((𝐴 ⊆ ℕ ∧ 𝑚 ∈ (𝐴 ∖ 𝐵)) → 𝑚 ∈ ℕ) |
7 | 2, 3, 6 | syl2anc 583 |
. . . 4
⊢ (𝜑 → 𝑚 ∈ ℕ) |
8 | | rpnnen2.1 |
. . . . 5
⊢ 𝐹 = (𝑥 ∈ 𝒫 ℕ ↦ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ 𝑥, ((1 / 3)↑𝑛), 0))) |
9 | 8 | rpnnen2lem6 15856 |
. . . 4
⊢ ((𝐵 ⊆ ℕ ∧ 𝑚 ∈ ℕ) →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ∈ ℝ) |
10 | 1, 7, 9 | syl2anc 583 |
. . 3
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ∈ ℝ) |
11 | | 3nn 11982 |
. . . . . 6
⊢ 3 ∈
ℕ |
12 | | nnrecre 11945 |
. . . . . 6
⊢ (3 ∈
ℕ → (1 / 3) ∈ ℝ) |
13 | 11, 12 | ax-mp 5 |
. . . . 5
⊢ (1 / 3)
∈ ℝ |
14 | 7 | nnnn0d 12223 |
. . . . 5
⊢ (𝜑 → 𝑚 ∈ ℕ0) |
15 | | reexpcl 13727 |
. . . . 5
⊢ (((1 / 3)
∈ ℝ ∧ 𝑚
∈ ℕ0) → ((1 / 3)↑𝑚) ∈ ℝ) |
16 | 13, 14, 15 | sylancr 586 |
. . . 4
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℝ) |
17 | 8 | rpnnen2lem6 15856 |
. . . . 5
⊢ ((𝐴 ⊆ ℕ ∧ 𝑚 ∈ ℕ) →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ∈ ℝ) |
18 | 2, 7, 17 | syl2anc 583 |
. . . 4
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ∈ ℝ) |
19 | | nnrp 12670 |
. . . . . . . . 9
⊢ (3 ∈
ℕ → 3 ∈ ℝ+) |
20 | | rpreccl 12685 |
. . . . . . . . 9
⊢ (3 ∈
ℝ+ → (1 / 3) ∈ ℝ+) |
21 | 11, 19, 20 | mp2b 10 |
. . . . . . . 8
⊢ (1 / 3)
∈ ℝ+ |
22 | 7 | nnzd 12354 |
. . . . . . . 8
⊢ (𝜑 → 𝑚 ∈ ℤ) |
23 | | rpexpcl 13729 |
. . . . . . . 8
⊢ (((1 / 3)
∈ ℝ+ ∧ 𝑚 ∈ ℤ) → ((1 / 3)↑𝑚) ∈
ℝ+) |
24 | 21, 22, 23 | sylancr 586 |
. . . . . . 7
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℝ+) |
25 | 24 | rpred 12701 |
. . . . . 6
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℝ) |
26 | 25 | rehalfcld 12150 |
. . . . 5
⊢ (𝜑 → (((1 / 3)↑𝑚) / 2) ∈
ℝ) |
27 | 3 | snssd 4739 |
. . . . . . . . 9
⊢ (𝜑 → {𝑚} ⊆ (𝐴 ∖ 𝐵)) |
28 | 2 | ssdifd 4071 |
. . . . . . . . 9
⊢ (𝜑 → (𝐴 ∖ 𝐵) ⊆ (ℕ ∖ 𝐵)) |
29 | 27, 28 | sstrd 3927 |
. . . . . . . 8
⊢ (𝜑 → {𝑚} ⊆ (ℕ ∖ 𝐵)) |
30 | 7 | snssd 4739 |
. . . . . . . . 9
⊢ (𝜑 → {𝑚} ⊆ ℕ) |
31 | | ssconb 4068 |
. . . . . . . . 9
⊢ ((𝐵 ⊆ ℕ ∧ {𝑚} ⊆ ℕ) → (𝐵 ⊆ (ℕ ∖ {𝑚}) ↔ {𝑚} ⊆ (ℕ ∖ 𝐵))) |
32 | 1, 30, 31 | syl2anc 583 |
. . . . . . . 8
⊢ (𝜑 → (𝐵 ⊆ (ℕ ∖ {𝑚}) ↔ {𝑚} ⊆ (ℕ ∖ 𝐵))) |
33 | 29, 32 | mpbird 256 |
. . . . . . 7
⊢ (𝜑 → 𝐵 ⊆ (ℕ ∖ {𝑚})) |
34 | | difssd 4063 |
. . . . . . 7
⊢ (𝜑 → (ℕ ∖ {𝑚}) ⊆
ℕ) |
35 | 8 | rpnnen2lem7 15857 |
. . . . . . 7
⊢ ((𝐵 ⊆ (ℕ ∖ {𝑚}) ∧ (ℕ ∖ {𝑚}) ⊆ ℕ ∧ 𝑚 ∈ ℕ) →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘)) |
36 | 33, 34, 7, 35 | syl3anc 1369 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘)) |
37 | 8 | rpnnen2lem9 15859 |
. . . . . . . 8
⊢ (𝑚 ∈ ℕ →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘) = (0 + (((1 / 3)↑(𝑚 + 1)) / (1 − (1 /
3))))) |
38 | 7, 37 | syl 17 |
. . . . . . 7
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘) = (0 + (((1 / 3)↑(𝑚 + 1)) / (1 − (1 /
3))))) |
39 | 13 | recni 10920 |
. . . . . . . . . . . 12
⊢ (1 / 3)
∈ ℂ |
40 | | expp1 13717 |
. . . . . . . . . . . 12
⊢ (((1 / 3)
∈ ℂ ∧ 𝑚
∈ ℕ0) → ((1 / 3)↑(𝑚 + 1)) = (((1 / 3)↑𝑚) · (1 / 3))) |
41 | 39, 14, 40 | sylancr 586 |
. . . . . . . . . . 11
⊢ (𝜑 → ((1 / 3)↑(𝑚 + 1)) = (((1 / 3)↑𝑚) · (1 /
3))) |
42 | 25 | recnd 10934 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℂ) |
43 | | 3cn 11984 |
. . . . . . . . . . . . 13
⊢ 3 ∈
ℂ |
44 | | 3ne0 12009 |
. . . . . . . . . . . . 13
⊢ 3 ≠
0 |
45 | | divrec 11579 |
. . . . . . . . . . . . 13
⊢ ((((1 /
3)↑𝑚) ∈ ℂ
∧ 3 ∈ ℂ ∧ 3 ≠ 0) → (((1 / 3)↑𝑚) / 3) = (((1 / 3)↑𝑚) · (1 / 3))) |
46 | 43, 44, 45 | mp3an23 1451 |
. . . . . . . . . . . 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 2781 |
. . . . . . . . . 10
⊢ (𝜑 → ((1 / 3)↑(𝑚 + 1)) = (((1 / 3)↑𝑚) / 3)) |
49 | 48 | oveq1d 7270 |
. . . . . . . . 9
⊢ (𝜑 → (((1 / 3)↑(𝑚 + 1)) / (1 − (1 / 3))) =
((((1 / 3)↑𝑚) / 3) /
(1 − (1 / 3)))) |
50 | | ax-1cn 10860 |
. . . . . . . . . . . . 13
⊢ 1 ∈
ℂ |
51 | 43, 44 | pm3.2i 470 |
. . . . . . . . . . . . 13
⊢ (3 ∈
ℂ ∧ 3 ≠ 0) |
52 | | divsubdir 11599 |
. . . . . . . . . . . . 13
⊢ ((3
∈ ℂ ∧ 1 ∈ ℂ ∧ (3 ∈ ℂ ∧ 3 ≠ 0))
→ ((3 − 1) / 3) = ((3 / 3) − (1 / 3))) |
53 | 43, 50, 51, 52 | mp3an 1459 |
. . . . . . . . . . . 12
⊢ ((3
− 1) / 3) = ((3 / 3) − (1 / 3)) |
54 | | 3m1e2 12031 |
. . . . . . . . . . . . 13
⊢ (3
− 1) = 2 |
55 | 54 | oveq1i 7265 |
. . . . . . . . . . . 12
⊢ ((3
− 1) / 3) = (2 / 3) |
56 | 43, 44 | dividi 11638 |
. . . . . . . . . . . . 13
⊢ (3 / 3) =
1 |
57 | 56 | oveq1i 7265 |
. . . . . . . . . . . 12
⊢ ((3 / 3)
− (1 / 3)) = (1 − (1 / 3)) |
58 | 53, 55, 57 | 3eqtr3ri 2775 |
. . . . . . . . . . 11
⊢ (1
− (1 / 3)) = (2 / 3) |
59 | 58 | oveq2i 7266 |
. . . . . . . . . 10
⊢ ((((1 /
3)↑𝑚) / 3) / (1
− (1 / 3))) = ((((1 / 3)↑𝑚) / 3) / (2 / 3)) |
60 | | 2cnne0 12113 |
. . . . . . . . . . . 12
⊢ (2 ∈
ℂ ∧ 2 ≠ 0) |
61 | | divcan7 11614 |
. . . . . . . . . . . 12
⊢ ((((1 /
3)↑𝑚) ∈ ℂ
∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (3 ∈ ℂ ∧ 3 ≠
0)) → ((((1 / 3)↑𝑚) / 3) / (2 / 3)) = (((1 / 3)↑𝑚) / 2)) |
62 | 60, 51, 61 | mp3an23 1451 |
. . . . . . . . . . 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 2790 |
. . . . . . . . 9
⊢ (𝜑 → ((((1 / 3)↑𝑚) / 3) / (1 − (1 / 3))) =
(((1 / 3)↑𝑚) /
2)) |
65 | 49, 64 | eqtrd 2778 |
. . . . . . . 8
⊢ (𝜑 → (((1 / 3)↑(𝑚 + 1)) / (1 − (1 / 3))) =
(((1 / 3)↑𝑚) /
2)) |
66 | 65 | oveq2d 7271 |
. . . . . . 7
⊢ (𝜑 → (0 + (((1 / 3)↑(𝑚 + 1)) / (1 − (1 / 3)))) =
(0 + (((1 / 3)↑𝑚) /
2))) |
67 | 26 | recnd 10934 |
. . . . . . . 8
⊢ (𝜑 → (((1 / 3)↑𝑚) / 2) ∈
ℂ) |
68 | 67 | addid2d 11106 |
. . . . . . 7
⊢ (𝜑 → (0 + (((1 / 3)↑𝑚) / 2)) = (((1 / 3)↑𝑚) / 2)) |
69 | 38, 66, 68 | 3eqtrd 2782 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘) = (((1 / 3)↑𝑚) / 2)) |
70 | 36, 69 | breqtrd 5096 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ≤ (((1 / 3)↑𝑚) / 2)) |
71 | | rphalflt 12688 |
. . . . . 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 11063 |
. . . 4
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) < ((1 / 3)↑𝑚)) |
74 | | eluznn 12587 |
. . . . . . . . 9
⊢ ((𝑚 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘𝑚)) → 𝑘 ∈ ℕ) |
75 | 7, 74 | sylan 579 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ≥‘𝑚)) → 𝑘 ∈ ℕ) |
76 | 8 | rpnnen2lem1 15851 |
. . . . . . . 8
⊢ (({𝑚} ⊆ ℕ ∧ 𝑘 ∈ ℕ) → ((𝐹‘{𝑚})‘𝑘) = if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
77 | 30, 75, 76 | syl2an2r 681 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ≥‘𝑚)) → ((𝐹‘{𝑚})‘𝑘) = if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
78 | 77 | sumeq2dv 15343 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
79 | | uzid 12526 |
. . . . . . . . 9
⊢ (𝑚 ∈ ℤ → 𝑚 ∈
(ℤ≥‘𝑚)) |
80 | 22, 79 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → 𝑚 ∈ (ℤ≥‘𝑚)) |
81 | 80 | snssd 4739 |
. . . . . . 7
⊢ (𝜑 → {𝑚} ⊆ (ℤ≥‘𝑚)) |
82 | | vex 3426 |
. . . . . . . . 9
⊢ 𝑚 ∈ V |
83 | | oveq2 7263 |
. . . . . . . . . 10
⊢ (𝑘 = 𝑚 → ((1 / 3)↑𝑘) = ((1 / 3)↑𝑚)) |
84 | 83 | eleq1d 2823 |
. . . . . . . . 9
⊢ (𝑘 = 𝑚 → (((1 / 3)↑𝑘) ∈ ℂ ↔ ((1 / 3)↑𝑚) ∈
ℂ)) |
85 | 82, 84 | ralsn 4614 |
. . . . . . . 8
⊢
(∀𝑘 ∈
{𝑚} ((1 / 3)↑𝑘) ∈ ℂ ↔ ((1 /
3)↑𝑚) ∈
ℂ) |
86 | 42, 85 | sylibr 233 |
. . . . . . 7
⊢ (𝜑 → ∀𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) ∈ ℂ) |
87 | | ssidd 3940 |
. . . . . . . 8
⊢ (𝜑 →
(ℤ≥‘𝑚) ⊆ (ℤ≥‘𝑚)) |
88 | 87 | orcd 869 |
. . . . . . 7
⊢ (𝜑 →
((ℤ≥‘𝑚) ⊆ (ℤ≥‘𝑚) ∨
(ℤ≥‘𝑚) ∈ Fin)) |
89 | | sumss2 15366 |
. . . . . . 7
⊢ ((({𝑚} ⊆
(ℤ≥‘𝑚) ∧ ∀𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) ∈ ℂ) ∧
((ℤ≥‘𝑚) ⊆ (ℤ≥‘𝑚) ∨
(ℤ≥‘𝑚) ∈ Fin)) → Σ𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
90 | 81, 86, 88, 89 | syl21anc 834 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
91 | 83 | sumsn 15386 |
. . . . . . 7
⊢ ((𝑚 ∈ ℕ ∧ ((1 /
3)↑𝑚) ∈ ℂ)
→ Σ𝑘 ∈
{𝑚} ((1 / 3)↑𝑘) = ((1 / 3)↑𝑚)) |
92 | 7, 42, 91 | syl2anc 583 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) = ((1 / 3)↑𝑚)) |
93 | 78, 90, 92 | 3eqtr2d 2784 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) = ((1 / 3)↑𝑚)) |
94 | 3, 4 | syl 17 |
. . . . . . 7
⊢ (𝜑 → 𝑚 ∈ 𝐴) |
95 | 94 | snssd 4739 |
. . . . . 6
⊢ (𝜑 → {𝑚} ⊆ 𝐴) |
96 | 8 | rpnnen2lem7 15857 |
. . . . . 6
⊢ (({𝑚} ⊆ 𝐴 ∧ 𝐴 ⊆ ℕ ∧ 𝑚 ∈ ℕ) → Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
97 | 95, 2, 7, 96 | syl3anc 1369 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
98 | 93, 97 | eqbrtrrd 5094 |
. . . 4
⊢ (𝜑 → ((1 / 3)↑𝑚) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
99 | 10, 16, 18, 73, 98 | ltletrd 11065 |
. . 3
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) < Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
100 | 10, 99 | gtned 11040 |
. 2
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ≠ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘)) |
101 | | rpnnen2.5 |
. . . . 5
⊢ (𝜑 → ∀𝑛 ∈ ℕ (𝑛 < 𝑚 → (𝑛 ∈ 𝐴 ↔ 𝑛 ∈ 𝐵))) |
102 | | rpnnen2.6 |
. . . . 5
⊢ (𝜓 ↔ Σ𝑘 ∈ ℕ ((𝐹‘𝐴)‘𝑘) = Σ𝑘 ∈ ℕ ((𝐹‘𝐵)‘𝑘)) |
103 | 8, 2, 1, 3, 101, 102 | rpnnen2lem10 15860 |
. . . 4
⊢ ((𝜑 ∧ 𝜓) → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘)) |
104 | 103 | ex 412 |
. . 3
⊢ (𝜑 → (𝜓 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘))) |
105 | 104 | necon3ad 2955 |
. 2
⊢ (𝜑 → (Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ≠ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) → ¬ 𝜓)) |
106 | 100, 105 | mpd 15 |
1
⊢ (𝜑 → ¬ 𝜓) |