Step | Hyp | Ref
| Expression |
1 | | vdwnn.1 |
. . 3
⊢ (𝜑 → 𝑅 ∈ Fin) |
2 | | vdwnn.3 |
. . . . . . 7
⊢ 𝑆 = {𝑘 ∈ ℕ ∣ ¬ ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(𝑘 − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐})} |
3 | | ssrab2 3650 |
. . . . . . 7
⊢ {𝑘 ∈ ℕ ∣ ¬
∃𝑎 ∈ ℕ
∃𝑑 ∈ ℕ
∀𝑚 ∈
(0...(𝑘 − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐})} ⊆ ℕ |
4 | 2, 3 | eqsstri 3598 |
. . . . . 6
⊢ 𝑆 ⊆
ℕ |
5 | | nnuz 11599 |
. . . . . . . 8
⊢ ℕ =
(ℤ≥‘1) |
6 | 4, 5 | sseqtri 3600 |
. . . . . . 7
⊢ 𝑆 ⊆
(ℤ≥‘1) |
7 | | vdwnn.4 |
. . . . . . . 8
⊢ (𝜑 → ∀𝑐 ∈ 𝑅 𝑆 ≠ ∅) |
8 | 7 | r19.21bi 2916 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑐 ∈ 𝑅) → 𝑆 ≠ ∅) |
9 | | infssuzcl 11648 |
. . . . . . 7
⊢ ((𝑆 ⊆
(ℤ≥‘1) ∧ 𝑆 ≠ ∅) → inf(𝑆, ℝ, < ) ∈ 𝑆) |
10 | 6, 8, 9 | sylancr 694 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑐 ∈ 𝑅) → inf(𝑆, ℝ, < ) ∈ 𝑆) |
11 | 4, 10 | sseldi 3566 |
. . . . 5
⊢ ((𝜑 ∧ 𝑐 ∈ 𝑅) → inf(𝑆, ℝ, < ) ∈
ℕ) |
12 | 11 | nnred 10912 |
. . . 4
⊢ ((𝜑 ∧ 𝑐 ∈ 𝑅) → inf(𝑆, ℝ, < ) ∈
ℝ) |
13 | 12 | ralrimiva 2949 |
. . 3
⊢ (𝜑 → ∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ∈
ℝ) |
14 | | fimaxre3 10849 |
. . 3
⊢ ((𝑅 ∈ Fin ∧ ∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ∈ ℝ) →
∃𝑥 ∈ ℝ
∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥) |
15 | 1, 13, 14 | syl2anc 691 |
. 2
⊢ (𝜑 → ∃𝑥 ∈ ℝ ∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥) |
16 | | vdwnn.2 |
. . . . . . . . 9
⊢ (𝜑 → 𝐹:ℕ⟶𝑅) |
17 | | 1nn 10908 |
. . . . . . . . 9
⊢ 1 ∈
ℕ |
18 | | ffvelrn 6265 |
. . . . . . . . 9
⊢ ((𝐹:ℕ⟶𝑅 ∧ 1 ∈ ℕ) →
(𝐹‘1) ∈ 𝑅) |
19 | 16, 17, 18 | sylancl 693 |
. . . . . . . 8
⊢ (𝜑 → (𝐹‘1) ∈ 𝑅) |
20 | | ne0i 3880 |
. . . . . . . 8
⊢ ((𝐹‘1) ∈ 𝑅 → 𝑅 ≠ ∅) |
21 | 19, 20 | syl 17 |
. . . . . . 7
⊢ (𝜑 → 𝑅 ≠ ∅) |
22 | 21 | adantr 480 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ≠ ∅) |
23 | | r19.2z 4012 |
. . . . . . 7
⊢ ((𝑅 ≠ ∅ ∧
∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥) → ∃𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥) |
24 | 23 | ex 449 |
. . . . . 6
⊢ (𝑅 ≠ ∅ →
(∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥 → ∃𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥)) |
25 | 22, 24 | syl 17 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥 → ∃𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥)) |
26 | | simplr 788 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → 𝑥 ∈ ℝ) |
27 | | fllep1 12464 |
. . . . . . . . . 10
⊢ (𝑥 ∈ ℝ → 𝑥 ≤ ((⌊‘𝑥) + 1)) |
28 | 26, 27 | syl 17 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → 𝑥 ≤ ((⌊‘𝑥) + 1)) |
29 | 12 | adantlr 747 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → inf(𝑆, ℝ, < ) ∈
ℝ) |
30 | 26 | flcld 12461 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → (⌊‘𝑥) ∈ ℤ) |
31 | 30 | peano2zd 11361 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → ((⌊‘𝑥) + 1) ∈ ℤ) |
32 | 31 | zred 11358 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → ((⌊‘𝑥) + 1) ∈ ℝ) |
33 | | letr 10010 |
. . . . . . . . . 10
⊢
((inf(𝑆, ℝ,
< ) ∈ ℝ ∧ 𝑥 ∈ ℝ ∧ ((⌊‘𝑥) + 1) ∈ ℝ) →
((inf(𝑆, ℝ, < )
≤ 𝑥 ∧ 𝑥 ≤ ((⌊‘𝑥) + 1)) → inf(𝑆, ℝ, < ) ≤
((⌊‘𝑥) +
1))) |
34 | 29, 26, 32, 33 | syl3anc 1318 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → ((inf(𝑆, ℝ, < ) ≤ 𝑥 ∧ 𝑥 ≤ ((⌊‘𝑥) + 1)) → inf(𝑆, ℝ, < ) ≤ ((⌊‘𝑥) + 1))) |
35 | 28, 34 | mpan2d 706 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → (inf(𝑆, ℝ, < ) ≤ 𝑥 → inf(𝑆, ℝ, < ) ≤ ((⌊‘𝑥) + 1))) |
36 | 11 | adantlr 747 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → inf(𝑆, ℝ, < ) ∈
ℕ) |
37 | 36 | nnzd 11357 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → inf(𝑆, ℝ, < ) ∈
ℤ) |
38 | | eluz 11577 |
. . . . . . . . . 10
⊢
((inf(𝑆, ℝ,
< ) ∈ ℤ ∧ ((⌊‘𝑥) + 1) ∈ ℤ) →
(((⌊‘𝑥) + 1)
∈ (ℤ≥‘inf(𝑆, ℝ, < )) ↔ inf(𝑆, ℝ, < ) ≤
((⌊‘𝑥) +
1))) |
39 | 37, 31, 38 | syl2anc 691 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → (((⌊‘𝑥) + 1) ∈
(ℤ≥‘inf(𝑆, ℝ, < )) ↔ inf(𝑆, ℝ, < ) ≤
((⌊‘𝑥) +
1))) |
40 | | simpll 786 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → 𝜑) |
41 | 10 | adantlr 747 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → inf(𝑆, ℝ, < ) ∈ 𝑆) |
42 | 1, 16, 2 | vdwnnlem2 15538 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ ((⌊‘𝑥) + 1) ∈
(ℤ≥‘inf(𝑆, ℝ, < ))) → (inf(𝑆, ℝ, < ) ∈ 𝑆 → ((⌊‘𝑥) + 1) ∈ 𝑆)) |
43 | 42 | impancom 455 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ inf(𝑆, ℝ, < ) ∈ 𝑆) → (((⌊‘𝑥) + 1) ∈
(ℤ≥‘inf(𝑆, ℝ, < )) →
((⌊‘𝑥) + 1)
∈ 𝑆)) |
44 | 40, 41, 43 | syl2anc 691 |
. . . . . . . . 9
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → (((⌊‘𝑥) + 1) ∈
(ℤ≥‘inf(𝑆, ℝ, < )) →
((⌊‘𝑥) + 1)
∈ 𝑆)) |
45 | 39, 44 | sylbird 249 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → (inf(𝑆, ℝ, < ) ≤ ((⌊‘𝑥) + 1) →
((⌊‘𝑥) + 1)
∈ 𝑆)) |
46 | 35, 45 | syld 46 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → (inf(𝑆, ℝ, < ) ≤ 𝑥 → ((⌊‘𝑥) + 1) ∈ 𝑆)) |
47 | 4 | sseli 3564 |
. . . . . . . 8
⊢
(((⌊‘𝑥)
+ 1) ∈ 𝑆 →
((⌊‘𝑥) + 1)
∈ ℕ) |
48 | 47 | nnnn0d 11228 |
. . . . . . 7
⊢
(((⌊‘𝑥)
+ 1) ∈ 𝑆 →
((⌊‘𝑥) + 1)
∈ ℕ0) |
49 | 46, 48 | syl6 34 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → (inf(𝑆, ℝ, < ) ≤ 𝑥 → ((⌊‘𝑥) + 1) ∈
ℕ0)) |
50 | 49 | rexlimdva 3013 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (∃𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥 → ((⌊‘𝑥) + 1) ∈
ℕ0)) |
51 | 1 | adantr 480 |
. . . . . . . 8
⊢ ((𝜑 ∧ ((⌊‘𝑥) + 1) ∈
ℕ0) → 𝑅 ∈ Fin) |
52 | 16 | adantr 480 |
. . . . . . . 8
⊢ ((𝜑 ∧ ((⌊‘𝑥) + 1) ∈
ℕ0) → 𝐹:ℕ⟶𝑅) |
53 | | simpr 476 |
. . . . . . . 8
⊢ ((𝜑 ∧ ((⌊‘𝑥) + 1) ∈
ℕ0) → ((⌊‘𝑥) + 1) ∈
ℕ0) |
54 | | vdwnnlem1 15537 |
. . . . . . . 8
⊢ ((𝑅 ∈ Fin ∧ 𝐹:ℕ⟶𝑅 ∧ ((⌊‘𝑥) + 1) ∈
ℕ0) → ∃𝑐 ∈ 𝑅 ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐})) |
55 | 51, 52, 53, 54 | syl3anc 1318 |
. . . . . . 7
⊢ ((𝜑 ∧ ((⌊‘𝑥) + 1) ∈
ℕ0) → ∃𝑐 ∈ 𝑅 ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐})) |
56 | 55 | ex 449 |
. . . . . 6
⊢ (𝜑 → (((⌊‘𝑥) + 1) ∈
ℕ0 → ∃𝑐 ∈ 𝑅 ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
57 | 56 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) →
(((⌊‘𝑥) + 1)
∈ ℕ0 → ∃𝑐 ∈ 𝑅 ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
58 | 25, 50, 57 | 3syld 58 |
. . . 4
⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥 → ∃𝑐 ∈ 𝑅 ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
59 | | oveq1 6556 |
. . . . . . . . . . . . 13
⊢ (𝑘 = ((⌊‘𝑥) + 1) → (𝑘 − 1) =
(((⌊‘𝑥) + 1)
− 1)) |
60 | 59 | oveq2d 6565 |
. . . . . . . . . . . 12
⊢ (𝑘 = ((⌊‘𝑥) + 1) → (0...(𝑘 − 1)) =
(0...(((⌊‘𝑥) +
1) − 1))) |
61 | 60 | raleqdv 3121 |
. . . . . . . . . . 11
⊢ (𝑘 = ((⌊‘𝑥) + 1) → (∀𝑚 ∈ (0...(𝑘 − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}) ↔ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
62 | 61 | 2rexbidv 3039 |
. . . . . . . . . 10
⊢ (𝑘 = ((⌊‘𝑥) + 1) → (∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(𝑘 − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}) ↔ ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
63 | 62 | notbid 307 |
. . . . . . . . 9
⊢ (𝑘 = ((⌊‘𝑥) + 1) → (¬
∃𝑎 ∈ ℕ
∃𝑑 ∈ ℕ
∀𝑚 ∈
(0...(𝑘 − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}) ↔ ¬ ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
64 | 63, 2 | elrab2 3333 |
. . . . . . . 8
⊢
(((⌊‘𝑥)
+ 1) ∈ 𝑆 ↔
(((⌊‘𝑥) + 1)
∈ ℕ ∧ ¬ ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
65 | 64 | simprbi 479 |
. . . . . . 7
⊢
(((⌊‘𝑥)
+ 1) ∈ 𝑆 → ¬
∃𝑎 ∈ ℕ
∃𝑑 ∈ ℕ
∀𝑚 ∈
(0...(((⌊‘𝑥) +
1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐})) |
66 | 46, 65 | syl6 34 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑥 ∈ ℝ) ∧ 𝑐 ∈ 𝑅) → (inf(𝑆, ℝ, < ) ≤ 𝑥 → ¬ ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
67 | 66 | ralimdva 2945 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥 → ∀𝑐 ∈ 𝑅 ¬ ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
68 | | ralnex 2975 |
. . . . 5
⊢
(∀𝑐 ∈
𝑅 ¬ ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈
(0...(((⌊‘𝑥) +
1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}) ↔ ¬ ∃𝑐 ∈ 𝑅 ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐})) |
69 | 67, 68 | syl6ib 240 |
. . . 4
⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥 → ¬ ∃𝑐 ∈ 𝑅 ∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ ∀𝑚 ∈ (0...(((⌊‘𝑥) + 1) − 1))(𝑎 + (𝑚 · 𝑑)) ∈ (◡𝐹 “ {𝑐}))) |
70 | 58, 69 | pm2.65d 186 |
. . 3
⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ¬ ∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥) |
71 | 70 | nrexdv 2984 |
. 2
⊢ (𝜑 → ¬ ∃𝑥 ∈ ℝ ∀𝑐 ∈ 𝑅 inf(𝑆, ℝ, < ) ≤ 𝑥) |
72 | 15, 71 | pm2.65i 184 |
1
⊢ ¬
𝜑 |