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

Theorem ubthlem1 31222
Description: Lemma for ubth 31225. 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 25489, 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 4455 . . . . . . . . 9 (𝑇 = ∅ → ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘)
21ralrimivw 3161 . . . . . . . 8 (𝑇 = ∅ → ∀𝑧𝑋𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘)
3 rabid2 3449 . . . . . . . 8 (𝑋 = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ ∀𝑧𝑋𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘)
42, 3sylibr 237 . . . . . . 7 (𝑇 = ∅ → 𝑋 = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
54eqcomd 2769 . . . . . 6 (𝑇 = ∅ → {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} = 𝑋)
65eleq1d 2848 . . . . 5 (𝑇 = ∅ → ({𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽) ↔ 𝑋 ∈ (Clsd‘𝐽)))
7 iinrab 5033 . . . . . . 7 (𝑇 ≠ ∅ → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
87adantl 486 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑇 ≠ ∅) → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
9 id 23 . . . . . . 7 (𝑇 ≠ ∅ → 𝑇 ≠ ∅)
10 ubthlem.7 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑇 ⊆ (𝑈 BLnOp 𝑊))
1110sselda 3937 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑡𝑇) → 𝑡 ∈ (𝑈 BLnOp 𝑊))
12 ubthlem.3 . . . . . . . . . . . . . . . . . . . 20 𝐷 = (IndMet‘𝑈)
13 eqid 2763 . . . . . . . . . . . . . . . . . . . 20 (IndMet‘𝑊) = (IndMet‘𝑊)
14 ubthlem.4 . . . . . . . . . . . . . . . . . . . 20 𝐽 = (MetOpen‘𝐷)
15 eqid 2763 . . . . . . . . . . . . . . . . . . . 20 (MetOpen‘(IndMet‘𝑊)) = (MetOpen‘(IndMet‘𝑊))
16 eqid 2763 . . . . . . . . . . . . . . . . . . . 20 (𝑈 BLnOp 𝑊) = (𝑈 BLnOp 𝑊)
17 ubthlem.5 . . . . . . . . . . . . . . . . . . . . 21 𝑈 ∈ CBan
18 bnnv 31218 . . . . . . . . . . . . . . . . . . . . 21 (𝑈 ∈ CBan → 𝑈 ∈ NrmCVec)
1917, 18ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 𝑈 ∈ NrmCVec
20 ubthlem.6 . . . . . . . . . . . . . . . . . . . 20 𝑊 ∈ NrmCVec
2112, 13, 14, 15, 16, 19, 20blocn2 31160 . . . . . . . . . . . . . . . . . . 19 (𝑡 ∈ (𝑈 BLnOp 𝑊) → 𝑡 ∈ (𝐽 Cn (MetOpen‘(IndMet‘𝑊))))
22 ubth.1 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑋 = (BaseSet‘𝑈)
2322, 12cbncms 31217 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑈 ∈ CBan → 𝐷 ∈ (CMet‘𝑋))
2417, 23ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22 𝐷 ∈ (CMet‘𝑋)
25 cmetmet 25445 . . . . . . . . . . . . . . . . . . . . . 22 (𝐷 ∈ (CMet‘𝑋) → 𝐷 ∈ (Met‘𝑋))
26 metxmet 24491 . . . . . . . . . . . . . . . . . . . . . 22 (𝐷 ∈ (Met‘𝑋) → 𝐷 ∈ (∞Met‘𝑋))
2724, 25, 26mp2b 10 . . . . . . . . . . . . . . . . . . . . 21 𝐷 ∈ (∞Met‘𝑋)
2814mopntopon 24596 . . . . . . . . . . . . . . . . . . . . 21 (𝐷 ∈ (∞Met‘𝑋) → 𝐽 ∈ (TopOn‘𝑋))
2927, 28ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 𝐽 ∈ (TopOn‘𝑋)
30 eqid 2763 . . . . . . . . . . . . . . . . . . . . . . 23 (BaseSet‘𝑊) = (BaseSet‘𝑊)
3130, 13imsxmet 31044 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 ∈ NrmCVec → (IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)))
3220, 31ax-mp 5 . . . . . . . . . . . . . . . . . . . . 21 (IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊))
3315mopntopon 24596 . . . . . . . . . . . . . . . . . . . . 21 ((IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)) → (MetOpen‘(IndMet‘𝑊)) ∈ (TopOn‘(BaseSet‘𝑊)))
3432, 33ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 (MetOpen‘(IndMet‘𝑊)) ∈ (TopOn‘(BaseSet‘𝑊))
35 iscncl 23426 . . . . . . . . . . . . . . . . . . . 20 ((𝐽 ∈ (TopOn‘𝑋) ∧ (MetOpen‘(IndMet‘𝑊)) ∈ (TopOn‘(BaseSet‘𝑊))) → (𝑡 ∈ (𝐽 Cn (MetOpen‘(IndMet‘𝑊))) ↔ (𝑡:𝑋⟶(BaseSet‘𝑊) ∧ ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽))))
3629, 34, 35mp2an 704 . . . . . . . . . . . . . . . . . . 19 (𝑡 ∈ (𝐽 Cn (MetOpen‘(IndMet‘𝑊))) ↔ (𝑡:𝑋⟶(BaseSet‘𝑊) ∧ ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽)))
3721, 36sylib 221 . . . . . . . . . . . . . . . . . 18 (𝑡 ∈ (𝑈 BLnOp 𝑊) → (𝑡:𝑋⟶(BaseSet‘𝑊) ∧ ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽)))
3811, 37syl 18 . . . . . . . . . . . . . . . . 17 ((𝜑𝑡𝑇) → (𝑡:𝑋⟶(BaseSet‘𝑊) ∧ ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽)))
3938simpld 499 . . . . . . . . . . . . . . . 16 ((𝜑𝑡𝑇) → 𝑡:𝑋⟶(BaseSet‘𝑊))
4039adantlr 727 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → 𝑡:𝑋⟶(BaseSet‘𝑊))
4140ffvelcdmda 7079 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) ∧ 𝑥𝑋) → (𝑡𝑥) ∈ (BaseSet‘𝑊))
4241biantrurd 541 . . . . . . . . . . . . 13 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) ∧ 𝑥𝑋) → ((𝑁‘(𝑡𝑥)) ≤ 𝑘 ↔ ((𝑡𝑥) ∈ (BaseSet‘𝑊) ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
43 fveq2 6881 . . . . . . . . . . . . . . 15 (𝑦 = (𝑡𝑥) → (𝑁𝑦) = (𝑁‘(𝑡𝑥)))
4443breq1d 5119 . . . . . . . . . . . . . 14 (𝑦 = (𝑡𝑥) → ((𝑁𝑦) ≤ 𝑘 ↔ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
4544elrab 3650 . . . . . . . . . . . . 13 ((𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} ↔ ((𝑡𝑥) ∈ (BaseSet‘𝑊) ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
4642, 45bitr4di 292 . . . . . . . . . . . 12 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) ∧ 𝑥𝑋) → ((𝑁‘(𝑡𝑥)) ≤ 𝑘 ↔ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}))
4746pm5.32da 589 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → ((𝑥𝑋 ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘) ↔ (𝑥𝑋 ∧ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
48 2fveq3 6886 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (𝑁‘(𝑡𝑧)) = (𝑁‘(𝑡𝑥)))
4948breq1d 5119 . . . . . . . . . . . . 13 (𝑧 = 𝑥 → ((𝑁‘(𝑡𝑧)) ≤ 𝑘 ↔ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
5049elrab 3650 . . . . . . . . . . . 12 (𝑥 ∈ {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ (𝑥𝑋 ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
5150a1i 11 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑥 ∈ {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ (𝑥𝑋 ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
52 ffn 6705 . . . . . . . . . . . 12 (𝑡:𝑋⟶(BaseSet‘𝑊) → 𝑡 Fn 𝑋)
53 elpreima 7053 . . . . . . . . . . . 12 (𝑡 Fn 𝑋 → (𝑥 ∈ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ↔ (𝑥𝑋 ∧ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
5440, 52, 533syl 19 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑥 ∈ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ↔ (𝑥𝑋 ∧ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
5547, 51, 543bitr4d 314 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑥 ∈ {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ 𝑥 ∈ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
5655eqrdv 2761 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} = (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}))
57 imaeq2 6058 . . . . . . . . . . 11 (𝑥 = {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} → (𝑡𝑥) = (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}))
5857eleq1d 2848 . . . . . . . . . 10 (𝑥 = {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} → ((𝑡𝑥) ∈ (Clsd‘𝐽) ↔ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ∈ (Clsd‘𝐽)))
5938simprd 500 . . . . . . . . . . 11 ((𝜑𝑡𝑇) → ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽))
6059adantlr 727 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽))
61 nnre 12235 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
6261ad2antlr 739 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → 𝑘 ∈ ℝ)
6362rexrd 11254 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → 𝑘 ∈ ℝ*)
64 eqid 2763 . . . . . . . . . . . . . 14 (0vec𝑊) = (0vec𝑊)
6530, 64nvzcl 30986 . . . . . . . . . . . . 13 (𝑊 ∈ NrmCVec → (0vec𝑊) ∈ (BaseSet‘𝑊))
6620, 65ax-mp 5 . . . . . . . . . . . 12 (0vec𝑊) ∈ (BaseSet‘𝑊)
67 ubth.2 . . . . . . . . . . . . . . . . . 18 𝑁 = (normCV𝑊)
6830, 64, 67, 13nvnd 31040 . . . . . . . . . . . . . . . . 17 ((𝑊 ∈ NrmCVec ∧ 𝑦 ∈ (BaseSet‘𝑊)) → (𝑁𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
6920, 68mpan 702 . . . . . . . . . . . . . . . 16 (𝑦 ∈ (BaseSet‘𝑊) → (𝑁𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
70 xmetsym 24504 . . . . . . . . . . . . . . . . 17 (((IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)) ∧ (0vec𝑊) ∈ (BaseSet‘𝑊) ∧ 𝑦 ∈ (BaseSet‘𝑊)) → ((0vec𝑊)(IndMet‘𝑊)𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
7132, 66, 70mp3an12 1480 . . . . . . . . . . . . . . . 16 (𝑦 ∈ (BaseSet‘𝑊) → ((0vec𝑊)(IndMet‘𝑊)𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
7269, 71eqtr4d 2801 . . . . . . . . . . . . . . 15 (𝑦 ∈ (BaseSet‘𝑊) → (𝑁𝑦) = ((0vec𝑊)(IndMet‘𝑊)𝑦))
7372breq1d 5119 . . . . . . . . . . . . . 14 (𝑦 ∈ (BaseSet‘𝑊) → ((𝑁𝑦) ≤ 𝑘 ↔ ((0vec𝑊)(IndMet‘𝑊)𝑦) ≤ 𝑘))
7473rabbiia 3420 . . . . . . . . . . . . 13 {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} = {𝑦 ∈ (BaseSet‘𝑊) ∣ ((0vec𝑊)(IndMet‘𝑊)𝑦) ≤ 𝑘}
7515, 74blcld 24662 . . . . . . . . . . . 12 (((IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)) ∧ (0vec𝑊) ∈ (BaseSet‘𝑊) ∧ 𝑘 ∈ ℝ*) → {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊))))
7632, 66, 75mp3an12 1480 . . . . . . . . . . 11 (𝑘 ∈ ℝ* → {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊))))
7763, 76syl 18 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊))))
7858, 60, 77rspcdva 3582 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ∈ (Clsd‘𝐽))
7956, 78eqeltrd 2863 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
8079ralrimiva 3157 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → ∀𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
81 iincld 23196 . . . . . . 7 ((𝑇 ≠ ∅ ∧ ∀𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽)) → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
829, 80, 81syl2anr 608 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑇 ≠ ∅) → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
838, 82eqeltrrd 2864 . . . . 5 (((𝜑𝑘 ∈ ℕ) ∧ 𝑇 ≠ ∅) → {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
8414mopntop 24597 . . . . . . . 8 (𝐷 ∈ (∞Met‘𝑋) → 𝐽 ∈ Top)
8527, 84ax-mp 5 . . . . . . 7 𝐽 ∈ Top
8629toponunii 23073 . . . . . . . 8 𝑋 = 𝐽
8786topcld 23192 . . . . . . 7 (𝐽 ∈ Top → 𝑋 ∈ (Clsd‘𝐽))
8885, 87ax-mp 5 . . . . . 6 𝑋 ∈ (Clsd‘𝐽)
8988a1i 11 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝑋 ∈ (Clsd‘𝐽))
906, 83, 89pm2.61ne 3043 . . . 4 ((𝜑𝑘 ∈ ℕ) → {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
91 ubthlem.9 . . . 4 𝐴 = (𝑘 ∈ ℕ ↦ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
9290, 91fmptd 7109 . . 3 (𝜑𝐴:ℕ⟶(Clsd‘𝐽))
9392frnd 6714 . . . . . 6 (𝜑 → ran 𝐴 ⊆ (Clsd‘𝐽))
9486cldss2 23187 . . . . . 6 (Clsd‘𝐽) ⊆ 𝒫 𝑋
9593, 94sstrdi 3949 . . . . 5 (𝜑 → ran 𝐴 ⊆ 𝒫 𝑋)
96 sspwuni 5066 . . . . 5 (ran 𝐴 ⊆ 𝒫 𝑋 ran 𝐴𝑋)
9795, 96sylib 221 . . . 4 (𝜑 ran 𝐴𝑋)
98 ubthlem.8 . . . . . 6 (𝜑 → ∀𝑥𝑋𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐)
99 arch 12496 . . . . . . . . . 10 (𝑐 ∈ ℝ → ∃𝑘 ∈ ℕ 𝑐 < 𝑘)
10099adantl 486 . . . . . . . . 9 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → ∃𝑘 ∈ ℕ 𝑐 < 𝑘)
101 simpr 489 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → 𝑐 ∈ ℝ)
102 ltle 11293 . . . . . . . . . . . . . . . . 17 ((𝑐 ∈ ℝ ∧ 𝑘 ∈ ℝ) → (𝑐 < 𝑘𝑐𝑘))
103101, 61, 102syl2an 607 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (𝑐 < 𝑘𝑐𝑘))
104103impr 459 . . . . . . . . . . . . . . 15 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) → 𝑐𝑘)
105104adantr 485 . . . . . . . . . . . . . 14 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → 𝑐𝑘)
10639ffvelcdmda 7079 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑡𝑇) ∧ 𝑥𝑋) → (𝑡𝑥) ∈ (BaseSet‘𝑊))
107106an32s 664 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥𝑋) ∧ 𝑡𝑇) → (𝑡𝑥) ∈ (BaseSet‘𝑊))
10830, 67nvcl 31013 . . . . . . . . . . . . . . . . . 18 ((𝑊 ∈ NrmCVec ∧ (𝑡𝑥) ∈ (BaseSet‘𝑊)) → (𝑁‘(𝑡𝑥)) ∈ ℝ)
10920, 107, 108sylancr 598 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥𝑋) ∧ 𝑡𝑇) → (𝑁‘(𝑡𝑥)) ∈ ℝ)
110109adantlr 727 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑡𝑇) → (𝑁‘(𝑡𝑥)) ∈ ℝ)
111110adantlr 727 . . . . . . . . . . . . . . 15 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → (𝑁‘(𝑡𝑥)) ∈ ℝ)
112 simpllr 787 . . . . . . . . . . . . . . 15 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → 𝑐 ∈ ℝ)
113 simplrl 788 . . . . . . . . . . . . . . . 16 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → 𝑘 ∈ ℕ)
114113, 61syl 18 . . . . . . . . . . . . . . 15 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → 𝑘 ∈ ℝ)
115 letr 11299 . . . . . . . . . . . . . . 15 (((𝑁‘(𝑡𝑥)) ∈ ℝ ∧ 𝑐 ∈ ℝ ∧ 𝑘 ∈ ℝ) → (((𝑁‘(𝑡𝑥)) ≤ 𝑐𝑐𝑘) → (𝑁‘(𝑡𝑥)) ≤ 𝑘))
116111, 112, 114, 115syl3anc 1398 . . . . . . . . . . . . . 14 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → (((𝑁‘(𝑡𝑥)) ≤ 𝑐𝑐𝑘) → (𝑁‘(𝑡𝑥)) ≤ 𝑘))
117105, 116mpan2d 706 . . . . . . . . . . . . 13 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → ((𝑁‘(𝑡𝑥)) ≤ 𝑐 → (𝑁‘(𝑡𝑥)) ≤ 𝑘))
118117ralimdva 3177 . . . . . . . . . . . 12 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐 → ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
119118expr 461 . . . . . . . . . . 11 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (𝑐 < 𝑘 → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐 → ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
12022fvexi 6895 . . . . . . . . . . . . . . . . . 18 𝑋 ∈ V
121120rabex 5309 . . . . . . . . . . . . . . . . 17 {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ V
12291fvmpt2 7001 . . . . . . . . . . . . . . . . 17 ((𝑘 ∈ ℕ ∧ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ V) → (𝐴𝑘) = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
123121, 122mpan2 703 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → (𝐴𝑘) = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
124123eleq2d 2849 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ → (𝑥 ∈ (𝐴𝑘) ↔ 𝑥 ∈ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘}))
12549ralbidv 3188 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑥 → (∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘 ↔ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
126125elrab 3650 . . . . . . . . . . . . . . 15 (𝑥 ∈ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ (𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
127124, 126bitrdi 290 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → (𝑥 ∈ (𝐴𝑘) ↔ (𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
128 simpr 489 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑋) → 𝑥𝑋)
129128biantrurd 541 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝑋) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘 ↔ (𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
130129bicomd 226 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑋) → ((𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘) ↔ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
131127, 130sylan9bbr 519 . . . . . . . . . . . . 13 (((𝜑𝑥𝑋) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐴𝑘) ↔ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
13292ffnd 6706 . . . . . . . . . . . . . . 15 (𝜑𝐴 Fn ℕ)
133132adantr 485 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑋) → 𝐴 Fn ℕ)
134 fnfvelrn 7075 . . . . . . . . . . . . . . . 16 ((𝐴 Fn ℕ ∧ 𝑘 ∈ ℕ) → (𝐴𝑘) ∈ ran 𝐴)
135 elssuni 4904 . . . . . . . . . . . . . . . 16 ((𝐴𝑘) ∈ ran 𝐴 → (𝐴𝑘) ⊆ ran 𝐴)
136134, 135syl 18 . . . . . . . . . . . . . . 15 ((𝐴 Fn ℕ ∧ 𝑘 ∈ ℕ) → (𝐴𝑘) ⊆ ran 𝐴)
137136sseld 3936 . . . . . . . . . . . . . 14 ((𝐴 Fn ℕ ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐴𝑘) → 𝑥 ran 𝐴))
138133, 137sylan 591 . . . . . . . . . . . . 13 (((𝜑𝑥𝑋) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐴𝑘) → 𝑥 ran 𝐴))
139131, 138sylbird 263 . . . . . . . . . . . 12 (((𝜑𝑥𝑋) ∧ 𝑘 ∈ ℕ) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘𝑥 ran 𝐴))
140139adantlr 727 . . . . . . . . . . 11 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘𝑥 ran 𝐴))
141119, 140syl6d 76 . . . . . . . . . 10 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (𝑐 < 𝑘 → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴)))
142141rexlimdva 3166 . . . . . . . . 9 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → (∃𝑘 ∈ ℕ 𝑐 < 𝑘 → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴)))
143100, 142mpd 16 . . . . . . . 8 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴))
144143rexlimdva 3166 . . . . . . 7 ((𝜑𝑥𝑋) → (∃𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴))
145144ralimdva 3177 . . . . . 6 (𝜑 → (∀𝑥𝑋𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐 → ∀𝑥𝑋 𝑥 ran 𝐴))
14698, 145mpd 16 . . . . 5 (𝜑 → ∀𝑥𝑋 𝑥 ran 𝐴)
147 dfss3 3926 . . . . 5 (𝑋 ran 𝐴 ↔ ∀𝑥𝑋 𝑥 ran 𝐴)
148146, 147sylibr 237 . . . 4 (𝜑𝑋 ran 𝐴)
14997, 148eqssd 3954 . . 3 (𝜑 ran 𝐴 = 𝑋)
150 eqid 2763 . . . . . 6 (0vec𝑈) = (0vec𝑈)
15122, 150nvzcl 30986 . . . . 5 (𝑈 ∈ NrmCVec → (0vec𝑈) ∈ 𝑋)
152 ne0i 4294 . . . . 5 ((0vec𝑈) ∈ 𝑋𝑋 ≠ ∅)
15319, 151, 152mp2b 10 . . . 4 𝑋 ≠ ∅
15414bcth2 25489 . . . 4 (((𝐷 ∈ (CMet‘𝑋) ∧ 𝑋 ≠ ∅) ∧ (𝐴:ℕ⟶(Clsd‘𝐽) ∧ ran 𝐴 = 𝑋)) → ∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅)
15524, 153, 154mpanl12 714 . . 3 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ ran 𝐴 = 𝑋) → ∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅)
15692, 149, 155syl2anc 595 . 2 (𝜑 → ∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅)
157 ffvelcdm 7076 . . . . . . . . . . 11 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ 𝑛 ∈ ℕ) → (𝐴𝑛) ∈ (Clsd‘𝐽))
15894, 157sselid 3935 . . . . . . . . . 10 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ 𝑛 ∈ ℕ) → (𝐴𝑛) ∈ 𝒫 𝑋)
159158elpwid 4571 . . . . . . . . 9 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ 𝑛 ∈ ℕ) → (𝐴𝑛) ⊆ 𝑋)
16092, 159sylan 591 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (𝐴𝑛) ⊆ 𝑋)
16186ntrss3 23217 . . . . . . . 8 ((𝐽 ∈ Top ∧ (𝐴𝑛) ⊆ 𝑋) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
16285, 160, 161sylancr 598 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
163162sseld 3936 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → (𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → 𝑦𝑋))
16486ntropn 23206 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ (𝐴𝑛) ⊆ 𝑋) → ((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽)
16585, 160, 164sylancr 598 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽)
16614mopni2 24650 . . . . . . . . . 10 ((𝐷 ∈ (∞Met‘𝑋) ∧ ((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)))
16727, 166mp3an1 1477 . . . . . . . . 9 ((((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)))
168165, 167sylan 591 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)))
169 elssuni 4904 . . . . . . . . . . . 12 (((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽 → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝐽)
170169, 86sseqtrrdi 3978 . . . . . . . . . . 11 (((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽 → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
171165, 170syl 18 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
172171sselda 3937 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → 𝑦𝑋)
17386ntrss2 23214 . . . . . . . . . . . . . 14 ((𝐽 ∈ Top ∧ (𝐴𝑛) ⊆ 𝑋) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ (𝐴𝑛))
17485, 160, 173sylancr 598 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ (𝐴𝑛))
175 sstr2 3944 . . . . . . . . . . . . 13 ((𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → (((int‘𝐽)‘(𝐴𝑛)) ⊆ (𝐴𝑛) → (𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛)))
176174, 175syl5com 32 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → ((𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → (𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛)))
177176ad2antrr 738 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ((𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → (𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛)))
178 simpr 489 . . . . . . . . . . . . . 14 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) → 𝑦𝑋)
179178, 27jctil 528 . . . . . . . . . . . . 13 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) → (𝐷 ∈ (∞Met‘𝑋) ∧ 𝑦𝑋))
180 rphalfcl 13040 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ+ → (𝑥 / 2) ∈ ℝ+)
181180rpxrd 13056 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ+ → (𝑥 / 2) ∈ ℝ*)
182 rpxr 13021 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ+𝑥 ∈ ℝ*)
183 rphalflt 13042 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ+ → (𝑥 / 2) < 𝑥)
184181, 182, 1833jca 1146 . . . . . . . . . . . . 13 (𝑥 ∈ ℝ+ → ((𝑥 / 2) ∈ ℝ*𝑥 ∈ ℝ* ∧ (𝑥 / 2) < 𝑥))
185 eqid 2763 . . . . . . . . . . . . . 14 {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} = {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)}
18614, 185blsscls2 24661 . . . . . . . . . . . . 13 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑦𝑋) ∧ ((𝑥 / 2) ∈ ℝ*𝑥 ∈ ℝ* ∧ (𝑥 / 2) < 𝑥)) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝑦(ball‘𝐷)𝑥))
187179, 184, 186syl2an 607 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝑦(ball‘𝐷)𝑥))
188 sstr2 3944 . . . . . . . . . . . 12 ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝑦(ball‘𝐷)𝑥) → ((𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)))
189187, 188syl 18 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ((𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)))
190180adantl 486 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → (𝑥 / 2) ∈ ℝ+)
191 breq2 5113 . . . . . . . . . . . . . . . 16 (𝑟 = (𝑥 / 2) → ((𝑦𝐷𝑧) ≤ 𝑟 ↔ (𝑦𝐷𝑧) ≤ (𝑥 / 2)))
192191rabbidv 3423 . . . . . . . . . . . . . . 15 (𝑟 = (𝑥 / 2) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} = {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)})
193192sseq1d 3968 . . . . . . . . . . . . . 14 (𝑟 = (𝑥 / 2) → ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛) ↔ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)))
194193rspcev 3581 . . . . . . . . . . . . 13 (((𝑥 / 2) ∈ ℝ+ ∧ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))
195194ex 417 . . . . . . . . . . . 12 ((𝑥 / 2) ∈ ℝ+ → ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
196190, 195syl 18 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
197177, 189, 1963syld 61 . . . . . . . . . 10 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ((𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
198197rexlimdva 3166 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) → (∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
199172, 198syldan 602 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → (∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
200168, 199mpd 16 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))
201200ex 417 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → (𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
202163, 201jcad 521 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → (𝑦𝑋 ∧ ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))))
203202eximdv 1947 . . . 4 ((𝜑𝑛 ∈ ℕ) → (∃𝑦 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑦(𝑦𝑋 ∧ ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))))
204 n0 4307 . . . 4 (((int‘𝐽)‘(𝐴𝑛)) ≠ ∅ ↔ ∃𝑦 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)))
205 df-rex 3090 . . . 4 (∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛) ↔ ∃𝑦(𝑦𝑋 ∧ ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
206203, 204, 2053imtr4g 299 . . 3 ((𝜑𝑛 ∈ ℕ) → (((int‘𝐽)‘(𝐴𝑛)) ≠ ∅ → ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
207206reximdva 3178 . 2 (𝜑 → (∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅ → ∃𝑛 ∈ ℕ ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
208156, 207mpd 16 1 (𝜑 → ∃𝑛 ∈ ℕ ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400  w3a 1103   = wceq 1570  wex 1809  wcel 2143  wne 2958  wral 3079  wrex 3089  {crab 3416  Vcvv 3455  wss 3905  c0 4286  𝒫 cpw 4562   cuni 4872   ciin 4957   class class class wbr 5109  cmpt 5192  ccnv 5660  ran crn 5662  cima 5664   Fn wfn 6531  wf 6532  cfv 6536  (class class class)co 7410  cr 11094  *cxr 11237   < clt 11238  cle 11239   / cdiv 11866  cn 12228  2c2 12290  +crp 13011  ∞Metcxmet 21507  Metcmet 21508  ballcbl 21509  MetOpencmopn 21512  Topctop 23050  TopOnctopon 23067  Clsdccld 23173  intcnt 23174   Cn ccn 23381  CMetccmet 25413  NrmCVeccnv 30936  BaseSetcba 30938  0veccn0v 30940  normCVcnmcv 30942  IndMetcims 30943   BLnOp cblo 31094  CBanccbn 31214
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-inf2 9606  ax-dc 10425  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172  ax-pre-sup 11173  ax-addf 11174  ax-mulf 11175
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-iin 4959  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-er 8690  df-map 8822  df-pm 8823  df-en 8940  df-dom 8941  df-sdom 8942  df-sup 9398  df-inf 9399  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-div 11867  df-nn 12229  df-2 12298  df-3 12299  df-n0 12500  df-z 12587  df-uz 12858  df-q 12968  df-rp 13012  df-xneg 13132  df-xadd 13133  df-xmul 13134  df-ico 13373  df-seq 14034  df-exp 14094  df-cj 15146  df-re 15147  df-im 15148  df-sqrt 15282  df-abs 15283  df-rest 17470  df-topgen 17491  df-psmet 21514  df-xmet 21515  df-met 21516  df-bl 21517  df-mopn 21518  df-fbas 21519  df-fg 21520  df-top 23051  df-topon 23068  df-bases 23103  df-cld 23176  df-ntr 23177  df-cls 23178  df-nei 23255  df-cn 23384  df-cnp 23385  df-lm 23386  df-fil 24003  df-fm 24095  df-flim 24096  df-flf 24097  df-cfil 25414  df-cau 25415  df-cmet 25416  df-grpo 30845  df-gid 30846  df-ginv 30847  df-gdiv 30848  df-ablo 30897  df-vc 30911  df-nv 30944  df-va 30947  df-ba 30948  df-sm 30949  df-0v 30950  df-vs 30951  df-nmcv 30952  df-ims 30953  df-lno 31096  df-nmoo 31097  df-blo 31098  df-0o 31099  df-cbn 31215
This theorem is referenced by:  ubthlem3  31224
  Copyright terms: Public domain W3C validator