Users' Mathboxes Mathbox for Jeff Madsen < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  heiborlem8 Structured version   Visualization version   GIF version

Theorem heiborlem8 33588
Description: Lemma for heibor 33591. The previous lemmas establish that the sequence 𝑀 is Cauchy, so using completeness we now consider the convergent point 𝑌. By assumption, 𝑈 is an open cover, so 𝑌 is an element of some 𝑍𝑈, and some ball centered at 𝑌 is contained in 𝑍. But the sequence contains arbitrarily small balls close to 𝑌, so some element ball(𝑀𝑛) of the sequence is contained in 𝑍. And finally we arrive at a contradiction, because {𝑍} is a finite subcover of 𝑈 that covers ball(𝑀𝑛), yet ball(𝑀𝑛) ∈ 𝐾. For convenience, we write this contradiction as 𝜑𝜓 where 𝜑 is all the accumulated hypotheses and 𝜓 is anything at all. (Contributed by Jeff Madsen, 22-Jan-2014.)
Hypotheses
Ref Expression
heibor.1 𝐽 = (MetOpen‘𝐷)
heibor.3 𝐾 = {𝑢 ∣ ¬ ∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)𝑢 𝑣}
heibor.4 𝐺 = {⟨𝑦, 𝑛⟩ ∣ (𝑛 ∈ ℕ0𝑦 ∈ (𝐹𝑛) ∧ (𝑦𝐵𝑛) ∈ 𝐾)}
heibor.5 𝐵 = (𝑧𝑋, 𝑚 ∈ ℕ0 ↦ (𝑧(ball‘𝐷)(1 / (2↑𝑚))))
heibor.6 (𝜑𝐷 ∈ (CMet‘𝑋))
heibor.7 (𝜑𝐹:ℕ0⟶(𝒫 𝑋 ∩ Fin))
heibor.8 (𝜑 → ∀𝑛 ∈ ℕ0 𝑋 = 𝑦 ∈ (𝐹𝑛)(𝑦𝐵𝑛))
heibor.9 (𝜑 → ∀𝑥𝐺 ((𝑇𝑥)𝐺((2nd𝑥) + 1) ∧ ((𝐵𝑥) ∩ ((𝑇𝑥)𝐵((2nd𝑥) + 1))) ∈ 𝐾))
heibor.10 (𝜑𝐶𝐺0)
heibor.11 𝑆 = seq0(𝑇, (𝑚 ∈ ℕ0 ↦ if(𝑚 = 0, 𝐶, (𝑚 − 1))))
heibor.12 𝑀 = (𝑛 ∈ ℕ ↦ ⟨(𝑆𝑛), (3 / (2↑𝑛))⟩)
heibor.13 (𝜑𝑈𝐽)
heibor.14 𝑌 ∈ V
heibor.15 (𝜑𝑌𝑍)
heibor.16 (𝜑𝑍𝑈)
heibor.17 (𝜑 → (1st𝑀)(⇝𝑡𝐽)𝑌)
Assertion
Ref Expression
heiborlem8 (𝜑𝜓)
Distinct variable groups:   𝑥,𝑛,𝑦,𝑢,𝐹   𝑥,𝐺   𝜑,𝑥   𝑚,𝑛,𝑢,𝑣,𝑥,𝑦,𝑧,𝐷   𝑚,𝑀,𝑢,𝑥,𝑦,𝑧   𝑇,𝑚,𝑛,𝑥,𝑦,𝑧   𝐵,𝑛,𝑢,𝑣,𝑦   𝑚,𝐽,𝑛,𝑢,𝑣,𝑥,𝑦,𝑧   𝑈,𝑛,𝑢,𝑣,𝑥,𝑦,𝑧   𝜓,𝑦,𝑧   𝑆,𝑚,𝑛,𝑢,𝑣,𝑥,𝑦,𝑧   𝑚,𝑋,𝑛,𝑢,𝑣,𝑥,𝑦,𝑧   𝐶,𝑚,𝑛,𝑢,𝑣,𝑦   𝑛,𝐾,𝑥,𝑦,𝑧   𝑥,𝑌   𝑣,𝑍,𝑥   𝑥,𝐵
Allowed substitution hints:   𝜑(𝑦,𝑧,𝑣,𝑢,𝑚,𝑛)   𝜓(𝑥,𝑣,𝑢,𝑚,𝑛)   𝐵(𝑧,𝑚)   𝐶(𝑥,𝑧)   𝑇(𝑣,𝑢)   𝑈(𝑚)   𝐹(𝑧,𝑣,𝑚)   𝐺(𝑦,𝑧,𝑣,𝑢,𝑚,𝑛)   𝐾(𝑣,𝑢,𝑚)   𝑀(𝑣,𝑛)   𝑌(𝑦,𝑧,𝑣,𝑢,𝑚,𝑛)   𝑍(𝑦,𝑧,𝑢,𝑚,𝑛)

