MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  ubthlem1 Structured version   Visualization version   GIF version

Theorem ubthlem1 30842
Description: Lemma for ubth 30845. The function 𝐴 exhibits a countable collection of sets that are closed, being the inverse image under 𝑡 of the closed ball of radius 𝑘, and by assumption they cover 𝑋. Thus, by the Baire Category theorem bcth2 25252, for some 𝑛 the set 𝐴𝑛 has an interior, meaning that there is a closed ball {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} in the set. (Contributed by Mario Carneiro, 11-Jan-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
ubth.1 𝑋 = (BaseSet‘𝑈)
ubth.2 𝑁 = (normCV𝑊)
ubthlem.3 𝐷 = (IndMet‘𝑈)
ubthlem.4 𝐽 = (MetOpen‘𝐷)
ubthlem.5 𝑈 ∈ CBan
ubthlem.6 𝑊 ∈ NrmCVec
ubthlem.7 (𝜑𝑇 ⊆ (𝑈 BLnOp 𝑊))
ubthlem.8 (𝜑 → ∀𝑥𝑋𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐)
ubthlem.9 𝐴 = (𝑘 ∈ ℕ ↦ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
Assertion
Ref Expression
ubthlem1 (𝜑 → ∃𝑛 ∈ ℕ ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))
Distinct variable groups:   𝑘,𝑐,𝑛,𝑟,𝑥,𝑦,𝑧,𝐴   𝑡,𝑐,𝐷,𝑘,𝑛,𝑟,𝑥,𝑧   𝑘,𝐽,𝑛   𝑦,𝑡,𝐽,𝑥   𝑁,𝑐,𝑘,𝑛,𝑟,𝑡,𝑥,𝑦,𝑧   𝜑,𝑐,𝑘,𝑛,𝑟,𝑡,𝑥,𝑦   𝑇,𝑐,𝑘,𝑛,𝑟,𝑡,𝑥,𝑦,𝑧   𝑈,𝑐,𝑛,𝑟,𝑡,𝑥,𝑦,𝑧   𝑊,𝑐,𝑛,𝑟,𝑡,𝑥,𝑦   𝑋,𝑐,𝑘,𝑛,𝑟,𝑡,𝑥,𝑦,𝑧
Allowed substitution hints:   𝜑(𝑧)   𝐴(𝑡)   𝐷(𝑦)   𝑈(𝑘)   𝐽(𝑧,𝑟,𝑐)   𝑊(𝑧,𝑘)

Proof of Theorem ubthlem1
StepHypRef Expression
1 rzal 4454 . . . . . . . . 9 (𝑇 = ∅ → ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘)
21ralrimivw 3128 . . . . . . . 8 (𝑇 = ∅ → ∀𝑧𝑋𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘)
3 rabid2 3428 . . . . . . . 8 (𝑋 = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ ∀𝑧𝑋𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘)
42, 3sylibr 234 . . . . . . 7 (𝑇 = ∅ → 𝑋 = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
54eqcomd 2737 . . . . . 6 (𝑇 = ∅ → {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} = 𝑋)
65eleq1d 2816 . . . . 5 (𝑇 = ∅ → ({𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽) ↔ 𝑋 ∈ (Clsd‘𝐽)))
7 iinrab 5012 . . . . . . 7 (𝑇 ≠ ∅ → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
87adantl 481 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑇 ≠ ∅) → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
9 id 22 . . . . . . 7 (𝑇 ≠ ∅ → 𝑇 ≠ ∅)
10 ubthlem.7 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑇 ⊆ (𝑈 BLnOp 𝑊))
1110sselda 3929 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑡𝑇) → 𝑡 ∈ (𝑈 BLnOp 𝑊))
12 ubthlem.3 . . . . . . . . . . . . . . . . . . . 20 𝐷 = (IndMet‘𝑈)
13 eqid 2731 . . . . . . . . . . . . . . . . . . . 20 (IndMet‘𝑊) = (IndMet‘𝑊)
14 ubthlem.4 . . . . . . . . . . . . . . . . . . . 20 𝐽 = (MetOpen‘𝐷)
15 eqid 2731 . . . . . . . . . . . . . . . . . . . 20 (MetOpen‘(IndMet‘𝑊)) = (MetOpen‘(IndMet‘𝑊))
16 eqid 2731 . . . . . . . . . . . . . . . . . . . 20 (𝑈 BLnOp 𝑊) = (𝑈 BLnOp 𝑊)
17 ubthlem.5 . . . . . . . . . . . . . . . . . . . . 21 𝑈 ∈ CBan
18 bnnv 30838 . . . . . . . . . . . . . . . . . . . . 21 (𝑈 ∈ CBan → 𝑈 ∈ NrmCVec)
1917, 18ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 𝑈 ∈ NrmCVec
20 ubthlem.6 . . . . . . . . . . . . . . . . . . . 20 𝑊 ∈ NrmCVec
2112, 13, 14, 15, 16, 19, 20blocn2 30780 . . . . . . . . . . . . . . . . . . 19 (𝑡 ∈ (𝑈 BLnOp 𝑊) → 𝑡 ∈ (𝐽 Cn (MetOpen‘(IndMet‘𝑊))))
22 ubth.1 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑋 = (BaseSet‘𝑈)
2322, 12cbncms 30837 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑈 ∈ CBan → 𝐷 ∈ (CMet‘𝑋))
2417, 23ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22 𝐷 ∈ (CMet‘𝑋)
25 cmetmet 25208 . . . . . . . . . . . . . . . . . . . . . 22 (𝐷 ∈ (CMet‘𝑋) → 𝐷 ∈ (Met‘𝑋))
26 metxmet 24244 . . . . . . . . . . . . . . . . . . . . . 22 (𝐷 ∈ (Met‘𝑋) → 𝐷 ∈ (∞Met‘𝑋))
2724, 25, 26mp2b 10 . . . . . . . . . . . . . . . . . . . . 21 𝐷 ∈ (∞Met‘𝑋)
2814mopntopon 24349 . . . . . . . . . . . . . . . . . . . . 21 (𝐷 ∈ (∞Met‘𝑋) → 𝐽 ∈ (TopOn‘𝑋))
2927, 28ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 𝐽 ∈ (TopOn‘𝑋)
30 eqid 2731 . . . . . . . . . . . . . . . . . . . . . . 23 (BaseSet‘𝑊) = (BaseSet‘𝑊)
3130, 13imsxmet 30664 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 ∈ NrmCVec → (IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)))
3220, 31ax-mp 5 . . . . . . . . . . . . . . . . . . . . 21 (IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊))
3315mopntopon 24349 . . . . . . . . . . . . . . . . . . . . 21 ((IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)) → (MetOpen‘(IndMet‘𝑊)) ∈ (TopOn‘(BaseSet‘𝑊)))
3432, 33ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 (MetOpen‘(IndMet‘𝑊)) ∈ (TopOn‘(BaseSet‘𝑊))
35 iscncl 23179 . . . . . . . . . . . . . . . . . . . 20 ((𝐽 ∈ (TopOn‘𝑋) ∧ (MetOpen‘(IndMet‘𝑊)) ∈ (TopOn‘(BaseSet‘𝑊))) → (𝑡 ∈ (𝐽 Cn (MetOpen‘(IndMet‘𝑊))) ↔ (𝑡:𝑋⟶(BaseSet‘𝑊) ∧ ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽))))
3629, 34, 35mp2an 692 . . . . . . . . . . . . . . . . . . 19 (𝑡 ∈ (𝐽 Cn (MetOpen‘(IndMet‘𝑊))) ↔ (𝑡:𝑋⟶(BaseSet‘𝑊) ∧ ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽)))
3721, 36sylib 218 . . . . . . . . . . . . . . . . . 18 (𝑡 ∈ (𝑈 BLnOp 𝑊) → (𝑡:𝑋⟶(BaseSet‘𝑊) ∧ ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽)))
3811, 37syl 17 . . . . . . . . . . . . . . . . 17 ((𝜑𝑡𝑇) → (𝑡:𝑋⟶(BaseSet‘𝑊) ∧ ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽)))
3938simpld 494 . . . . . . . . . . . . . . . 16 ((𝜑𝑡𝑇) → 𝑡:𝑋⟶(BaseSet‘𝑊))
4039adantlr 715 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → 𝑡:𝑋⟶(BaseSet‘𝑊))
4140ffvelcdmda 7012 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) ∧ 𝑥𝑋) → (𝑡𝑥) ∈ (BaseSet‘𝑊))
4241biantrurd 532 . . . . . . . . . . . . 13 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) ∧ 𝑥𝑋) → ((𝑁‘(𝑡𝑥)) ≤ 𝑘 ↔ ((𝑡𝑥) ∈ (BaseSet‘𝑊) ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
43 fveq2 6817 . . . . . . . . . . . . . . 15 (𝑦 = (𝑡𝑥) → (𝑁𝑦) = (𝑁‘(𝑡𝑥)))
4443breq1d 5096 . . . . . . . . . . . . . 14 (𝑦 = (𝑡𝑥) → ((𝑁𝑦) ≤ 𝑘 ↔ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
4544elrab 3642 . . . . . . . . . . . . 13 ((𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} ↔ ((𝑡𝑥) ∈ (BaseSet‘𝑊) ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
4642, 45bitr4di 289 . . . . . . . . . . . 12 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) ∧ 𝑥𝑋) → ((𝑁‘(𝑡𝑥)) ≤ 𝑘 ↔ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}))
4746pm5.32da 579 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → ((𝑥𝑋 ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘) ↔ (𝑥𝑋 ∧ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
48 2fveq3 6822 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (𝑁‘(𝑡𝑧)) = (𝑁‘(𝑡𝑥)))
4948breq1d 5096 . . . . . . . . . . . . 13 (𝑧 = 𝑥 → ((𝑁‘(𝑡𝑧)) ≤ 𝑘 ↔ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
5049elrab 3642 . . . . . . . . . . . 12 (𝑥 ∈ {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ (𝑥𝑋 ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
5150a1i 11 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑥 ∈ {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ (𝑥𝑋 ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
52 ffn 6646 . . . . . . . . . . . 12 (𝑡:𝑋⟶(BaseSet‘𝑊) → 𝑡 Fn 𝑋)
53 elpreima 6986 . . . . . . . . . . . 12 (𝑡 Fn 𝑋 → (𝑥 ∈ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ↔ (𝑥𝑋 ∧ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
5440, 52, 533syl 18 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑥 ∈ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ↔ (𝑥𝑋 ∧ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
5547, 51, 543bitr4d 311 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑥 ∈ {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ 𝑥 ∈ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
5655eqrdv 2729 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} = (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}))
57 imaeq2 6000 . . . . . . . . . . 11 (𝑥 = {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} → (𝑡𝑥) = (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}))
5857eleq1d 2816 . . . . . . . . . 10 (𝑥 = {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} → ((𝑡𝑥) ∈ (Clsd‘𝐽) ↔ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ∈ (Clsd‘𝐽)))
5938simprd 495 . . . . . . . . . . 11 ((𝜑𝑡𝑇) → ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽))
6059adantlr 715 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽))
61 nnre 12127 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
6261ad2antlr 727 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → 𝑘 ∈ ℝ)
6362rexrd 11157 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → 𝑘 ∈ ℝ*)
64 eqid 2731 . . . . . . . . . . . . . 14 (0vec𝑊) = (0vec𝑊)
6530, 64nvzcl 30606 . . . . . . . . . . . . 13 (𝑊 ∈ NrmCVec → (0vec𝑊) ∈ (BaseSet‘𝑊))
6620, 65ax-mp 5 . . . . . . . . . . . 12 (0vec𝑊) ∈ (BaseSet‘𝑊)
67 ubth.2 . . . . . . . . . . . . . . . . . 18 𝑁 = (normCV𝑊)
6830, 64, 67, 13nvnd 30660 . . . . . . . . . . . . . . . . 17 ((𝑊 ∈ NrmCVec ∧ 𝑦 ∈ (BaseSet‘𝑊)) → (𝑁𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
6920, 68mpan 690 . . . . . . . . . . . . . . . 16 (𝑦 ∈ (BaseSet‘𝑊) → (𝑁𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
70 xmetsym 24257 . . . . . . . . . . . . . . . . 17 (((IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)) ∧ (0vec𝑊) ∈ (BaseSet‘𝑊) ∧ 𝑦 ∈ (BaseSet‘𝑊)) → ((0vec𝑊)(IndMet‘𝑊)𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
7132, 66, 70mp3an12 1453 . . . . . . . . . . . . . . . 16 (𝑦 ∈ (BaseSet‘𝑊) → ((0vec𝑊)(IndMet‘𝑊)𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
7269, 71eqtr4d 2769 . . . . . . . . . . . . . . 15 (𝑦 ∈ (BaseSet‘𝑊) → (𝑁𝑦) = ((0vec𝑊)(IndMet‘𝑊)𝑦))
7372breq1d 5096 . . . . . . . . . . . . . 14 (𝑦 ∈ (BaseSet‘𝑊) → ((𝑁𝑦) ≤ 𝑘 ↔ ((0vec𝑊)(IndMet‘𝑊)𝑦) ≤ 𝑘))
7473rabbiia 3399 . . . . . . . . . . . . 13 {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} = {𝑦 ∈ (BaseSet‘𝑊) ∣ ((0vec𝑊)(IndMet‘𝑊)𝑦) ≤ 𝑘}
7515, 74blcld 24415 . . . . . . . . . . . 12 (((IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)) ∧ (0vec𝑊) ∈ (BaseSet‘𝑊) ∧ 𝑘 ∈ ℝ*) → {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊))))
7632, 66, 75mp3an12 1453 . . . . . . . . . . 11 (𝑘 ∈ ℝ* → {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊))))
7763, 76syl 17 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊))))
7858, 60, 77rspcdva 3573 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ∈ (Clsd‘𝐽))
7956, 78eqeltrd 2831 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
8079ralrimiva 3124 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → ∀𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
81 iincld 22949 . . . . . . 7 ((𝑇 ≠ ∅ ∧ ∀𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽)) → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
829, 80, 81syl2anr 597 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑇 ≠ ∅) → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
838, 82eqeltrrd 2832 . . . . 5 (((𝜑𝑘 ∈ ℕ) ∧ 𝑇 ≠ ∅) → {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
8414mopntop 24350 . . . . . . . 8 (𝐷 ∈ (∞Met‘𝑋) → 𝐽 ∈ Top)
8527, 84ax-mp 5 . . . . . . 7 𝐽 ∈ Top
8629toponunii 22826 . . . . . . . 8 𝑋 = 𝐽
8786topcld 22945 . . . . . . 7 (𝐽 ∈ Top → 𝑋 ∈ (Clsd‘𝐽))
8885, 87ax-mp 5 . . . . . 6 𝑋 ∈ (Clsd‘𝐽)
8988a1i 11 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝑋 ∈ (Clsd‘𝐽))
906, 83, 89pm2.61ne 3013 . . . 4 ((𝜑𝑘 ∈ ℕ) → {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
91 ubthlem.9 . . . 4 𝐴 = (𝑘 ∈ ℕ ↦ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
9290, 91fmptd 7042 . . 3 (𝜑𝐴:ℕ⟶(Clsd‘𝐽))
9392frnd 6654 . . . . . 6 (𝜑 → ran 𝐴 ⊆ (Clsd‘𝐽))
9486cldss2 22940 . . . . . 6 (Clsd‘𝐽) ⊆ 𝒫 𝑋
9593, 94sstrdi 3942 . . . . 5 (𝜑 → ran 𝐴 ⊆ 𝒫 𝑋)
96 sspwuni 5043 . . . . 5 (ran 𝐴 ⊆ 𝒫 𝑋 ran 𝐴𝑋)
9795, 96sylib 218 . . . 4 (𝜑 ran 𝐴𝑋)
98 ubthlem.8 . . . . . 6 (𝜑 → ∀𝑥𝑋𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐)
99 arch 12373 . . . . . . . . . 10 (𝑐 ∈ ℝ → ∃𝑘 ∈ ℕ 𝑐 < 𝑘)
10099adantl 481 . . . . . . . . 9 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → ∃𝑘 ∈ ℕ 𝑐 < 𝑘)
101 simpr 484 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → 𝑐 ∈ ℝ)
102 ltle 11196 . . . . . . . . . . . . . . . . 17 ((𝑐 ∈ ℝ ∧ 𝑘 ∈ ℝ) → (𝑐 < 𝑘𝑐𝑘))
103101, 61, 102syl2an 596 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (𝑐 < 𝑘𝑐𝑘))
104103impr 454 . . . . . . . . . . . . . . 15 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) → 𝑐𝑘)
105104adantr 480 . . . . . . . . . . . . . 14 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → 𝑐𝑘)
10639ffvelcdmda 7012 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑡𝑇) ∧ 𝑥𝑋) → (𝑡𝑥) ∈ (BaseSet‘𝑊))
107106an32s 652 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥𝑋) ∧ 𝑡𝑇) → (𝑡𝑥) ∈ (BaseSet‘𝑊))
10830, 67nvcl 30633 . . . . . . . . . . . . . . . . . 18 ((𝑊 ∈ NrmCVec ∧ (𝑡𝑥) ∈ (BaseSet‘𝑊)) → (𝑁‘(𝑡𝑥)) ∈ ℝ)
10920, 107, 108sylancr 587 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥𝑋) ∧ 𝑡𝑇) → (𝑁‘(𝑡𝑥)) ∈ ℝ)
110109adantlr 715 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑡𝑇) → (𝑁‘(𝑡𝑥)) ∈ ℝ)
111110adantlr 715 . . . . . . . . . . . . . . 15 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → (𝑁‘(𝑡𝑥)) ∈ ℝ)
112 simpllr 775 . . . . . . . . . . . . . . 15 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → 𝑐 ∈ ℝ)
113 simplrl 776 . . . . . . . . . . . . . . . 16 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → 𝑘 ∈ ℕ)
114113, 61syl 17 . . . . . . . . . . . . . . 15 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → 𝑘 ∈ ℝ)
115 letr 11202 . . . . . . . . . . . . . . 15 (((𝑁‘(𝑡𝑥)) ∈ ℝ ∧ 𝑐 ∈ ℝ ∧ 𝑘 ∈ ℝ) → (((𝑁‘(𝑡𝑥)) ≤ 𝑐𝑐𝑘) → (𝑁‘(𝑡𝑥)) ≤ 𝑘))
116111, 112, 114, 115syl3anc 1373 . . . . . . . . . . . . . 14 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → (((𝑁‘(𝑡𝑥)) ≤ 𝑐𝑐𝑘) → (𝑁‘(𝑡𝑥)) ≤ 𝑘))
117105, 116mpan2d 694 . . . . . . . . . . . . 13 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → ((𝑁‘(𝑡𝑥)) ≤ 𝑐 → (𝑁‘(𝑡𝑥)) ≤ 𝑘))
118117ralimdva 3144 . . . . . . . . . . . 12 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐 → ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
119118expr 456 . . . . . . . . . . 11 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (𝑐 < 𝑘 → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐 → ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
12022fvexi 6831 . . . . . . . . . . . . . . . . . 18 𝑋 ∈ V
121120rabex 5272 . . . . . . . . . . . . . . . . 17 {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ V
12291fvmpt2 6935 . . . . . . . . . . . . . . . . 17 ((𝑘 ∈ ℕ ∧ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ V) → (𝐴𝑘) = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
123121, 122mpan2 691 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → (𝐴𝑘) = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
124123eleq2d 2817 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ → (𝑥 ∈ (𝐴𝑘) ↔ 𝑥 ∈ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘}))
12549ralbidv 3155 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑥 → (∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘 ↔ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
126125elrab 3642 . . . . . . . . . . . . . . 15 (𝑥 ∈ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ (𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
127124, 126bitrdi 287 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → (𝑥 ∈ (𝐴𝑘) ↔ (𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
128 simpr 484 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑋) → 𝑥𝑋)
129128biantrurd 532 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝑋) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘 ↔ (𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
130129bicomd 223 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑋) → ((𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘) ↔ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
131127, 130sylan9bbr 510 . . . . . . . . . . . . 13 (((𝜑𝑥𝑋) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐴𝑘) ↔ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
13292ffnd 6647 . . . . . . . . . . . . . . 15 (𝜑𝐴 Fn ℕ)
133132adantr 480 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑋) → 𝐴 Fn ℕ)
134 fnfvelrn 7008 . . . . . . . . . . . . . . . 16 ((𝐴 Fn ℕ ∧ 𝑘 ∈ ℕ) → (𝐴𝑘) ∈ ran 𝐴)
135 elssuni 4884 . . . . . . . . . . . . . . . 16 ((𝐴𝑘) ∈ ran 𝐴 → (𝐴𝑘) ⊆ ran 𝐴)
136134, 135syl 17 . . . . . . . . . . . . . . 15 ((𝐴 Fn ℕ ∧ 𝑘 ∈ ℕ) → (𝐴𝑘) ⊆ ran 𝐴)
137136sseld 3928 . . . . . . . . . . . . . 14 ((𝐴 Fn ℕ ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐴𝑘) → 𝑥 ran 𝐴))
138133, 137sylan 580 . . . . . . . . . . . . 13 (((𝜑𝑥𝑋) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐴𝑘) → 𝑥 ran 𝐴))
139131, 138sylbird 260 . . . . . . . . . . . 12 (((𝜑𝑥𝑋) ∧ 𝑘 ∈ ℕ) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘𝑥 ran 𝐴))
140139adantlr 715 . . . . . . . . . . 11 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘𝑥 ran 𝐴))
141119, 140syl6d 75 . . . . . . . . . 10 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (𝑐 < 𝑘 → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴)))
142141rexlimdva 3133 . . . . . . . . 9 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → (∃𝑘 ∈ ℕ 𝑐 < 𝑘 → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴)))
143100, 142mpd 15 . . . . . . . 8 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴))
144143rexlimdva 3133 . . . . . . 7 ((𝜑𝑥𝑋) → (∃𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴))
145144ralimdva 3144 . . . . . 6 (𝜑 → (∀𝑥𝑋𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐 → ∀𝑥𝑋 𝑥 ran 𝐴))
14698, 145mpd 15 . . . . 5 (𝜑 → ∀𝑥𝑋 𝑥 ran 𝐴)
147 dfss3 3918 . . . . 5 (𝑋 ran 𝐴 ↔ ∀𝑥𝑋 𝑥 ran 𝐴)
148146, 147sylibr 234 . . . 4 (𝜑𝑋 ran 𝐴)
14997, 148eqssd 3947 . . 3 (𝜑 ran 𝐴 = 𝑋)
150 eqid 2731 . . . . . 6 (0vec𝑈) = (0vec𝑈)
15122, 150nvzcl 30606 . . . . 5 (𝑈 ∈ NrmCVec → (0vec𝑈) ∈ 𝑋)
152 ne0i 4286 . . . . 5 ((0vec𝑈) ∈ 𝑋𝑋 ≠ ∅)
15319, 151, 152mp2b 10 . . . 4 𝑋 ≠ ∅
15414bcth2 25252 . . . 4 (((𝐷 ∈ (CMet‘𝑋) ∧ 𝑋 ≠ ∅) ∧ (𝐴:ℕ⟶(Clsd‘𝐽) ∧ ran 𝐴 = 𝑋)) → ∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅)
15524, 153, 154mpanl12 702 . . 3 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ ran 𝐴 = 𝑋) → ∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅)
15692, 149, 155syl2anc 584 . 2 (𝜑 → ∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅)
157 ffvelcdm 7009 . . . . . . . . . . 11 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ 𝑛 ∈ ℕ) → (𝐴𝑛) ∈ (Clsd‘𝐽))
15894, 157sselid 3927 . . . . . . . . . 10 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ 𝑛 ∈ ℕ) → (𝐴𝑛) ∈ 𝒫 𝑋)
159158elpwid 4554 . . . . . . . . 9 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ 𝑛 ∈ ℕ) → (𝐴𝑛) ⊆ 𝑋)
16092, 159sylan 580 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (𝐴𝑛) ⊆ 𝑋)
16186ntrss3 22970 . . . . . . . 8 ((𝐽 ∈ Top ∧ (𝐴𝑛) ⊆ 𝑋) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
16285, 160, 161sylancr 587 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
163162sseld 3928 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → (𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → 𝑦𝑋))
16486ntropn 22959 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ (𝐴𝑛) ⊆ 𝑋) → ((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽)
16585, 160, 164sylancr 587 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽)
16614mopni2 24403 . . . . . . . . . 10 ((𝐷 ∈ (∞Met‘𝑋) ∧ ((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)))
16727, 166mp3an1 1450 . . . . . . . . 9 ((((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)))
168165, 167sylan 580 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)))
169 elssuni 4884 . . . . . . . . . . . 12 (((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽 → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝐽)
170169, 86sseqtrrdi 3971 . . . . . . . . . . 11 (((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽 → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
171165, 170syl 17 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
172171sselda 3929 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → 𝑦𝑋)
17386ntrss2 22967 . . . . . . . . . . . . . 14 ((𝐽 ∈ Top ∧ (𝐴𝑛) ⊆ 𝑋) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ (𝐴𝑛))
17485, 160, 173sylancr 587 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ (𝐴𝑛))
175 sstr2 3936 . . . . . . . . . . . . 13 ((𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → (((int‘𝐽)‘(𝐴𝑛)) ⊆ (𝐴𝑛) → (𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛)))
176174, 175syl5com 31 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → ((𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → (𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛)))
177176ad2antrr 726 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ((𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → (𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛)))
178 simpr 484 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) → 𝑦𝑋)
179178, 27jctil 519 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) → (𝐷 ∈ (∞Met‘𝑋) ∧ 𝑦𝑋))
180 rphalfcl 12914 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ+ → (𝑥 / 2) ∈ ℝ+)
181180rpxrd 12930 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ+ → (𝑥 / 2) ∈ ℝ*)
182 rpxr 12895 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ+𝑥 ∈ ℝ*)
183 rphalflt 12916 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ+ → (𝑥 / 2) < 𝑥)
184181, 182, 1833jca 1128 . . . . . . . . . . . . 13 (𝑥 ∈ ℝ+ → ((𝑥 / 2) ∈ ℝ*𝑥 ∈ ℝ* ∧ (𝑥 / 2) < 𝑥))
185 eqid 2731 . . . . . . . . . . . . . 14 {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} = {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)}
18614, 185blsscls2 24414 . . . . . . . . . . . . 13 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑦𝑋) ∧ ((𝑥 / 2) ∈ ℝ*𝑥 ∈ ℝ* ∧ (𝑥 / 2) < 𝑥)) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝑦(ball‘𝐷)𝑥))
187179, 184, 186syl2an 596 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝑦(ball‘𝐷)𝑥))
188 sstr2 3936 . . . . . . . . . . . 12 ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝑦(ball‘𝐷)𝑥) → ((𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)))
189187, 188syl 17 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ((𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)))
190180adantl 481 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → (𝑥 / 2) ∈ ℝ+)
191 breq2 5090 . . . . . . . . . . . . . . . 16 (𝑟 = (𝑥 / 2) → ((𝑦𝐷𝑧) ≤ 𝑟 ↔ (𝑦𝐷𝑧) ≤ (𝑥 / 2)))
192191rabbidv 3402 . . . . . . . . . . . . . . 15 (𝑟 = (𝑥 / 2) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} = {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)})
193192sseq1d 3961 . . . . . . . . . . . . . 14 (𝑟 = (𝑥 / 2) → ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛) ↔ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)))
194193rspcev 3572 . . . . . . . . . . . . 13 (((𝑥 / 2) ∈ ℝ+ ∧ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))
195194ex 412 . . . . . . . . . . . 12 ((𝑥 / 2) ∈ ℝ+ → ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
196190, 195syl 17 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
197177, 189, 1963syld 60 . . . . . . . . . 10 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ((𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
198197rexlimdva 3133 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) → (∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
199172, 198syldan 591 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → (∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
200168, 199mpd 15 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))
201200ex 412 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → (𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
202163, 201jcad 512 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → (𝑦𝑋 ∧ ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))))
203202eximdv 1918 . . . 4 ((𝜑𝑛 ∈ ℕ) → (∃𝑦 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑦(𝑦𝑋 ∧ ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))))
204 n0 4298 . . . 4 (((int‘𝐽)‘(𝐴𝑛)) ≠ ∅ ↔ ∃𝑦 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)))
205 df-rex 3057 . . . 4 (∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛) ↔ ∃𝑦(𝑦𝑋 ∧ ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
206203, 204, 2053imtr4g 296 . . 3 ((𝜑𝑛 ∈ ℕ) → (((int‘𝐽)‘(𝐴𝑛)) ≠ ∅ → ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
207206reximdva 3145 . 2 (𝜑 → (∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅ → ∃𝑛 ∈ ℕ ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
208156, 207mpd 15 1 (𝜑 → ∃𝑛 ∈ ℕ ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1541  wex 1780  wcel 2111  wne 2928  wral 3047  wrex 3056  {crab 3395  Vcvv 3436  wss 3897  c0 4278  𝒫 cpw 4545   cuni 4854   ciin 4937   class class class wbr 5086  cmpt 5167  ccnv 5610  ran crn 5612  cima 5614   Fn wfn 6471  wf 6472  cfv 6476  (class class class)co 7341  cr 11000  *cxr 11140   < clt 11141  cle 11142   / cdiv 11769  cn 12120  2c2 12175  +crp 12885  ∞Metcxmet 21271  Metcmet 21272  ballcbl 21273  MetOpencmopn 21276  Topctop 22803  TopOnctopon 22820  Clsdccld 22926  intcnt 22927   Cn ccn 23134  CMetccmet 25176  NrmCVeccnv 30556  BaseSetcba 30558  0veccn0v 30560  normCVcnmcv 30562  IndMetcims 30563   BLnOp cblo 30714  CBanccbn 30834
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-10 2144  ax-11 2160  ax-12 2180  ax-ext 2703  ax-rep 5212  ax-sep 5229  ax-nul 5239  ax-pow 5298  ax-pr 5365  ax-un 7663  ax-inf2 9526  ax-dc 10332  ax-cnex 11057  ax-resscn 11058  ax-1cn 11059  ax-icn 11060  ax-addcl 11061  ax-addrcl 11062  ax-mulcl 11063  ax-mulrcl 11064  ax-mulcom 11065  ax-addass 11066  ax-mulass 11067  ax-distr 11068  ax-i2m1 11069  ax-1ne0 11070  ax-1rid 11071  ax-rnegex 11072  ax-rrecex 11073  ax-cnre 11074  ax-pre-lttri 11075  ax-pre-lttrn 11076  ax-pre-ltadd 11077  ax-pre-mulgt0 11078  ax-pre-sup 11079  ax-addf 11080  ax-mulf 11081
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-nel 3033  df-ral 3048  df-rex 3057  df-rmo 3346  df-reu 3347  df-rab 3396  df-v 3438  df-sbc 3737  df-csb 3846  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-pss 3917  df-nul 4279  df-if 4471  df-pw 4547  df-sn 4572  df-pr 4574  df-op 4578  df-uni 4855  df-int 4893  df-iun 4938  df-iin 4939  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5506  df-eprel 5511  df-po 5519  df-so 5520  df-fr 5564  df-we 5566  df-xp 5617  df-rel 5618  df-cnv 5619  df-co 5620  df-dm 5621  df-rn 5622  df-res 5623  df-ima 5624  df-pred 6243  df-ord 6304  df-on 6305  df-lim 6306  df-suc 6307  df-iota 6432  df-fun 6478  df-fn 6479  df-f 6480  df-f1 6481  df-fo 6482  df-f1o 6483  df-fv 6484  df-riota 7298  df-ov 7344  df-oprab 7345  df-mpo 7346  df-om 7792  df-1st 7916  df-2nd 7917  df-frecs 8206  df-wrecs 8237  df-recs 8286  df-rdg 8324  df-1o 8380  df-er 8617  df-map 8747  df-pm 8748  df-en 8865  df-dom 8866  df-sdom 8867  df-sup 9321  df-inf 9322  df-pnf 11143  df-mnf 11144  df-xr 11145  df-ltxr 11146  df-le 11147  df-sub 11341  df-neg 11342  df-div 11770  df-nn 12121  df-2 12183  df-3 12184  df-n0 12377  df-z 12464  df-uz 12728  df-q 12842  df-rp 12886  df-xneg 13006  df-xadd 13007  df-xmul 13008  df-ico 13246  df-seq 13904  df-exp 13964  df-cj 15001  df-re 15002  df-im 15003  df-sqrt 15137  df-abs 15138  df-rest 17321  df-topgen 17342  df-psmet 21278  df-xmet 21279  df-met 21280  df-bl 21281  df-mopn 21282  df-fbas 21283  df-fg 21284  df-top 22804  df-topon 22821  df-bases 22856  df-cld 22929  df-ntr 22930  df-cls 22931  df-nei 23008  df-cn 23137  df-cnp 23138  df-lm 23139  df-fil 23756  df-fm 23848  df-flim 23849  df-flf 23850  df-cfil 25177  df-cau 25178  df-cmet 25179  df-grpo 30465  df-gid 30466  df-ginv 30467  df-gdiv 30468  df-ablo 30517  df-vc 30531  df-nv 30564  df-va 30567  df-ba 30568  df-sm 30569  df-0v 30570  df-vs 30571  df-nmcv 30572  df-ims 30573  df-lno 30716  df-nmoo 30717  df-blo 30718  df-0o 30719  df-cbn 30835
This theorem is referenced by:  ubthlem3  30844
  Copyright terms: Public domain W3C validator