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

Theorem ubthlem1 30799
Description: Lemma for ubth 30802. 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 25230, 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 4472 . . . . . . . . 9 (𝑇 = ∅ → ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘)
21ralrimivw 3129 . . . . . . . 8 (𝑇 = ∅ → ∀𝑧𝑋𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘)
3 rabid2 3439 . . . . . . . 8 (𝑋 = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ ∀𝑧𝑋𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘)
42, 3sylibr 234 . . . . . . 7 (𝑇 = ∅ → 𝑋 = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
54eqcomd 2735 . . . . . 6 (𝑇 = ∅ → {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} = 𝑋)
65eleq1d 2813 . . . . 5 (𝑇 = ∅ → ({𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽) ↔ 𝑋 ∈ (Clsd‘𝐽)))
7 iinrab 5033 . . . . . . 7 (𝑇 ≠ ∅ → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
87adantl 481 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑇 ≠ ∅) → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
9 id 22 . . . . . . 7 (𝑇 ≠ ∅ → 𝑇 ≠ ∅)
10 ubthlem.7 . . . . . . . . . . . . . . . . . . 19 (𝜑𝑇 ⊆ (𝑈 BLnOp 𝑊))
1110sselda 3946 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑡𝑇) → 𝑡 ∈ (𝑈 BLnOp 𝑊))
12 ubthlem.3 . . . . . . . . . . . . . . . . . . . 20 𝐷 = (IndMet‘𝑈)
13 eqid 2729 . . . . . . . . . . . . . . . . . . . 20 (IndMet‘𝑊) = (IndMet‘𝑊)
14 ubthlem.4 . . . . . . . . . . . . . . . . . . . 20 𝐽 = (MetOpen‘𝐷)
15 eqid 2729 . . . . . . . . . . . . . . . . . . . 20 (MetOpen‘(IndMet‘𝑊)) = (MetOpen‘(IndMet‘𝑊))
16 eqid 2729 . . . . . . . . . . . . . . . . . . . 20 (𝑈 BLnOp 𝑊) = (𝑈 BLnOp 𝑊)
17 ubthlem.5 . . . . . . . . . . . . . . . . . . . . 21 𝑈 ∈ CBan
18 bnnv 30795 . . . . . . . . . . . . . . . . . . . . 21 (𝑈 ∈ CBan → 𝑈 ∈ NrmCVec)
1917, 18ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 𝑈 ∈ NrmCVec
20 ubthlem.6 . . . . . . . . . . . . . . . . . . . 20 𝑊 ∈ NrmCVec
2112, 13, 14, 15, 16, 19, 20blocn2 30737 . . . . . . . . . . . . . . . . . . 19 (𝑡 ∈ (𝑈 BLnOp 𝑊) → 𝑡 ∈ (𝐽 Cn (MetOpen‘(IndMet‘𝑊))))
22 ubth.1 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑋 = (BaseSet‘𝑈)
2322, 12cbncms 30794 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑈 ∈ CBan → 𝐷 ∈ (CMet‘𝑋))
2417, 23ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22 𝐷 ∈ (CMet‘𝑋)
25 cmetmet 25186 . . . . . . . . . . . . . . . . . . . . . 22 (𝐷 ∈ (CMet‘𝑋) → 𝐷 ∈ (Met‘𝑋))
26 metxmet 24222 . . . . . . . . . . . . . . . . . . . . . 22 (𝐷 ∈ (Met‘𝑋) → 𝐷 ∈ (∞Met‘𝑋))
2724, 25, 26mp2b 10 . . . . . . . . . . . . . . . . . . . . 21 𝐷 ∈ (∞Met‘𝑋)
2814mopntopon 24327 . . . . . . . . . . . . . . . . . . . . 21 (𝐷 ∈ (∞Met‘𝑋) → 𝐽 ∈ (TopOn‘𝑋))
2927, 28ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 𝐽 ∈ (TopOn‘𝑋)
30 eqid 2729 . . . . . . . . . . . . . . . . . . . . . . 23 (BaseSet‘𝑊) = (BaseSet‘𝑊)
3130, 13imsxmet 30621 . . . . . . . . . . . . . . . . . . . . . 22 (𝑊 ∈ NrmCVec → (IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)))
3220, 31ax-mp 5 . . . . . . . . . . . . . . . . . . . . 21 (IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊))
3315mopntopon 24327 . . . . . . . . . . . . . . . . . . . . 21 ((IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)) → (MetOpen‘(IndMet‘𝑊)) ∈ (TopOn‘(BaseSet‘𝑊)))
3432, 33ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 (MetOpen‘(IndMet‘𝑊)) ∈ (TopOn‘(BaseSet‘𝑊))
35 iscncl 23156 . . . . . . . . . . . . . . . . . . . 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 7056 . . . . . . . . . . . . . 14 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) ∧ 𝑥𝑋) → (𝑡𝑥) ∈ (BaseSet‘𝑊))
4241biantrurd 532 . . . . . . . . . . . . 13 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) ∧ 𝑥𝑋) → ((𝑁‘(𝑡𝑥)) ≤ 𝑘 ↔ ((𝑡𝑥) ∈ (BaseSet‘𝑊) ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
43 fveq2 6858 . . . . . . . . . . . . . . 15 (𝑦 = (𝑡𝑥) → (𝑁𝑦) = (𝑁‘(𝑡𝑥)))
4443breq1d 5117 . . . . . . . . . . . . . 14 (𝑦 = (𝑡𝑥) → ((𝑁𝑦) ≤ 𝑘 ↔ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
4544elrab 3659 . . . . . . . . . . . . 13 ((𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} ↔ ((𝑡𝑥) ∈ (BaseSet‘𝑊) ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
4642, 45bitr4di 289 . . . . . . . . . . . 12 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) ∧ 𝑥𝑋) → ((𝑁‘(𝑡𝑥)) ≤ 𝑘 ↔ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}))
4746pm5.32da 579 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → ((𝑥𝑋 ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘) ↔ (𝑥𝑋 ∧ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
48 2fveq3 6863 . . . . . . . . . . . . . 14 (𝑧 = 𝑥 → (𝑁‘(𝑡𝑧)) = (𝑁‘(𝑡𝑥)))
4948breq1d 5117 . . . . . . . . . . . . 13 (𝑧 = 𝑥 → ((𝑁‘(𝑡𝑧)) ≤ 𝑘 ↔ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
5049elrab 3659 . . . . . . . . . . . 12 (𝑥 ∈ {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ (𝑥𝑋 ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘))
5150a1i 11 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑥 ∈ {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ (𝑥𝑋 ∧ (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
52 ffn 6688 . . . . . . . . . . . 12 (𝑡:𝑋⟶(BaseSet‘𝑊) → 𝑡 Fn 𝑋)
53 elpreima 7030 . . . . . . . . . . . 12 (𝑡 Fn 𝑋 → (𝑥 ∈ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ↔ (𝑥𝑋 ∧ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
5440, 52, 533syl 18 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑥 ∈ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ↔ (𝑥𝑋 ∧ (𝑡𝑥) ∈ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
5547, 51, 543bitr4d 311 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑥 ∈ {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ 𝑥 ∈ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘})))
5655eqrdv 2727 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} = (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}))
57 imaeq2 6027 . . . . . . . . . . 11 (𝑥 = {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} → (𝑡𝑥) = (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}))
5857eleq1d 2813 . . . . . . . . . 10 (𝑥 = {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} → ((𝑡𝑥) ∈ (Clsd‘𝐽) ↔ (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ∈ (Clsd‘𝐽)))
5938simprd 495 . . . . . . . . . . 11 ((𝜑𝑡𝑇) → ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽))
6059adantlr 715 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → ∀𝑥 ∈ (Clsd‘(MetOpen‘(IndMet‘𝑊)))(𝑡𝑥) ∈ (Clsd‘𝐽))
61 nnre 12193 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℝ)
6261ad2antlr 727 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → 𝑘 ∈ ℝ)
6362rexrd 11224 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → 𝑘 ∈ ℝ*)
64 eqid 2729 . . . . . . . . . . . . . 14 (0vec𝑊) = (0vec𝑊)
6530, 64nvzcl 30563 . . . . . . . . . . . . 13 (𝑊 ∈ NrmCVec → (0vec𝑊) ∈ (BaseSet‘𝑊))
6620, 65ax-mp 5 . . . . . . . . . . . 12 (0vec𝑊) ∈ (BaseSet‘𝑊)
67 ubth.2 . . . . . . . . . . . . . . . . . 18 𝑁 = (normCV𝑊)
6830, 64, 67, 13nvnd 30617 . . . . . . . . . . . . . . . . 17 ((𝑊 ∈ NrmCVec ∧ 𝑦 ∈ (BaseSet‘𝑊)) → (𝑁𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
6920, 68mpan 690 . . . . . . . . . . . . . . . 16 (𝑦 ∈ (BaseSet‘𝑊) → (𝑁𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
70 xmetsym 24235 . . . . . . . . . . . . . . . . 17 (((IndMet‘𝑊) ∈ (∞Met‘(BaseSet‘𝑊)) ∧ (0vec𝑊) ∈ (BaseSet‘𝑊) ∧ 𝑦 ∈ (BaseSet‘𝑊)) → ((0vec𝑊)(IndMet‘𝑊)𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
7132, 66, 70mp3an12 1453 . . . . . . . . . . . . . . . 16 (𝑦 ∈ (BaseSet‘𝑊) → ((0vec𝑊)(IndMet‘𝑊)𝑦) = (𝑦(IndMet‘𝑊)(0vec𝑊)))
7269, 71eqtr4d 2767 . . . . . . . . . . . . . . 15 (𝑦 ∈ (BaseSet‘𝑊) → (𝑁𝑦) = ((0vec𝑊)(IndMet‘𝑊)𝑦))
7372breq1d 5117 . . . . . . . . . . . . . 14 (𝑦 ∈ (BaseSet‘𝑊) → ((𝑁𝑦) ≤ 𝑘 ↔ ((0vec𝑊)(IndMet‘𝑊)𝑦) ≤ 𝑘))
7473rabbiia 3409 . . . . . . . . . . . . 13 {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘} = {𝑦 ∈ (BaseSet‘𝑊) ∣ ((0vec𝑊)(IndMet‘𝑊)𝑦) ≤ 𝑘}
7515, 74blcld 24393 . . . . . . . . . . . 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 3589 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → (𝑡 “ {𝑦 ∈ (BaseSet‘𝑊) ∣ (𝑁𝑦) ≤ 𝑘}) ∈ (Clsd‘𝐽))
7956, 78eqeltrd 2828 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑡𝑇) → {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
8079ralrimiva 3125 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → ∀𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
81 iincld 22926 . . . . . . 7 ((𝑇 ≠ ∅ ∧ ∀𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽)) → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
829, 80, 81syl2anr 597 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑇 ≠ ∅) → 𝑡𝑇 {𝑧𝑋 ∣ (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
838, 82eqeltrrd 2829 . . . . 5 (((𝜑𝑘 ∈ ℕ) ∧ 𝑇 ≠ ∅) → {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
8414mopntop 24328 . . . . . . . 8 (𝐷 ∈ (∞Met‘𝑋) → 𝐽 ∈ Top)
8527, 84ax-mp 5 . . . . . . 7 𝐽 ∈ Top
8629toponunii 22803 . . . . . . . 8 𝑋 = 𝐽
8786topcld 22922 . . . . . . 7 (𝐽 ∈ Top → 𝑋 ∈ (Clsd‘𝐽))
8885, 87ax-mp 5 . . . . . 6 𝑋 ∈ (Clsd‘𝐽)
8988a1i 11 . . . . 5 ((𝜑𝑘 ∈ ℕ) → 𝑋 ∈ (Clsd‘𝐽))
906, 83, 89pm2.61ne 3010 . . . 4 ((𝜑𝑘 ∈ ℕ) → {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ (Clsd‘𝐽))
91 ubthlem.9 . . . 4 𝐴 = (𝑘 ∈ ℕ ↦ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
9290, 91fmptd 7086 . . 3 (𝜑𝐴:ℕ⟶(Clsd‘𝐽))
9392frnd 6696 . . . . . 6 (𝜑 → ran 𝐴 ⊆ (Clsd‘𝐽))
9486cldss2 22917 . . . . . 6 (Clsd‘𝐽) ⊆ 𝒫 𝑋
9593, 94sstrdi 3959 . . . . 5 (𝜑 → ran 𝐴 ⊆ 𝒫 𝑋)
96 sspwuni 5064 . . . . 5 (ran 𝐴 ⊆ 𝒫 𝑋 ran 𝐴𝑋)
9795, 96sylib 218 . . . 4 (𝜑 ran 𝐴𝑋)
98 ubthlem.8 . . . . . 6 (𝜑 → ∀𝑥𝑋𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐)
99 arch 12439 . . . . . . . . . 10 (𝑐 ∈ ℝ → ∃𝑘 ∈ ℕ 𝑐 < 𝑘)
10099adantl 481 . . . . . . . . 9 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → ∃𝑘 ∈ ℕ 𝑐 < 𝑘)
101 simpr 484 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → 𝑐 ∈ ℝ)
102 ltle 11262 . . . . . . . . . . . . . . . . 17 ((𝑐 ∈ ℝ ∧ 𝑘 ∈ ℝ) → (𝑐 < 𝑘𝑐𝑘))
103101, 61, 102syl2an 596 . . . . . . . . . . . . . . . 16 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (𝑐 < 𝑘𝑐𝑘))
104103impr 454 . . . . . . . . . . . . . . 15 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) → 𝑐𝑘)
105104adantr 480 . . . . . . . . . . . . . 14 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → 𝑐𝑘)
10639ffvelcdmda 7056 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑡𝑇) ∧ 𝑥𝑋) → (𝑡𝑥) ∈ (BaseSet‘𝑊))
107106an32s 652 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥𝑋) ∧ 𝑡𝑇) → (𝑡𝑥) ∈ (BaseSet‘𝑊))
10830, 67nvcl 30590 . . . . . . . . . . . . . . . . . 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 11268 . . . . . . . . . . . . . . 15 (((𝑁‘(𝑡𝑥)) ∈ ℝ ∧ 𝑐 ∈ ℝ ∧ 𝑘 ∈ ℝ) → (((𝑁‘(𝑡𝑥)) ≤ 𝑐𝑐𝑘) → (𝑁‘(𝑡𝑥)) ≤ 𝑘))
116111, 112, 114, 115syl3anc 1373 . . . . . . . . . . . . . 14 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → (((𝑁‘(𝑡𝑥)) ≤ 𝑐𝑐𝑘) → (𝑁‘(𝑡𝑥)) ≤ 𝑘))
117105, 116mpan2d 694 . . . . . . . . . . . . 13 (((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) ∧ 𝑡𝑇) → ((𝑁‘(𝑡𝑥)) ≤ 𝑐 → (𝑁‘(𝑡𝑥)) ≤ 𝑘))
118117ralimdva 3145 . . . . . . . . . . . 12 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ (𝑘 ∈ ℕ ∧ 𝑐 < 𝑘)) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐 → ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
119118expr 456 . . . . . . . . . . 11 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (𝑐 < 𝑘 → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐 → ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
12022fvexi 6872 . . . . . . . . . . . . . . . . . 18 𝑋 ∈ V
121120rabex 5294 . . . . . . . . . . . . . . . . 17 {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ V
12291fvmpt2 6979 . . . . . . . . . . . . . . . . 17 ((𝑘 ∈ ℕ ∧ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ∈ V) → (𝐴𝑘) = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
123121, 122mpan2 691 . . . . . . . . . . . . . . . 16 (𝑘 ∈ ℕ → (𝐴𝑘) = {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘})
124123eleq2d 2814 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ → (𝑥 ∈ (𝐴𝑘) ↔ 𝑥 ∈ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘}))
12549ralbidv 3156 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑥 → (∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘 ↔ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
126125elrab 3659 . . . . . . . . . . . . . . 15 (𝑥 ∈ {𝑧𝑋 ∣ ∀𝑡𝑇 (𝑁‘(𝑡𝑧)) ≤ 𝑘} ↔ (𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
127124, 126bitrdi 287 . . . . . . . . . . . . . 14 (𝑘 ∈ ℕ → (𝑥 ∈ (𝐴𝑘) ↔ (𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
128 simpr 484 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑋) → 𝑥𝑋)
129128biantrurd 532 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝑋) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘 ↔ (𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘)))
130129bicomd 223 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑋) → ((𝑥𝑋 ∧ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘) ↔ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
131127, 130sylan9bbr 510 . . . . . . . . . . . . 13 (((𝜑𝑥𝑋) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐴𝑘) ↔ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘))
13292ffnd 6689 . . . . . . . . . . . . . . 15 (𝜑𝐴 Fn ℕ)
133132adantr 480 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑋) → 𝐴 Fn ℕ)
134 fnfvelrn 7052 . . . . . . . . . . . . . . . 16 ((𝐴 Fn ℕ ∧ 𝑘 ∈ ℕ) → (𝐴𝑘) ∈ ran 𝐴)
135 elssuni 4901 . . . . . . . . . . . . . . . 16 ((𝐴𝑘) ∈ ran 𝐴 → (𝐴𝑘) ⊆ ran 𝐴)
136134, 135syl 17 . . . . . . . . . . . . . . 15 ((𝐴 Fn ℕ ∧ 𝑘 ∈ ℕ) → (𝐴𝑘) ⊆ ran 𝐴)
137136sseld 3945 . . . . . . . . . . . . . 14 ((𝐴 Fn ℕ ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐴𝑘) → 𝑥 ran 𝐴))
138133, 137sylan 580 . . . . . . . . . . . . 13 (((𝜑𝑥𝑋) ∧ 𝑘 ∈ ℕ) → (𝑥 ∈ (𝐴𝑘) → 𝑥 ran 𝐴))
139131, 138sylbird 260 . . . . . . . . . . . 12 (((𝜑𝑥𝑋) ∧ 𝑘 ∈ ℕ) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘𝑥 ran 𝐴))
140139adantlr 715 . . . . . . . . . . 11 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑘𝑥 ran 𝐴))
141119, 140syl6d 75 . . . . . . . . . 10 ((((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) ∧ 𝑘 ∈ ℕ) → (𝑐 < 𝑘 → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴)))
142141rexlimdva 3134 . . . . . . . . 9 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → (∃𝑘 ∈ ℕ 𝑐 < 𝑘 → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴)))
143100, 142mpd 15 . . . . . . . 8 (((𝜑𝑥𝑋) ∧ 𝑐 ∈ ℝ) → (∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴))
144143rexlimdva 3134 . . . . . . 7 ((𝜑𝑥𝑋) → (∃𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐𝑥 ran 𝐴))
145144ralimdva 3145 . . . . . 6 (𝜑 → (∀𝑥𝑋𝑐 ∈ ℝ ∀𝑡𝑇 (𝑁‘(𝑡𝑥)) ≤ 𝑐 → ∀𝑥𝑋 𝑥 ran 𝐴))
14698, 145mpd 15 . . . . 5 (𝜑 → ∀𝑥𝑋 𝑥 ran 𝐴)
147 dfss3 3935 . . . . 5 (𝑋 ran 𝐴 ↔ ∀𝑥𝑋 𝑥 ran 𝐴)
148146, 147sylibr 234 . . . 4 (𝜑𝑋 ran 𝐴)
14997, 148eqssd 3964 . . 3 (𝜑 ran 𝐴 = 𝑋)
150 eqid 2729 . . . . . 6 (0vec𝑈) = (0vec𝑈)
15122, 150nvzcl 30563 . . . . 5 (𝑈 ∈ NrmCVec → (0vec𝑈) ∈ 𝑋)
152 ne0i 4304 . . . . 5 ((0vec𝑈) ∈ 𝑋𝑋 ≠ ∅)
15319, 151, 152mp2b 10 . . . 4 𝑋 ≠ ∅
15414bcth2 25230 . . . 4 (((𝐷 ∈ (CMet‘𝑋) ∧ 𝑋 ≠ ∅) ∧ (𝐴:ℕ⟶(Clsd‘𝐽) ∧ ran 𝐴 = 𝑋)) → ∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅)
15524, 153, 154mpanl12 702 . . 3 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ ran 𝐴 = 𝑋) → ∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅)
15692, 149, 155syl2anc 584 . 2 (𝜑 → ∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅)
157 ffvelcdm 7053 . . . . . . . . . . 11 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ 𝑛 ∈ ℕ) → (𝐴𝑛) ∈ (Clsd‘𝐽))
15894, 157sselid 3944 . . . . . . . . . 10 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ 𝑛 ∈ ℕ) → (𝐴𝑛) ∈ 𝒫 𝑋)
159158elpwid 4572 . . . . . . . . 9 ((𝐴:ℕ⟶(Clsd‘𝐽) ∧ 𝑛 ∈ ℕ) → (𝐴𝑛) ⊆ 𝑋)
16092, 159sylan 580 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (𝐴𝑛) ⊆ 𝑋)
16186ntrss3 22947 . . . . . . . 8 ((𝐽 ∈ Top ∧ (𝐴𝑛) ⊆ 𝑋) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
16285, 160, 161sylancr 587 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
163162sseld 3945 . . . . . 6 ((𝜑𝑛 ∈ ℕ) → (𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → 𝑦𝑋))
16486ntropn 22936 . . . . . . . . . 10 ((𝐽 ∈ Top ∧ (𝐴𝑛) ⊆ 𝑋) → ((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽)
16585, 160, 164sylancr 587 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽)
16614mopni2 24381 . . . . . . . . . 10 ((𝐷 ∈ (∞Met‘𝑋) ∧ ((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)))
16727, 166mp3an1 1450 . . . . . . . . 9 ((((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)))
168165, 167sylan 580 . . . . . . . 8 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → ∃𝑥 ∈ ℝ+ (𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)))
169 elssuni 4901 . . . . . . . . . . . 12 (((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽 → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝐽)
170169, 86sseqtrrdi 3988 . . . . . . . . . . 11 (((int‘𝐽)‘(𝐴𝑛)) ∈ 𝐽 → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
171165, 170syl 17 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ 𝑋)
172171sselda 3946 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛))) → 𝑦𝑋)
17386ntrss2 22944 . . . . . . . . . . . . . 14 ((𝐽 ∈ Top ∧ (𝐴𝑛) ⊆ 𝑋) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ (𝐴𝑛))
17485, 160, 173sylancr 587 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → ((int‘𝐽)‘(𝐴𝑛)) ⊆ (𝐴𝑛))
175 sstr2 3953 . . . . . . . . . . . . 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 12980 . . . . . . . . . . . . . . 15 (𝑥 ∈ ℝ+ → (𝑥 / 2) ∈ ℝ+)
181180rpxrd 12996 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ+ → (𝑥 / 2) ∈ ℝ*)
182 rpxr 12961 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ+𝑥 ∈ ℝ*)
183 rphalflt 12982 . . . . . . . . . . . . . 14 (𝑥 ∈ ℝ+ → (𝑥 / 2) < 𝑥)
184181, 182, 1833jca 1128 . . . . . . . . . . . . 13 (𝑥 ∈ ℝ+ → ((𝑥 / 2) ∈ ℝ*𝑥 ∈ ℝ* ∧ (𝑥 / 2) < 𝑥))
185 eqid 2729 . . . . . . . . . . . . . 14 {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} = {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)}
18614, 185blsscls2 24392 . . . . . . . . . . . . 13 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑦𝑋) ∧ ((𝑥 / 2) ∈ ℝ*𝑥 ∈ ℝ* ∧ (𝑥 / 2) < 𝑥)) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝑦(ball‘𝐷)𝑥))
187179, 184, 186syl2an 596 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝑦(ball‘𝐷)𝑥))
188 sstr2 3953 . . . . . . . . . . . 12 ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝑦(ball‘𝐷)𝑥) → ((𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)))
189187, 188syl 17 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ((𝑦(ball‘𝐷)𝑥) ⊆ (𝐴𝑛) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)))
190180adantl 481 . . . . . . . . . . . 12 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → (𝑥 / 2) ∈ ℝ+)
191 breq2 5111 . . . . . . . . . . . . . . . 16 (𝑟 = (𝑥 / 2) → ((𝑦𝐷𝑧) ≤ 𝑟 ↔ (𝑦𝐷𝑧) ≤ (𝑥 / 2)))
192191rabbidv 3413 . . . . . . . . . . . . . . 15 (𝑟 = (𝑥 / 2) → {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} = {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)})
193192sseq1d 3978 . . . . . . . . . . . . . 14 (𝑟 = (𝑥 / 2) → ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛) ↔ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)))
194193rspcev 3588 . . . . . . . . . . . . 13 (((𝑥 / 2) ∈ ℝ+ ∧ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))
195194ex 412 . . . . . . . . . . . 12 ((𝑥 / 2) ∈ ℝ+ → ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
196190, 195syl 17 . . . . . . . . . . 11 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ({𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ (𝑥 / 2)} ⊆ (𝐴𝑛) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
197177, 189, 1963syld 60 . . . . . . . . . 10 ((((𝜑𝑛 ∈ ℕ) ∧ 𝑦𝑋) ∧ 𝑥 ∈ ℝ+) → ((𝑦(ball‘𝐷)𝑥) ⊆ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
198197rexlimdva 3134 . . . . . . . . 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 1917 . . . 4 ((𝜑𝑛 ∈ ℕ) → (∃𝑦 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)) → ∃𝑦(𝑦𝑋 ∧ ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))))
204 n0 4316 . . . 4 (((int‘𝐽)‘(𝐴𝑛)) ≠ ∅ ↔ ∃𝑦 𝑦 ∈ ((int‘𝐽)‘(𝐴𝑛)))
205 df-rex 3054 . . . 4 (∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛) ↔ ∃𝑦(𝑦𝑋 ∧ ∃𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
206203, 204, 2053imtr4g 296 . . 3 ((𝜑𝑛 ∈ ℕ) → (((int‘𝐽)‘(𝐴𝑛)) ≠ ∅ → ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
207206reximdva 3146 . 2 (𝜑 → (∃𝑛 ∈ ℕ ((int‘𝐽)‘(𝐴𝑛)) ≠ ∅ → ∃𝑛 ∈ ℕ ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛)))
208156, 207mpd 15 1 (𝜑 → ∃𝑛 ∈ ℕ ∃𝑦𝑋𝑟 ∈ ℝ+ {𝑧𝑋 ∣ (𝑦𝐷𝑧) ≤ 𝑟} ⊆ (𝐴𝑛))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1540  wex 1779  wcel 2109  wne 2925  wral 3044  wrex 3053  {crab 3405  Vcvv 3447  wss 3914  c0 4296  𝒫 cpw 4563   cuni 4871   ciin 4956   class class class wbr 5107  cmpt 5188  ccnv 5637  ran crn 5639  cima 5641   Fn wfn 6506  wf 6507  cfv 6511  (class class class)co 7387  cr 11067  *cxr 11207   < clt 11208  cle 11209   / cdiv 11835  cn 12186  2c2 12241  +crp 12951  ∞Metcxmet 21249  Metcmet 21250  ballcbl 21251  MetOpencmopn 21254  Topctop 22780  TopOnctopon 22797  Clsdccld 22903  intcnt 22904   Cn ccn 23111  CMetccmet 25154  NrmCVeccnv 30513  BaseSetcba 30515  0veccn0v 30517  normCVcnmcv 30519  IndMetcims 30520   BLnOp cblo 30671  CBanccbn 30791
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5234  ax-sep 5251  ax-nul 5261  ax-pow 5320  ax-pr 5387  ax-un 7711  ax-inf2 9594  ax-dc 10399  ax-cnex 11124  ax-resscn 11125  ax-1cn 11126  ax-icn 11127  ax-addcl 11128  ax-addrcl 11129  ax-mulcl 11130  ax-mulrcl 11131  ax-mulcom 11132  ax-addass 11133  ax-mulass 11134  ax-distr 11135  ax-i2m1 11136  ax-1ne0 11137  ax-1rid 11138  ax-rnegex 11139  ax-rrecex 11140  ax-cnre 11141  ax-pre-lttri 11142  ax-pre-lttrn 11143  ax-pre-ltadd 11144  ax-pre-mulgt0 11145  ax-pre-sup 11146  ax-addf 11147  ax-mulf 11148
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3354  df-reu 3355  df-rab 3406  df-v 3449  df-sbc 3754  df-csb 3863  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-pss 3934  df-nul 4297  df-if 4489  df-pw 4565  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4872  df-int 4911  df-iun 4957  df-iin 4958  df-br 5108  df-opab 5170  df-mpt 5189  df-tr 5215  df-id 5533  df-eprel 5538  df-po 5546  df-so 5547  df-fr 5591  df-we 5593  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6274  df-ord 6335  df-on 6336  df-lim 6337  df-suc 6338  df-iota 6464  df-fun 6513  df-fn 6514  df-f 6515  df-f1 6516  df-fo 6517  df-f1o 6518  df-fv 6519  df-riota 7344  df-ov 7390  df-oprab 7391  df-mpo 7392  df-om 7843  df-1st 7968  df-2nd 7969  df-frecs 8260  df-wrecs 8291  df-recs 8340  df-rdg 8378  df-1o 8434  df-er 8671  df-map 8801  df-pm 8802  df-en 8919  df-dom 8920  df-sdom 8921  df-sup 9393  df-inf 9394  df-pnf 11210  df-mnf 11211  df-xr 11212  df-ltxr 11213  df-le 11214  df-sub 11407  df-neg 11408  df-div 11836  df-nn 12187  df-2 12249  df-3 12250  df-n0 12443  df-z 12530  df-uz 12794  df-q 12908  df-rp 12952  df-xneg 13072  df-xadd 13073  df-xmul 13074  df-ico 13312  df-seq 13967  df-exp 14027  df-cj 15065  df-re 15066  df-im 15067  df-sqrt 15201  df-abs 15202  df-rest 17385  df-topgen 17406  df-psmet 21256  df-xmet 21257  df-met 21258  df-bl 21259  df-mopn 21260  df-fbas 21261  df-fg 21262  df-top 22781  df-topon 22798  df-bases 22833  df-cld 22906  df-ntr 22907  df-cls 22908  df-nei 22985  df-cn 23114  df-cnp 23115  df-lm 23116  df-fil 23733  df-fm 23825  df-flim 23826  df-flf 23827  df-cfil 25155  df-cau 25156  df-cmet 25157  df-grpo 30422  df-gid 30423  df-ginv 30424  df-gdiv 30425  df-ablo 30474  df-vc 30488  df-nv 30521  df-va 30524  df-ba 30525  df-sm 30526  df-0v 30527  df-vs 30528  df-nmcv 30529  df-ims 30530  df-lno 30673  df-nmoo 30674  df-blo 30675  df-0o 30676  df-cbn 30792
This theorem is referenced by:  ubthlem3  30801
  Copyright terms: Public domain W3C validator