Proof of Theorem limsup10exlem
Step | Hyp | Ref
| Expression |
1 | | c0ex 10900 |
. . . . . . 7
⊢ 0 ∈
V |
2 | 1 | prid1 4695 |
. . . . . 6
⊢ 0 ∈
{0, 1} |
3 | | 1re 10906 |
. . . . . . . 8
⊢ 1 ∈
ℝ |
4 | 3 | elexi 3441 |
. . . . . . 7
⊢ 1 ∈
V |
5 | 4 | prid2 4696 |
. . . . . 6
⊢ 1 ∈
{0, 1} |
6 | 2, 5 | ifcli 4503 |
. . . . 5
⊢ if(2
∥ 𝑛, 0, 1) ∈ {0,
1} |
7 | 6 | a1i 11 |
. . . 4
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ ∩ (𝐾[,)+∞))) → if(2 ∥ 𝑛, 0, 1) ∈ {0,
1}) |
8 | 7 | ralrimiva 3107 |
. . 3
⊢ (𝜑 → ∀𝑛 ∈ (ℕ ∩ (𝐾[,)+∞))if(2 ∥ 𝑛, 0, 1) ∈ {0, 1}) |
9 | | nfv 1918 |
. . . 4
⊢
Ⅎ𝑛𝜑 |
10 | 1, 4 | ifex 4506 |
. . . . 5
⊢ if(2
∥ 𝑛, 0, 1) ∈
V |
11 | 10 | a1i 11 |
. . . 4
⊢ ((𝜑 ∧ 𝑛 ∈ (ℕ ∩ (𝐾[,)+∞))) → if(2 ∥ 𝑛, 0, 1) ∈
V) |
12 | | limsup10exlem.1 |
. . . 4
⊢ 𝐹 = (𝑛 ∈ ℕ ↦ if(2 ∥ 𝑛, 0, 1)) |
13 | 9, 11, 12 | imassmpt 42699 |
. . 3
⊢ (𝜑 → ((𝐹 “ (𝐾[,)+∞)) ⊆ {0, 1} ↔
∀𝑛 ∈ (ℕ
∩ (𝐾[,)+∞))if(2
∥ 𝑛, 0, 1) ∈ {0,
1})) |
14 | 8, 13 | mpbird 256 |
. 2
⊢ (𝜑 → (𝐹 “ (𝐾[,)+∞)) ⊆ {0,
1}) |
15 | | limsup10exlem.2 |
. . . . . . . . . 10
⊢ (𝜑 → 𝐾 ∈ ℝ) |
16 | 15 | ceilcld 13491 |
. . . . . . . . 9
⊢ (𝜑 → (⌈‘𝐾) ∈
ℤ) |
17 | | 1zzd 12281 |
. . . . . . . . 9
⊢ (𝜑 → 1 ∈
ℤ) |
18 | 16, 17 | ifcld 4502 |
. . . . . . . 8
⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈
ℤ) |
19 | 18 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈ ℤ) |
20 | | simpr 484 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) → 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) |
21 | | 2teven 15992 |
. . . . . . 7
⊢ ((if(1
≤ 𝐾,
(⌈‘𝐾), 1)
∈ ℤ ∧ 𝑛 = (2
· if(1 ≤ 𝐾,
(⌈‘𝐾), 1)))
→ 2 ∥ 𝑛) |
22 | 19, 20, 21 | syl2anc 583 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) → 2 ∥ 𝑛) |
23 | 22 | iftrued 4464 |
. . . . 5
⊢ ((𝜑 ∧ 𝑛 = (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) → if(2 ∥ 𝑛, 0, 1) = 0) |
24 | | 2nn 11976 |
. . . . . . 7
⊢ 2 ∈
ℕ |
25 | 24 | a1i 11 |
. . . . . 6
⊢ (𝜑 → 2 ∈
ℕ) |
26 | | eqid 2738 |
. . . . . . . 8
⊢
(ℤ≥‘1) =
(ℤ≥‘1) |
27 | 3 | a1i 11 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 1 ∈ ℝ) |
28 | 15 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 𝐾 ∈ ℝ) |
29 | 16 | zred 12355 |
. . . . . . . . . . . 12
⊢ (𝜑 → (⌈‘𝐾) ∈
ℝ) |
30 | 29 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 1 ≤ 𝐾) → (⌈‘𝐾) ∈ ℝ) |
31 | | simpr 484 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 1 ≤ 𝐾) |
32 | 15 | ceilged 13494 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐾 ≤ (⌈‘𝐾)) |
33 | 32 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 𝐾 ≤ (⌈‘𝐾)) |
34 | 27, 28, 30, 31, 33 | letrd 11062 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 1 ≤ (⌈‘𝐾)) |
35 | | iftrue 4462 |
. . . . . . . . . . 11
⊢ (1 ≤
𝐾 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) = (⌈‘𝐾)) |
36 | 35 | adantl 481 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 1 ≤ 𝐾) → if(1 ≤ 𝐾, (⌈‘𝐾), 1) = (⌈‘𝐾)) |
37 | 34, 36 | breqtrrd 5098 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 1 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1)) |
38 | 3 | leidi 11439 |
. . . . . . . . . . 11
⊢ 1 ≤
1 |
39 | 38 | a1i 11 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 1 ≤
1) |
40 | | iffalse 4465 |
. . . . . . . . . . 11
⊢ (¬ 1
≤ 𝐾 → if(1 ≤
𝐾, (⌈‘𝐾), 1) = 1) |
41 | 40 | adantl 481 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → if(1 ≤ 𝐾, (⌈‘𝐾), 1) = 1) |
42 | 39, 41 | breqtrrd 5098 |
. . . . . . . . 9
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 1 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1)) |
43 | 37, 42 | pm2.61dan 809 |
. . . . . . . 8
⊢ (𝜑 → 1 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1)) |
44 | 26, 17, 18, 43 | eluzd 42839 |
. . . . . . 7
⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈
(ℤ≥‘1)) |
45 | | nnuz 12550 |
. . . . . . 7
⊢ ℕ =
(ℤ≥‘1) |
46 | 44, 45 | eleqtrrdi 2850 |
. . . . . 6
⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈
ℕ) |
47 | 25, 46 | nnmulcld 11956 |
. . . . 5
⊢ (𝜑 → (2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) ∈
ℕ) |
48 | 1 | a1i 11 |
. . . . 5
⊢ (𝜑 → 0 ∈
V) |
49 | 12, 23, 47, 48 | fvmptd2 6865 |
. . . 4
⊢ (𝜑 → (𝐹‘(2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) = 0) |
50 | 10, 12 | fnmpti 6560 |
. . . . . 6
⊢ 𝐹 Fn ℕ |
51 | 50 | a1i 11 |
. . . . 5
⊢ (𝜑 → 𝐹 Fn ℕ) |
52 | 15 | rexrd 10956 |
. . . . . 6
⊢ (𝜑 → 𝐾 ∈
ℝ*) |
53 | | pnfxr 10960 |
. . . . . . 7
⊢ +∞
∈ ℝ* |
54 | 53 | a1i 11 |
. . . . . 6
⊢ (𝜑 → +∞ ∈
ℝ*) |
55 | 47 | nnxrd 42474 |
. . . . . 6
⊢ (𝜑 → (2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) ∈
ℝ*) |
56 | 47 | nnred 11918 |
. . . . . . 7
⊢ (𝜑 → (2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) ∈
ℝ) |
57 | 46 | nnred 11918 |
. . . . . . . 8
⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈
ℝ) |
58 | 33, 36 | breqtrrd 5098 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 1 ≤ 𝐾) → 𝐾 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1)) |
59 | 15 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 𝐾 ∈ ℝ) |
60 | 3 | a1i 11 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 1 ∈
ℝ) |
61 | | simpr 484 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → ¬ 1 ≤ 𝐾) |
62 | 59, 60, 61 | nleltd 42882 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 𝐾 < 1) |
63 | 59, 60, 62 | ltled 11053 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 𝐾 ≤ 1) |
64 | 41 | eqcomd 2744 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 1 = if(1 ≤ 𝐾, (⌈‘𝐾), 1)) |
65 | 63, 64 | breqtrd 5096 |
. . . . . . . . 9
⊢ ((𝜑 ∧ ¬ 1 ≤ 𝐾) → 𝐾 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1)) |
66 | 58, 65 | pm2.61dan 809 |
. . . . . . . 8
⊢ (𝜑 → 𝐾 ≤ if(1 ≤ 𝐾, (⌈‘𝐾), 1)) |
67 | 46 | nnrpd 12699 |
. . . . . . . . 9
⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈
ℝ+) |
68 | | 2timesgt 42716 |
. . . . . . . . 9
⊢ (if(1
≤ 𝐾,
(⌈‘𝐾), 1)
∈ ℝ+ → if(1 ≤ 𝐾, (⌈‘𝐾), 1) < (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) |
69 | 67, 68 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → if(1 ≤ 𝐾, (⌈‘𝐾), 1) < (2 · if(1 ≤
𝐾, (⌈‘𝐾), 1))) |
70 | 15, 57, 56, 66, 69 | lelttrd 11063 |
. . . . . . 7
⊢ (𝜑 → 𝐾 < (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) |
71 | 15, 56, 70 | ltled 11053 |
. . . . . 6
⊢ (𝜑 → 𝐾 ≤ (2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) |
72 | 56 | ltpnfd 12786 |
. . . . . 6
⊢ (𝜑 → (2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) <
+∞) |
73 | 52, 54, 55, 71, 72 | elicod 13058 |
. . . . 5
⊢ (𝜑 → (2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) ∈ (𝐾[,)+∞)) |
74 | 51, 47, 73 | fnfvimad 7092 |
. . . 4
⊢ (𝜑 → (𝐹‘(2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1))) ∈ (𝐹 “ (𝐾[,)+∞))) |
75 | 49, 74 | eqeltrrd 2840 |
. . 3
⊢ (𝜑 → 0 ∈ (𝐹 “ (𝐾[,)+∞))) |
76 | 18 | adantr 480 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) → if(1 ≤ 𝐾, (⌈‘𝐾), 1) ∈
ℤ) |
77 | | simpr 484 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) → 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) |
78 | | 2tp1odd 15989 |
. . . . . . 7
⊢ ((if(1
≤ 𝐾,
(⌈‘𝐾), 1)
∈ ℤ ∧ 𝑛 =
((2 · if(1 ≤ 𝐾,
(⌈‘𝐾), 1)) +
1)) → ¬ 2 ∥ 𝑛) |
79 | 76, 77, 78 | syl2anc 583 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) → ¬ 2 ∥ 𝑛) |
80 | 79 | iffalsed 4467 |
. . . . 5
⊢ ((𝜑 ∧ 𝑛 = ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) → if(2 ∥ 𝑛, 0, 1) = 1) |
81 | 47 | peano2nnd 11920 |
. . . . 5
⊢ (𝜑 → ((2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) + 1) ∈
ℕ) |
82 | | 1xr 10965 |
. . . . . 6
⊢ 1 ∈
ℝ* |
83 | 82 | a1i 11 |
. . . . 5
⊢ (𝜑 → 1 ∈
ℝ*) |
84 | 12, 80, 81, 83 | fvmptd2 6865 |
. . . 4
⊢ (𝜑 → (𝐹‘((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) =
1) |
85 | 81 | nnxrd 42474 |
. . . . . 6
⊢ (𝜑 → ((2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) + 1) ∈
ℝ*) |
86 | 81 | nnred 11918 |
. . . . . . 7
⊢ (𝜑 → ((2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) + 1) ∈
ℝ) |
87 | 56 | ltp1d 11835 |
. . . . . . . 8
⊢ (𝜑 → (2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) < ((2 · if(1
≤ 𝐾,
(⌈‘𝐾), 1)) +
1)) |
88 | 15, 56, 86, 70, 87 | lttrd 11066 |
. . . . . . 7
⊢ (𝜑 → 𝐾 < ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) |
89 | 15, 86, 88 | ltled 11053 |
. . . . . 6
⊢ (𝜑 → 𝐾 ≤ ((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) |
90 | 86 | ltpnfd 12786 |
. . . . . 6
⊢ (𝜑 → ((2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) + 1) <
+∞) |
91 | 52, 54, 85, 89, 90 | elicod 13058 |
. . . . 5
⊢ (𝜑 → ((2 · if(1 ≤
𝐾, (⌈‘𝐾), 1)) + 1) ∈ (𝐾[,)+∞)) |
92 | 51, 81, 91 | fnfvimad 7092 |
. . . 4
⊢ (𝜑 → (𝐹‘((2 · if(1 ≤ 𝐾, (⌈‘𝐾), 1)) + 1)) ∈ (𝐹 “ (𝐾[,)+∞))) |
93 | 84, 92 | eqeltrrd 2840 |
. . 3
⊢ (𝜑 → 1 ∈ (𝐹 “ (𝐾[,)+∞))) |
94 | 75, 93 | prssd 4752 |
. 2
⊢ (𝜑 → {0, 1} ⊆ (𝐹 “ (𝐾[,)+∞))) |
95 | 14, 94 | eqssd 3934 |
1
⊢ (𝜑 → (𝐹 “ (𝐾[,)+∞)) = {0, 1}) |