Proof of Theorem rpnnen2lem11
Step | Hyp | Ref
| Expression |
1 | | rpnnen2.3 |
. . . 4
⊢ (𝜑 → 𝐵 ⊆ ℕ) |
2 | | rpnnen2.2 |
. . . . 5
⊢ (𝜑 → 𝐴 ⊆ ℕ) |
3 | | rpnnen2.4 |
. . . . 5
⊢ (𝜑 → 𝑚 ∈ (𝐴 ∖ 𝐵)) |
4 | | eldifi 4086 |
. . . . . 6
⊢ (𝑚 ∈ (𝐴 ∖ 𝐵) → 𝑚 ∈ 𝐴) |
5 | | ssel2 3939 |
. . . . . 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 16101 |
. . . 4
⊢ ((𝐵 ⊆ ℕ ∧ 𝑚 ∈ ℕ) →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ∈ ℝ) |
10 | 1, 7, 9 | syl2anc 584 |
. . 3
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ∈ ℝ) |
11 | | 3nn 12232 |
. . . . . 6
⊢ 3 ∈
ℕ |
12 | | nnrecre 12195 |
. . . . . 6
⊢ (3 ∈
ℕ → (1 / 3) ∈ ℝ) |
13 | 11, 12 | ax-mp 5 |
. . . . 5
⊢ (1 / 3)
∈ ℝ |
14 | 7 | nnnn0d 12473 |
. . . . 5
⊢ (𝜑 → 𝑚 ∈ ℕ0) |
15 | | reexpcl 13984 |
. . . . 5
⊢ (((1 / 3)
∈ ℝ ∧ 𝑚
∈ ℕ0) → ((1 / 3)↑𝑚) ∈ ℝ) |
16 | 13, 14, 15 | sylancr 587 |
. . . 4
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℝ) |
17 | 8 | rpnnen2lem6 16101 |
. . . . 5
⊢ ((𝐴 ⊆ ℕ ∧ 𝑚 ∈ ℕ) →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ∈ ℝ) |
18 | 2, 7, 17 | syl2anc 584 |
. . . 4
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ∈ ℝ) |
19 | | nnrp 12926 |
. . . . . . . . 9
⊢ (3 ∈
ℕ → 3 ∈ ℝ+) |
20 | | rpreccl 12941 |
. . . . . . . . 9
⊢ (3 ∈
ℝ+ → (1 / 3) ∈ ℝ+) |
21 | 11, 19, 20 | mp2b 10 |
. . . . . . . 8
⊢ (1 / 3)
∈ ℝ+ |
22 | 7 | nnzd 12526 |
. . . . . . . 8
⊢ (𝜑 → 𝑚 ∈ ℤ) |
23 | | rpexpcl 13986 |
. . . . . . . 8
⊢ (((1 / 3)
∈ ℝ+ ∧ 𝑚 ∈ ℤ) → ((1 / 3)↑𝑚) ∈
ℝ+) |
24 | 21, 22, 23 | sylancr 587 |
. . . . . . 7
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℝ+) |
25 | 24 | rpred 12957 |
. . . . . 6
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℝ) |
26 | 25 | rehalfcld 12400 |
. . . . 5
⊢ (𝜑 → (((1 / 3)↑𝑚) / 2) ∈
ℝ) |
27 | 3 | snssd 4769 |
. . . . . . . . 9
⊢ (𝜑 → {𝑚} ⊆ (𝐴 ∖ 𝐵)) |
28 | 2 | ssdifd 4100 |
. . . . . . . . 9
⊢ (𝜑 → (𝐴 ∖ 𝐵) ⊆ (ℕ ∖ 𝐵)) |
29 | 27, 28 | sstrd 3954 |
. . . . . . . 8
⊢ (𝜑 → {𝑚} ⊆ (ℕ ∖ 𝐵)) |
30 | 7 | snssd 4769 |
. . . . . . . . 9
⊢ (𝜑 → {𝑚} ⊆ ℕ) |
31 | | ssconb 4097 |
. . . . . . . . 9
⊢ ((𝐵 ⊆ ℕ ∧ {𝑚} ⊆ ℕ) → (𝐵 ⊆ (ℕ ∖ {𝑚}) ↔ {𝑚} ⊆ (ℕ ∖ 𝐵))) |
32 | 1, 30, 31 | syl2anc 584 |
. . . . . . . 8
⊢ (𝜑 → (𝐵 ⊆ (ℕ ∖ {𝑚}) ↔ {𝑚} ⊆ (ℕ ∖ 𝐵))) |
33 | 29, 32 | mpbird 256 |
. . . . . . 7
⊢ (𝜑 → 𝐵 ⊆ (ℕ ∖ {𝑚})) |
34 | | difssd 4092 |
. . . . . . 7
⊢ (𝜑 → (ℕ ∖ {𝑚}) ⊆
ℕ) |
35 | 8 | rpnnen2lem7 16102 |
. . . . . . 7
⊢ ((𝐵 ⊆ (ℕ ∖ {𝑚}) ∧ (ℕ ∖ {𝑚}) ⊆ ℕ ∧ 𝑚 ∈ ℕ) →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘)) |
36 | 33, 34, 7, 35 | syl3anc 1371 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘)) |
37 | 8 | rpnnen2lem9 16104 |
. . . . . . . 8
⊢ (𝑚 ∈ ℕ →
Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘) = (0 + (((1 / 3)↑(𝑚 + 1)) / (1 − (1 /
3))))) |
38 | 7, 37 | syl 17 |
. . . . . . 7
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘) = (0 + (((1 / 3)↑(𝑚 + 1)) / (1 − (1 /
3))))) |
39 | 13 | recni 11169 |
. . . . . . . . . . . 12
⊢ (1 / 3)
∈ ℂ |
40 | | expp1 13974 |
. . . . . . . . . . . 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 11183 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((1 / 3)↑𝑚) ∈
ℂ) |
43 | | 3cn 12234 |
. . . . . . . . . . . . 13
⊢ 3 ∈
ℂ |
44 | | 3ne0 12259 |
. . . . . . . . . . . . 13
⊢ 3 ≠
0 |
45 | | divrec 11829 |
. . . . . . . . . . . . 13
⊢ ((((1 /
3)↑𝑚) ∈ ℂ
∧ 3 ∈ ℂ ∧ 3 ≠ 0) → (((1 / 3)↑𝑚) / 3) = (((1 / 3)↑𝑚) · (1 / 3))) |
46 | 43, 44, 45 | mp3an23 1453 |
. . . . . . . . . . . 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 2779 |
. . . . . . . . . 10
⊢ (𝜑 → ((1 / 3)↑(𝑚 + 1)) = (((1 / 3)↑𝑚) / 3)) |
49 | 48 | oveq1d 7372 |
. . . . . . . . 9
⊢ (𝜑 → (((1 / 3)↑(𝑚 + 1)) / (1 − (1 / 3))) =
((((1 / 3)↑𝑚) / 3) /
(1 − (1 / 3)))) |
50 | | ax-1cn 11109 |
. . . . . . . . . . . . 13
⊢ 1 ∈
ℂ |
51 | 43, 44 | pm3.2i 471 |
. . . . . . . . . . . . 13
⊢ (3 ∈
ℂ ∧ 3 ≠ 0) |
52 | | divsubdir 11849 |
. . . . . . . . . . . . 13
⊢ ((3
∈ ℂ ∧ 1 ∈ ℂ ∧ (3 ∈ ℂ ∧ 3 ≠ 0))
→ ((3 − 1) / 3) = ((3 / 3) − (1 / 3))) |
53 | 43, 50, 51, 52 | mp3an 1461 |
. . . . . . . . . . . 12
⊢ ((3
− 1) / 3) = ((3 / 3) − (1 / 3)) |
54 | | 3m1e2 12281 |
. . . . . . . . . . . . 13
⊢ (3
− 1) = 2 |
55 | 54 | oveq1i 7367 |
. . . . . . . . . . . 12
⊢ ((3
− 1) / 3) = (2 / 3) |
56 | 43, 44 | dividi 11888 |
. . . . . . . . . . . . 13
⊢ (3 / 3) =
1 |
57 | 56 | oveq1i 7367 |
. . . . . . . . . . . 12
⊢ ((3 / 3)
− (1 / 3)) = (1 − (1 / 3)) |
58 | 53, 55, 57 | 3eqtr3ri 2773 |
. . . . . . . . . . 11
⊢ (1
− (1 / 3)) = (2 / 3) |
59 | 58 | oveq2i 7368 |
. . . . . . . . . 10
⊢ ((((1 /
3)↑𝑚) / 3) / (1
− (1 / 3))) = ((((1 / 3)↑𝑚) / 3) / (2 / 3)) |
60 | | 2cnne0 12363 |
. . . . . . . . . . . 12
⊢ (2 ∈
ℂ ∧ 2 ≠ 0) |
61 | | divcan7 11864 |
. . . . . . . . . . . 12
⊢ ((((1 /
3)↑𝑚) ∈ ℂ
∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (3 ∈ ℂ ∧ 3 ≠
0)) → ((((1 / 3)↑𝑚) / 3) / (2 / 3)) = (((1 / 3)↑𝑚) / 2)) |
62 | 60, 51, 61 | mp3an23 1453 |
. . . . . . . . . . 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 2788 |
. . . . . . . . 9
⊢ (𝜑 → ((((1 / 3)↑𝑚) / 3) / (1 − (1 / 3))) =
(((1 / 3)↑𝑚) /
2)) |
65 | 49, 64 | eqtrd 2776 |
. . . . . . . 8
⊢ (𝜑 → (((1 / 3)↑(𝑚 + 1)) / (1 − (1 / 3))) =
(((1 / 3)↑𝑚) /
2)) |
66 | 65 | oveq2d 7373 |
. . . . . . 7
⊢ (𝜑 → (0 + (((1 / 3)↑(𝑚 + 1)) / (1 − (1 / 3)))) =
(0 + (((1 / 3)↑𝑚) /
2))) |
67 | 26 | recnd 11183 |
. . . . . . . 8
⊢ (𝜑 → (((1 / 3)↑𝑚) / 2) ∈
ℂ) |
68 | 67 | addid2d 11356 |
. . . . . . 7
⊢ (𝜑 → (0 + (((1 / 3)↑𝑚) / 2)) = (((1 / 3)↑𝑚) / 2)) |
69 | 38, 66, 68 | 3eqtrd 2780 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘(ℕ ∖ {𝑚}))‘𝑘) = (((1 / 3)↑𝑚) / 2)) |
70 | 36, 69 | breqtrd 5131 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) ≤ (((1 / 3)↑𝑚) / 2)) |
71 | | rphalflt 12944 |
. . . . . 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 11313 |
. . . 4
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) < ((1 / 3)↑𝑚)) |
74 | | eluznn 12843 |
. . . . . . . . 9
⊢ ((𝑚 ∈ ℕ ∧ 𝑘 ∈
(ℤ≥‘𝑚)) → 𝑘 ∈ ℕ) |
75 | 7, 74 | sylan 580 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ≥‘𝑚)) → 𝑘 ∈ ℕ) |
76 | 8 | rpnnen2lem1 16096 |
. . . . . . . 8
⊢ (({𝑚} ⊆ ℕ ∧ 𝑘 ∈ ℕ) → ((𝐹‘{𝑚})‘𝑘) = if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
77 | 30, 75, 76 | syl2an2r 683 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑘 ∈ (ℤ≥‘𝑚)) → ((𝐹‘{𝑚})‘𝑘) = if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
78 | 77 | sumeq2dv 15588 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
79 | | uzid 12778 |
. . . . . . . . 9
⊢ (𝑚 ∈ ℤ → 𝑚 ∈
(ℤ≥‘𝑚)) |
80 | 22, 79 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → 𝑚 ∈ (ℤ≥‘𝑚)) |
81 | 80 | snssd 4769 |
. . . . . . 7
⊢ (𝜑 → {𝑚} ⊆ (ℤ≥‘𝑚)) |
82 | | vex 3449 |
. . . . . . . . 9
⊢ 𝑚 ∈ V |
83 | | oveq2 7365 |
. . . . . . . . . 10
⊢ (𝑘 = 𝑚 → ((1 / 3)↑𝑘) = ((1 / 3)↑𝑚)) |
84 | 83 | eleq1d 2822 |
. . . . . . . . 9
⊢ (𝑘 = 𝑚 → (((1 / 3)↑𝑘) ∈ ℂ ↔ ((1 / 3)↑𝑚) ∈
ℂ)) |
85 | 82, 84 | ralsn 4642 |
. . . . . . . 8
⊢
(∀𝑘 ∈
{𝑚} ((1 / 3)↑𝑘) ∈ ℂ ↔ ((1 /
3)↑𝑚) ∈
ℂ) |
86 | 42, 85 | sylibr 233 |
. . . . . . 7
⊢ (𝜑 → ∀𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) ∈ ℂ) |
87 | | ssidd 3967 |
. . . . . . . 8
⊢ (𝜑 →
(ℤ≥‘𝑚) ⊆ (ℤ≥‘𝑚)) |
88 | 87 | orcd 871 |
. . . . . . 7
⊢ (𝜑 →
((ℤ≥‘𝑚) ⊆ (ℤ≥‘𝑚) ∨
(ℤ≥‘𝑚) ∈ Fin)) |
89 | | sumss2 15611 |
. . . . . . 7
⊢ ((({𝑚} ⊆
(ℤ≥‘𝑚) ∧ ∀𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) ∈ ℂ) ∧
((ℤ≥‘𝑚) ⊆ (ℤ≥‘𝑚) ∨
(ℤ≥‘𝑚) ∈ Fin)) → Σ𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
90 | 81, 86, 88, 89 | syl21anc 836 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)if(𝑘 ∈ {𝑚}, ((1 / 3)↑𝑘), 0)) |
91 | 83 | sumsn 15631 |
. . . . . . 7
⊢ ((𝑚 ∈ ℕ ∧ ((1 /
3)↑𝑚) ∈ ℂ)
→ Σ𝑘 ∈
{𝑚} ((1 / 3)↑𝑘) = ((1 / 3)↑𝑚)) |
92 | 7, 42, 91 | syl2anc 584 |
. . . . . 6
⊢ (𝜑 → Σ𝑘 ∈ {𝑚} ((1 / 3)↑𝑘) = ((1 / 3)↑𝑚)) |
93 | 78, 90, 92 | 3eqtr2d 2782 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) = ((1 / 3)↑𝑚)) |
94 | 3, 4 | syl 17 |
. . . . . . 7
⊢ (𝜑 → 𝑚 ∈ 𝐴) |
95 | 94 | snssd 4769 |
. . . . . 6
⊢ (𝜑 → {𝑚} ⊆ 𝐴) |
96 | 8 | rpnnen2lem7 16102 |
. . . . . 6
⊢ (({𝑚} ⊆ 𝐴 ∧ 𝐴 ⊆ ℕ ∧ 𝑚 ∈ ℕ) → Σ𝑘 ∈
(ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
97 | 95, 2, 7, 96 | syl3anc 1371 |
. . . . 5
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘{𝑚})‘𝑘) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
98 | 93, 97 | eqbrtrrd 5129 |
. . . 4
⊢ (𝜑 → ((1 / 3)↑𝑚) ≤ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
99 | 10, 16, 18, 73, 98 | ltletrd 11315 |
. . 3
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) < Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘)) |
100 | 10, 99 | gtned 11290 |
. 2
⊢ (𝜑 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ≠ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘)) |
101 | | rpnnen2.5 |
. . . . 5
⊢ (𝜑 → ∀𝑛 ∈ ℕ (𝑛 < 𝑚 → (𝑛 ∈ 𝐴 ↔ 𝑛 ∈ 𝐵))) |
102 | | rpnnen2.6 |
. . . . 5
⊢ (𝜓 ↔ Σ𝑘 ∈ ℕ ((𝐹‘𝐴)‘𝑘) = Σ𝑘 ∈ ℕ ((𝐹‘𝐵)‘𝑘)) |
103 | 8, 2, 1, 3, 101, 102 | rpnnen2lem10 16105 |
. . . 4
⊢ ((𝜑 ∧ 𝜓) → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘)) |
104 | 103 | ex 413 |
. . 3
⊢ (𝜑 → (𝜓 → Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) = Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘))) |
105 | 104 | necon3ad 2956 |
. 2
⊢ (𝜑 → (Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐴)‘𝑘) ≠ Σ𝑘 ∈ (ℤ≥‘𝑚)((𝐹‘𝐵)‘𝑘) → ¬ 𝜓)) |
106 | 100, 105 | mpd 15 |
1
⊢ (𝜑 → ¬ 𝜓) |