Proof of Theorem heiborlem8
Dummy variables 𝑡 𝑘 𝑟 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 heibor.6 . . . 4 (𝜑𝐷 ∈ (CMet‘𝑋))
2 cmetmet 23065 . . . 4 (𝐷 ∈ (CMet‘𝑋) → 𝐷 ∈ (Met‘𝑋))
3 metxmet 22120 . . . 4 (𝐷 ∈ (Met‘𝑋) → 𝐷 ∈ (∞Met‘𝑋))
41, 2, 33syl 18 . . 3 (𝜑𝐷 ∈ (∞Met‘𝑋))
5 heibor.13 . . . 4 (𝜑𝑈𝐽)
6 heibor.16 . . . 4 (𝜑𝑍𝑈)
75, 6sseldd 3596 . . 3 (𝜑𝑍𝐽)
8 heibor.15 . . 3 (𝜑𝑌𝑍)
9 heibor.1 . . . 4 𝐽 = (MetOpen‘𝐷)
109mopni2 22279 . . 3 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑍𝐽𝑌𝑍) → ∃𝑥 ∈ ℝ+ (𝑌(ball‘𝐷)𝑥) ⊆ 𝑍)
114, 7, 8, 10syl3anc 1324 . 2 (𝜑 → ∃𝑥 ∈ ℝ+ (𝑌(ball‘𝐷)𝑥) ⊆ 𝑍)
12 rphalfcl 11843 . . . . . 6 (𝑥 ∈ ℝ+ → (𝑥 / 2) ∈ ℝ+)
13 breq2 4648 . . . . . . . 8 (𝑟 = (𝑥 / 2) → ((2nd ‘(𝑀𝑘)) < 𝑟 ↔ (2nd ‘(𝑀𝑘)) < (𝑥 / 2)))
1413rexbidv 3048 . . . . . . 7 (𝑟 = (𝑥 / 2) → (∃𝑘 ∈ ℕ (2nd ‘(𝑀𝑘)) < 𝑟 ↔ ∃𝑘 ∈ ℕ (2nd ‘(𝑀𝑘)) < (𝑥 / 2)))
15 heibor.3 . . . . . . . 8 𝐾 = {𝑢 ∣ ¬ ∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)𝑢 𝑣}
16 heibor.4 . . . . . . . 8 𝐺 = {⟨𝑦, 𝑛⟩ ∣ (𝑛 ∈ ℕ0𝑦 ∈ (𝐹𝑛) ∧ (𝑦𝐵𝑛) ∈ 𝐾)}
17 heibor.5 . . . . . . . 8 𝐵 = (𝑧𝑋, 𝑚 ∈ ℕ0 ↦ (𝑧(ball‘𝐷)(1 / (2↑𝑚))))
18 heibor.7 . . . . . . . 8 (𝜑𝐹:ℕ0⟶(𝒫 𝑋 ∩ Fin))
19 heibor.8 . . . . . . . 8 (𝜑 → ∀𝑛 ∈ ℕ0 𝑋 = 𝑦 ∈ (𝐹𝑛)(𝑦𝐵𝑛))
20 heibor.9 . . . . . . . 8 (𝜑 → ∀𝑥𝐺 ((𝑇𝑥)𝐺((2nd𝑥) + 1) ∧ ((𝐵𝑥) ∩ ((𝑇𝑥)𝐵((2nd𝑥) + 1))) ∈ 𝐾))
21 heibor.10 . . . . . . . 8 (𝜑𝐶𝐺0)
22 heibor.11 . . . . . . . 8 𝑆 = seq0(𝑇, (𝑚 ∈ ℕ0 ↦ if(𝑚 = 0, 𝐶, (𝑚 − 1))))
23 heibor.12 . . . . . . . 8 𝑀 = (𝑛 ∈ ℕ ↦ ⟨(𝑆𝑛), (3 / (2↑𝑛))⟩)
249, 15, 16, 17, 1, 18, 19, 20, 21, 22, 23heiborlem7 33587 . . . . . . 7 𝑟 ∈ ℝ+𝑘 ∈ ℕ (2nd ‘(𝑀𝑘)) < 𝑟
2514, 24vtoclri 3278 . . . . . 6 ((𝑥 / 2) ∈ ℝ+ → ∃𝑘 ∈ ℕ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))
2612, 25syl 17 . . . . 5 (𝑥 ∈ ℝ+ → ∃𝑘 ∈ ℕ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))
2726adantl 482 . . . 4 ((𝜑𝑥 ∈ ℝ+) → ∃𝑘 ∈ ℕ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))
28 nnnn0 11284 . . . . . . 7 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
299, 15, 16, 17, 1, 18, 19, 20, 21, 22heiborlem4 33584 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (𝑆𝑘)𝐺𝑘)
30 fvex 6188 . . . . . . . . . 10 (𝑆𝑘) ∈ V
31 vex 3198 . . . . . . . . . 10 𝑘 ∈ V
329, 15, 16, 30, 31heiborlem2 33582 . . . . . . . . 9 ((𝑆𝑘)𝐺𝑘 ↔ (𝑘 ∈ ℕ0 ∧ (𝑆𝑘) ∈ (𝐹𝑘) ∧ ((𝑆𝑘)𝐵𝑘) ∈ 𝐾))
3332simp3bi 1076 . . . . . . . 8 ((𝑆𝑘)𝐺𝑘 → ((𝑆𝑘)𝐵𝑘) ∈ 𝐾)
3429, 33syl 17 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → ((𝑆𝑘)𝐵𝑘) ∈ 𝐾)
3528, 34sylan2 491 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → ((𝑆𝑘)𝐵𝑘) ∈ 𝐾)
3635ad2ant2r 782 . . . . 5 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((𝑆𝑘)𝐵𝑘) ∈ 𝐾)
374ad2antrr 761 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → 𝐷 ∈ (∞Met‘𝑋))
389, 15, 16, 17, 1, 18, 19, 20, 21, 22, 23heiborlem5 33585 . . . . . . . . . . . . 13 (𝜑𝑀:ℕ⟶(𝑋 × ℝ+))
3938ffvelrnda 6345 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ) → (𝑀𝑘) ∈ (𝑋 × ℝ+))
4039ad2ant2r 782 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (𝑀𝑘) ∈ (𝑋 × ℝ+))
41 xp1st 7183 . . . . . . . . . . 11 ((𝑀𝑘) ∈ (𝑋 × ℝ+) → (1st ‘(𝑀𝑘)) ∈ 𝑋)
4240, 41syl 17 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (1st ‘(𝑀𝑘)) ∈ 𝑋)
43 2nn 11170 . . . . . . . . . . . . . . 15 2 ∈ ℕ
44 nnexpcl 12856 . . . . . . . . . . . . . . 15 ((2 ∈ ℕ ∧ 𝑘 ∈ ℕ0) → (2↑𝑘) ∈ ℕ)
4543, 28, 44sylancr 694 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → (2↑𝑘) ∈ ℕ)
4645nnrpd 11855 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (2↑𝑘) ∈ ℝ+)
4746rpreccld 11867 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (1 / (2↑𝑘)) ∈ ℝ+)
4847ad2antrl 763 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (1 / (2↑𝑘)) ∈ ℝ+)
4948rpxrd 11858 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (1 / (2↑𝑘)) ∈ ℝ*)
50 xp2nd 7184 . . . . . . . . . . . 12 ((𝑀𝑘) ∈ (𝑋 × ℝ+) → (2nd ‘(𝑀𝑘)) ∈ ℝ+)
5140, 50syl 17 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (2nd ‘(𝑀𝑘)) ∈ ℝ+)
5251rpxrd 11858 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (2nd ‘(𝑀𝑘)) ∈ ℝ*)
53 1le3 11229 . . . . . . . . . . . . . 14 1 ≤ 3
54 elrp 11819 . . . . . . . . . . . . . . 15 ((2↑𝑘) ∈ ℝ+ ↔ ((2↑𝑘) ∈ ℝ ∧ 0 < (2↑𝑘)))
55 1re 10024 . . . . . . . . . . . . . . . 16 1 ∈ ℝ
56 3re 11079 . . . . . . . . . . . . . . . 16 3 ∈ ℝ
57 lediv1 10873 . . . . . . . . . . . . . . . 16 ((1 ∈ ℝ ∧ 3 ∈ ℝ ∧ ((2↑𝑘) ∈ ℝ ∧ 0 < (2↑𝑘))) → (1 ≤ 3 ↔ (1 / (2↑𝑘)) ≤ (3 / (2↑𝑘))))
5855, 56, 57mp3an12 1412 . . . . . . . . . . . . . . 15 (((2↑𝑘) ∈ ℝ ∧ 0 < (2↑𝑘)) → (1 ≤ 3 ↔ (1 / (2↑𝑘)) ≤ (3 / (2↑𝑘))))
5954, 58sylbi 207 . . . . . . . . . . . . . 14 ((2↑𝑘) ∈ ℝ+ → (1 ≤ 3 ↔ (1 / (2↑𝑘)) ≤ (3 / (2↑𝑘))))
6053, 59mpbii 223 . . . . . . . . . . . . 13 ((2↑𝑘) ∈ ℝ+ → (1 / (2↑𝑘)) ≤ (3 / (2↑𝑘)))
6146, 60syl 17 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (1 / (2↑𝑘)) ≤ (3 / (2↑𝑘)))
6261ad2antrl 763 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (1 / (2↑𝑘)) ≤ (3 / (2↑𝑘)))
63 fveq2 6178 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑘 → (𝑆𝑛) = (𝑆𝑘))
64 oveq2 6643 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑘 → (2↑𝑛) = (2↑𝑘))
6564oveq2d 6651 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑘 → (3 / (2↑𝑛)) = (3 / (2↑𝑘)))
6663, 65opeq12d 4401 . . . . . . . . . . . . . . 15 (𝑛 = 𝑘 → ⟨(𝑆𝑛), (3 / (2↑𝑛))⟩ = ⟨(𝑆𝑘), (3 / (2↑𝑘))⟩)
67 opex 4923 . . . . . . . . . . . . . . 15 ⟨(𝑆𝑘), (3 / (2↑𝑘))⟩ ∈ V
6866, 23, 67fvmpt 6269 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → (𝑀𝑘) = ⟨(𝑆𝑘), (3 / (2↑𝑘))⟩)
6968fveq2d 6182 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (2nd ‘(𝑀𝑘)) = (2nd ‘⟨(𝑆𝑘), (3 / (2↑𝑘))⟩))
70 ovex 6663 . . . . . . . . . . . . . 14 (3 / (2↑𝑘)) ∈ V
7130, 70op2nd 7162 . . . . . . . . . . . . 13 (2nd ‘⟨(𝑆𝑘), (3 / (2↑𝑘))⟩) = (3 / (2↑𝑘))
7269, 71syl6eq 2670 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (2nd ‘(𝑀𝑘)) = (3 / (2↑𝑘)))
7372ad2antrl 763 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (2nd ‘(𝑀𝑘)) = (3 / (2↑𝑘)))
7462, 73breqtrrd 4672 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (1 / (2↑𝑘)) ≤ (2nd ‘(𝑀𝑘)))
75 ssbl 22209 . . . . . . . . . 10 (((𝐷 ∈ (∞Met‘𝑋) ∧ (1st ‘(𝑀𝑘)) ∈ 𝑋) ∧ ((1 / (2↑𝑘)) ∈ ℝ* ∧ (2nd ‘(𝑀𝑘)) ∈ ℝ*) ∧ (1 / (2↑𝑘)) ≤ (2nd ‘(𝑀𝑘))) → ((1st ‘(𝑀𝑘))(ball‘𝐷)(1 / (2↑𝑘))) ⊆ ((1st ‘(𝑀𝑘))(ball‘𝐷)(2nd ‘(𝑀𝑘))))
7637, 42, 49, 52, 74, 75syl221anc 1335 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((1st ‘(𝑀𝑘))(ball‘𝐷)(1 / (2↑𝑘))) ⊆ ((1st ‘(𝑀𝑘))(ball‘𝐷)(2nd ‘(𝑀𝑘))))
7728ad2antrl 763 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → 𝑘 ∈ ℕ0)
78 oveq1 6642 . . . . . . . . . . . 12 (𝑧 = (1st ‘(𝑀𝑘)) → (𝑧(ball‘𝐷)(1 / (2↑𝑚))) = ((1st ‘(𝑀𝑘))(ball‘𝐷)(1 / (2↑𝑚))))
79 oveq2 6643 . . . . . . . . . . . . . 14 (𝑚 = 𝑘 → (2↑𝑚) = (2↑𝑘))
8079oveq2d 6651 . . . . . . . . . . . . 13 (𝑚 = 𝑘 → (1 / (2↑𝑚)) = (1 / (2↑𝑘)))
8180oveq2d 6651 . . . . . . . . . . . 12 (𝑚 = 𝑘 → ((1st ‘(𝑀𝑘))(ball‘𝐷)(1 / (2↑𝑚))) = ((1st ‘(𝑀𝑘))(ball‘𝐷)(1 / (2↑𝑘))))
82 ovex 6663 . . . . . . . . . . . 12 ((1st ‘(𝑀𝑘))(ball‘𝐷)(1 / (2↑𝑘))) ∈ V
8378, 81, 17, 82ovmpt2 6781 . . . . . . . . . . 11 (((1st ‘(𝑀𝑘)) ∈ 𝑋𝑘 ∈ ℕ0) → ((1st ‘(𝑀𝑘))𝐵𝑘) = ((1st ‘(𝑀𝑘))(ball‘𝐷)(1 / (2↑𝑘))))
8442, 77, 83syl2anc 692 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((1st ‘(𝑀𝑘))𝐵𝑘) = ((1st ‘(𝑀𝑘))(ball‘𝐷)(1 / (2↑𝑘))))
8568fveq2d 6182 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → (1st ‘(𝑀𝑘)) = (1st ‘⟨(𝑆𝑘), (3 / (2↑𝑘))⟩))
8630, 70op1st 7161 . . . . . . . . . . . . 13 (1st ‘⟨(𝑆𝑘), (3 / (2↑𝑘))⟩) = (𝑆𝑘)
8785, 86syl6eq 2670 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → (1st ‘(𝑀𝑘)) = (𝑆𝑘))
8887ad2antrl 763 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (1st ‘(𝑀𝑘)) = (𝑆𝑘))
8988oveq1d 6650 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((1st ‘(𝑀𝑘))𝐵𝑘) = ((𝑆𝑘)𝐵𝑘))
9084, 89eqtr3d 2656 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((1st ‘(𝑀𝑘))(ball‘𝐷)(1 / (2↑𝑘))) = ((𝑆𝑘)𝐵𝑘))
91 1st2nd2 7190 . . . . . . . . . . . 12 ((𝑀𝑘) ∈ (𝑋 × ℝ+) → (𝑀𝑘) = ⟨(1st ‘(𝑀𝑘)), (2nd ‘(𝑀𝑘))⟩)
9240, 91syl 17 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (𝑀𝑘) = ⟨(1st ‘(𝑀𝑘)), (2nd ‘(𝑀𝑘))⟩)
9392fveq2d 6182 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((ball‘𝐷)‘(𝑀𝑘)) = ((ball‘𝐷)‘⟨(1st ‘(𝑀𝑘)), (2nd ‘(𝑀𝑘))⟩))
94 df-ov 6638 . . . . . . . . . 10 ((1st ‘(𝑀𝑘))(ball‘𝐷)(2nd ‘(𝑀𝑘))) = ((ball‘𝐷)‘⟨(1st ‘(𝑀𝑘)), (2nd ‘(𝑀𝑘))⟩)
9593, 94syl6reqr 2673 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((1st ‘(𝑀𝑘))(ball‘𝐷)(2nd ‘(𝑀𝑘))) = ((ball‘𝐷)‘(𝑀𝑘)))
9676, 90, 953sstr3d 3639 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((𝑆𝑘)𝐵𝑘) ⊆ ((ball‘𝐷)‘(𝑀𝑘)))
979mopntop 22226 . . . . . . . . . . 11 (𝐷 ∈ (∞Met‘𝑋) → 𝐽 ∈ Top)
9837, 97syl 17 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → 𝐽 ∈ Top)
99 blssm 22204 . . . . . . . . . . . 12 ((𝐷 ∈ (∞Met‘𝑋) ∧ (1st ‘(𝑀𝑘)) ∈ 𝑋 ∧ (2nd ‘(𝑀𝑘)) ∈ ℝ*) → ((1st ‘(𝑀𝑘))(ball‘𝐷)(2nd ‘(𝑀𝑘))) ⊆ 𝑋)
10037, 42, 52, 99syl3anc 1324 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((1st ‘(𝑀𝑘))(ball‘𝐷)(2nd ‘(𝑀𝑘))) ⊆ 𝑋)
1019mopnuni 22227 . . . . . . . . . . . 12 (𝐷 ∈ (∞Met‘𝑋) → 𝑋 = 𝐽)
10237, 101syl 17 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → 𝑋 = 𝐽)
103100, 95, 1023sstr3d 3639 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((ball‘𝐷)‘(𝑀𝑘)) ⊆ 𝐽)
104 eqid 2620 . . . . . . . . . . 11 𝐽 = 𝐽
105104sscls 20841 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ ((ball‘𝐷)‘(𝑀𝑘)) ⊆ 𝐽) → ((ball‘𝐷)‘(𝑀𝑘)) ⊆ ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘))))
10698, 103, 105syl2anc 692 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((ball‘𝐷)‘(𝑀𝑘)) ⊆ ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘))))
10795fveq2d 6182 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((cls‘𝐽)‘((1st ‘(𝑀𝑘))(ball‘𝐷)(2nd ‘(𝑀𝑘)))) = ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘))))
10812ad2antlr 762 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (𝑥 / 2) ∈ ℝ+)
109108rpxrd 11858 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (𝑥 / 2) ∈ ℝ*)
110 simprr 795 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (2nd ‘(𝑀𝑘)) < (𝑥 / 2))
1119blsscls 22293 . . . . . . . . . . . 12 (((𝐷 ∈ (∞Met‘𝑋) ∧ (1st ‘(𝑀𝑘)) ∈ 𝑋) ∧ ((2nd ‘(𝑀𝑘)) ∈ ℝ* ∧ (𝑥 / 2) ∈ ℝ* ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((cls‘𝐽)‘((1st ‘(𝑀𝑘))(ball‘𝐷)(2nd ‘(𝑀𝑘)))) ⊆ ((1st ‘(𝑀𝑘))(ball‘𝐷)(𝑥 / 2)))
11237, 42, 52, 109, 110, 111syl23anc 1331 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((cls‘𝐽)‘((1st ‘(𝑀𝑘))(ball‘𝐷)(2nd ‘(𝑀𝑘)))) ⊆ ((1st ‘(𝑀𝑘))(ball‘𝐷)(𝑥 / 2)))
113107, 112eqsstr3d 3632 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘))) ⊆ ((1st ‘(𝑀𝑘))(ball‘𝐷)(𝑥 / 2)))
114 rpre 11824 . . . . . . . . . . . 12 (𝑥 ∈ ℝ+𝑥 ∈ ℝ)
115114ad2antlr 762 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → 𝑥 ∈ ℝ)
116 heibor.17 . . . . . . . . . . . . . . 15 (𝜑 → (1st𝑀)(⇝𝑡𝐽)𝑌)
1179, 15, 16, 17, 1, 18, 19, 20, 21, 22, 23heiborlem6 33586 . . . . . . . . . . . . . . . . 17 (𝜑 → ∀𝑡 ∈ ℕ ((ball‘𝐷)‘(𝑀‘(𝑡 + 1))) ⊆ ((ball‘𝐷)‘(𝑀𝑡)))
1184, 38, 117, 9caublcls 23088 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (1st𝑀)(⇝𝑡𝐽)𝑌𝑘 ∈ ℕ) → 𝑌 ∈ ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘))))
1191183expia 1265 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (1st𝑀)(⇝𝑡𝐽)𝑌) → (𝑘 ∈ ℕ → 𝑌 ∈ ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘)))))
120116, 119mpdan 701 . . . . . . . . . . . . . 14 (𝜑 → (𝑘 ∈ ℕ → 𝑌 ∈ ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘)))))
121120imp 445 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ) → 𝑌 ∈ ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘))))
122121ad2ant2r 782 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → 𝑌 ∈ ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘))))
123113, 122sseldd 3596 . . . . . . . . . . 11 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → 𝑌 ∈ ((1st ‘(𝑀𝑘))(ball‘𝐷)(𝑥 / 2)))
124 blhalf 22191 . . . . . . . . . . 11 (((𝐷 ∈ (∞Met‘𝑋) ∧ (1st ‘(𝑀𝑘)) ∈ 𝑋) ∧ (𝑥 ∈ ℝ ∧ 𝑌 ∈ ((1st ‘(𝑀𝑘))(ball‘𝐷)(𝑥 / 2)))) → ((1st ‘(𝑀𝑘))(ball‘𝐷)(𝑥 / 2)) ⊆ (𝑌(ball‘𝐷)𝑥))
12537, 42, 115, 123, 124syl22anc 1325 . . . . . . . . . 10 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((1st ‘(𝑀𝑘))(ball‘𝐷)(𝑥 / 2)) ⊆ (𝑌(ball‘𝐷)𝑥))
126113, 125sstrd 3605 . . . . . . . . 9 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((cls‘𝐽)‘((ball‘𝐷)‘(𝑀𝑘))) ⊆ (𝑌(ball‘𝐷)𝑥))
127106, 126sstrd 3605 . . . . . . . 8 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((ball‘𝐷)‘(𝑀𝑘)) ⊆ (𝑌(ball‘𝐷)𝑥))
12896, 127sstrd 3605 . . . . . . 7 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((𝑆𝑘)𝐵𝑘) ⊆ (𝑌(ball‘𝐷)𝑥))
129 sstr2 3602 . . . . . . 7 (((𝑆𝑘)𝐵𝑘) ⊆ (𝑌(ball‘𝐷)𝑥) → ((𝑌(ball‘𝐷)𝑥) ⊆ 𝑍 → ((𝑆𝑘)𝐵𝑘) ⊆ 𝑍))
130128, 129syl 17 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((𝑌(ball‘𝐷)𝑥) ⊆ 𝑍 → ((𝑆𝑘)𝐵𝑘) ⊆ 𝑍))
131 unisng 4443 . . . . . . . . . . . . 13 (𝑍𝑈 {𝑍} = 𝑍)
1326, 131syl 17 . . . . . . . . . . . 12 (𝜑 {𝑍} = 𝑍)
133132sseq2d 3625 . . . . . . . . . . 11 (𝜑 → (((𝑆𝑘)𝐵𝑘) ⊆ {𝑍} ↔ ((𝑆𝑘)𝐵𝑘) ⊆ 𝑍))
134133biimpar 502 . . . . . . . . . 10 ((𝜑 ∧ ((𝑆𝑘)𝐵𝑘) ⊆ 𝑍) → ((𝑆𝑘)𝐵𝑘) ⊆ {𝑍})
1356snssd 4331 . . . . . . . . . . . . 13 (𝜑 → {𝑍} ⊆ 𝑈)
136 snex 4899 . . . . . . . . . . . . . 14 {𝑍} ∈ V
137136elpw 4155 . . . . . . . . . . . . 13 ({𝑍} ∈ 𝒫 𝑈 ↔ {𝑍} ⊆ 𝑈)
138135, 137sylibr 224 . . . . . . . . . . . 12 (𝜑 → {𝑍} ∈ 𝒫 𝑈)
139 snfi 8023 . . . . . . . . . . . . 13 {𝑍} ∈ Fin
140139a1i 11 . . . . . . . . . . . 12 (𝜑 → {𝑍} ∈ Fin)
141138, 140elind 3790 . . . . . . . . . . 11 (𝜑 → {𝑍} ∈ (𝒫 𝑈 ∩ Fin))
142 unieq 4435 . . . . . . . . . . . . 13 (𝑣 = {𝑍} → 𝑣 = {𝑍})
143142sseq2d 3625 . . . . . . . . . . . 12 (𝑣 = {𝑍} → (((𝑆𝑘)𝐵𝑘) ⊆ 𝑣 ↔ ((𝑆𝑘)𝐵𝑘) ⊆ {𝑍}))
144143rspcev 3304 . . . . . . . . . . 11 (({𝑍} ∈ (𝒫 𝑈 ∩ Fin) ∧ ((𝑆𝑘)𝐵𝑘) ⊆ {𝑍}) → ∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)((𝑆𝑘)𝐵𝑘) ⊆ 𝑣)
145141, 144sylan 488 . . . . . . . . . 10 ((𝜑 ∧ ((𝑆𝑘)𝐵𝑘) ⊆ {𝑍}) → ∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)((𝑆𝑘)𝐵𝑘) ⊆ 𝑣)
146134, 145syldan 487 . . . . . . . . 9 ((𝜑 ∧ ((𝑆𝑘)𝐵𝑘) ⊆ 𝑍) → ∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)((𝑆𝑘)𝐵𝑘) ⊆ 𝑣)
147 ovex 6663 . . . . . . . . . . 11 ((𝑆𝑘)𝐵𝑘) ∈ V
148 sseq1 3618 . . . . . . . . . . . . 13 (𝑢 = ((𝑆𝑘)𝐵𝑘) → (𝑢 𝑣 ↔ ((𝑆𝑘)𝐵𝑘) ⊆ 𝑣))
149148rexbidv 3048 . . . . . . . . . . . 12 (𝑢 = ((𝑆𝑘)𝐵𝑘) → (∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)𝑢 𝑣 ↔ ∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)((𝑆𝑘)𝐵𝑘) ⊆ 𝑣))
150149notbid 308 . . . . . . . . . . 11 (𝑢 = ((𝑆𝑘)𝐵𝑘) → (¬ ∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)𝑢 𝑣 ↔ ¬ ∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)((𝑆𝑘)𝐵𝑘) ⊆ 𝑣))
151147, 150, 15elab2 3348 . . . . . . . . . 10 (((𝑆𝑘)𝐵𝑘) ∈ 𝐾 ↔ ¬ ∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)((𝑆𝑘)𝐵𝑘) ⊆ 𝑣)
152151con2bii 347 . . . . . . . . 9 (∃𝑣 ∈ (𝒫 𝑈 ∩ Fin)((𝑆𝑘)𝐵𝑘) ⊆ 𝑣 ↔ ¬ ((𝑆𝑘)𝐵𝑘) ∈ 𝐾)
153146, 152sylib 208 . . . . . . . 8 ((𝜑 ∧ ((𝑆𝑘)𝐵𝑘) ⊆ 𝑍) → ¬ ((𝑆𝑘)𝐵𝑘) ∈ 𝐾)
154153ex 450 . . . . . . 7 (𝜑 → (((𝑆𝑘)𝐵𝑘) ⊆ 𝑍 → ¬ ((𝑆𝑘)𝐵𝑘) ∈ 𝐾))
155154ad2antrr 761 . . . . . 6 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → (((𝑆𝑘)𝐵𝑘) ⊆ 𝑍 → ¬ ((𝑆𝑘)𝐵𝑘) ∈ 𝐾))
156130, 155syld 47 . . . . 5 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ((𝑌(ball‘𝐷)𝑥) ⊆ 𝑍 → ¬ ((𝑆𝑘)𝐵𝑘) ∈ 𝐾))
15736, 156mt2d 131 . . . 4 (((𝜑𝑥 ∈ ℝ+) ∧ (𝑘 ∈ ℕ ∧ (2nd ‘(𝑀𝑘)) < (𝑥 / 2))) → ¬ (𝑌(ball‘𝐷)𝑥) ⊆ 𝑍)
15827, 157rexlimddv 3031 . . 3 ((𝜑𝑥 ∈ ℝ+) → ¬ (𝑌(ball‘𝐷)𝑥) ⊆ 𝑍)
159158nrexdv 2998 . 2 (𝜑 → ¬ ∃𝑥 ∈ ℝ+ (𝑌(ball‘𝐷)𝑥) ⊆ 𝑍)
16011, 159pm2.21dd 186 1 (𝜑𝜓)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 384  w3a 1036   = wceq 1481  wcel 1988  {cab 2606  wral 2909  wrex 2910  Vcvv 3195  cin 3566  wss 3567  ifcif 4077  𝒫 cpw 4149  {csn 4168  cop 4174   cuni 4427   ciun 4511   class class class wbr 4644  {copab 4703  cmpt 4720   × cxp 5102  ccom 5108  wf 5872  cfv 5876  (class class class)co 6635  cmpt2 6637  1st c1st 7151  2nd c2nd 7152  Fincfn 7940  cr 9920  0cc0 9921  1c1 9922   + caddc 9924  *cxr 10058   < clt 10059  cle 10060  cmin 10251   / cdiv 10669  cn 11005  2c2 11055  3c3 11056  0cn0 11277  +crp 11817  seqcseq 12784  cexp 12843  ∞Metcxmt 19712  Metcme 19713  ballcbl 19714  MetOpencmopn 19717  Topctop 20679  clsccl 20803  𝑡clm 21011  CMetcms 23033
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1720  ax-4 1735  ax-5 1837  ax-6 1886  ax-7 1933  ax-8 1990  ax-9 1997  ax-10 2017  ax-11 2032  ax-12 2045  ax-13 2244  ax-ext 2600  ax-rep 4762  ax-sep 4772  ax-nul 4780  ax-pow 4834  ax-pr 4897  ax-un 6934  ax-cnex 9977  ax-resscn 9978  ax-1cn 9979  ax-icn 9980  ax-addcl 9981  ax-addrcl 9982  ax-mulcl 9983  ax-mulrcl 9984  ax-mulcom 9985  ax-addass 9986  ax-mulass 9987  ax-distr 9988  ax-i2m1 9989  ax-1ne0 9990  ax-1rid 9991  ax-rnegex 9992  ax-rrecex 9993  ax-cnre 9994  ax-pre-lttri 9995  ax-pre-lttrn 9996  ax-pre-ltadd 9997  ax-pre-mulgt0 9998  ax-pre-sup 9999
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1484  df-ex 1703  df-nf 1708  df-sb 1879  df-eu 2472  df-mo 2473  df-clab 2607  df-cleq 2613  df-clel 2616  df-nfc 2751  df-ne 2792  df-nel 2895  df-ral 2914  df-rex 2915  df-reu 2916  df-rmo 2917  df-rab 2918  df-v 3197  df-sbc 3430  df-csb 3527  df-dif 3570  df-un 3572  df-in 3574  df-ss 3581  df-pss 3583  df-nul 3908  df-if 4078  df-pw 4151  df-sn 4169  df-pr 4171  df-tp 4173  df-op 4175  df-uni 4428  df-int 4467  df-iun 4513  df-iin 4514  df-br 4645  df-opab 4704  df-mpt 4721  df-tr 4744  df-id 5014  df-eprel 5019  df-po 5025  df-so 5026  df-fr 5063  df-we 5065  df-xp 5110  df-rel 5111  df-cnv 5112  df-co 5113  df-dm 5114  df-rn 5115  df-res 5116  df-ima 5117  df-pred 5668  df-ord 5714  df-on 5715  df-lim 5716  df-suc 5717  df-iota 5839  df-fun 5878  df-fn 5879  df-f 5880  df-f1 5881  df-fo 5882  df-f1o 5883  df-fv 5884  df-riota 6596  df-ov 6638  df-oprab 6639  df-mpt2 6640  df-om 7051  df-1st 7153  df-2nd 7154  df-wrecs 7392  df-recs 7453  df-rdg 7491  df-1o 7545  df-er 7727  df-map 7844  df-pm 7845  df-en 7941  df-dom 7942  df-sdom 7943  df-fin 7944  df-sup 8333  df-inf 8334  df-pnf 10061  df-mnf 10062  df-xr 10063  df-ltxr 10064  df-le 10065  df-sub 10253  df-neg 10254  df-div 10670  df-nn 11006  df-2 11064  df-3 11065  df-n0 11278  df-z 11363  df-uz 11673  df-q 11774  df-rp 11818  df-xneg 11931  df-xadd 11932  df-xmul 11933  df-fl 12576  df-seq 12785  df-exp 12844  df-topgen 16085  df-psmet 19719  df-xmet 19720  df-met 19721  df-bl 19722  df-mopn 19723  df-top 20680  df-topon 20697  df-bases 20731  df-cld 20804  df-ntr 20805  df-cls 20806  df-lm 21014  df-cmet 23036
This theorem is referenced by:  heiborlem9  33589
  Copyright terms: Public domain W3C validator