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

Theorem met2ndci 24461
Description: A separable metric space (a metric space with a countable dense subset) is second-countable. (Contributed by Mario Carneiro, 13-Apr-2015.)
Hypothesis
Ref Expression
methaus.1 𝐽 = (MetOpenβ€˜π·)
Assertion
Ref Expression
met2ndci ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ 𝐽 ∈ 2ndΟ‰)

Proof of Theorem met2ndci
Dummy variables 𝑛 π‘Ÿ 𝑑 𝑒 𝑀 π‘₯ 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 methaus.1 . . . . 5 𝐽 = (MetOpenβ€˜π·)
21mopntop 24376 . . . 4 (𝐷 ∈ (∞Metβ€˜π‘‹) β†’ 𝐽 ∈ Top)
32adantr 479 . . 3 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ 𝐽 ∈ Top)
4 simpll 765 . . . . . . 7 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (π‘₯ ∈ β„• ∧ 𝑦 ∈ 𝐴)) β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
5 simplr1 1212 . . . . . . . 8 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (π‘₯ ∈ β„• ∧ 𝑦 ∈ 𝐴)) β†’ 𝐴 βŠ† 𝑋)
6 simprr 771 . . . . . . . 8 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (π‘₯ ∈ β„• ∧ 𝑦 ∈ 𝐴)) β†’ 𝑦 ∈ 𝐴)
75, 6sseldd 3978 . . . . . . 7 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (π‘₯ ∈ β„• ∧ 𝑦 ∈ 𝐴)) β†’ 𝑦 ∈ 𝑋)
8 simprl 769 . . . . . . . . . 10 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (π‘₯ ∈ β„• ∧ 𝑦 ∈ 𝐴)) β†’ π‘₯ ∈ β„•)
98nnrpd 13046 . . . . . . . . 9 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (π‘₯ ∈ β„• ∧ 𝑦 ∈ 𝐴)) β†’ π‘₯ ∈ ℝ+)
109rpreccld 13058 . . . . . . . 8 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (π‘₯ ∈ β„• ∧ 𝑦 ∈ 𝐴)) β†’ (1 / π‘₯) ∈ ℝ+)
1110rpxrd 13049 . . . . . . 7 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (π‘₯ ∈ β„• ∧ 𝑦 ∈ 𝐴)) β†’ (1 / π‘₯) ∈ ℝ*)
121blopn 24439 . . . . . . 7 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ 𝑦 ∈ 𝑋 ∧ (1 / π‘₯) ∈ ℝ*) β†’ (𝑦(ballβ€˜π·)(1 / π‘₯)) ∈ 𝐽)
134, 7, 11, 12syl3anc 1368 . . . . . 6 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (π‘₯ ∈ β„• ∧ 𝑦 ∈ 𝐴)) β†’ (𝑦(ballβ€˜π·)(1 / π‘₯)) ∈ 𝐽)
1413ralrimivva 3191 . . . . 5 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ βˆ€π‘₯ ∈ β„• βˆ€π‘¦ ∈ 𝐴 (𝑦(ballβ€˜π·)(1 / π‘₯)) ∈ 𝐽)
15 eqid 2725 . . . . . 6 (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) = (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))
1615fmpo 8071 . . . . 5 (βˆ€π‘₯ ∈ β„• βˆ€π‘¦ ∈ 𝐴 (𝑦(ballβ€˜π·)(1 / π‘₯)) ∈ 𝐽 ↔ (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))):(β„• Γ— 𝐴)⟢𝐽)
1714, 16sylib 217 . . . 4 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))):(β„• Γ— 𝐴)⟢𝐽)
1817frnd 6729 . . 3 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) βŠ† 𝐽)
19 simpll 765 . . . . . 6 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
20 simprl 769 . . . . . 6 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) β†’ 𝑒 ∈ 𝐽)
21 simprr 771 . . . . . 6 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) β†’ 𝑧 ∈ 𝑒)
221mopni2 24432 . . . . . 6 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ 𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒) β†’ βˆƒπ‘Ÿ ∈ ℝ+ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒)
2319, 20, 21, 22syl3anc 1368 . . . . 5 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) β†’ βˆƒπ‘Ÿ ∈ ℝ+ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒)
24 simprl 769 . . . . . . . 8 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ (π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒)) β†’ π‘Ÿ ∈ ℝ+)
2524rphalfcld 13060 . . . . . . 7 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ (π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒)) β†’ (π‘Ÿ / 2) ∈ ℝ+)
26 elrp 13008 . . . . . . . 8 ((π‘Ÿ / 2) ∈ ℝ+ ↔ ((π‘Ÿ / 2) ∈ ℝ ∧ 0 < (π‘Ÿ / 2)))
27 nnrecl 12500 . . . . . . . 8 (((π‘Ÿ / 2) ∈ ℝ ∧ 0 < (π‘Ÿ / 2)) β†’ βˆƒπ‘› ∈ β„• (1 / 𝑛) < (π‘Ÿ / 2))
2826, 27sylbi 216 . . . . . . 7 ((π‘Ÿ / 2) ∈ ℝ+ β†’ βˆƒπ‘› ∈ β„• (1 / 𝑛) < (π‘Ÿ / 2))
2925, 28syl 17 . . . . . 6 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ (π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒)) β†’ βˆƒπ‘› ∈ β„• (1 / 𝑛) < (π‘Ÿ / 2))
303ad2antrr 724 . . . . . . . . . 10 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝐽 ∈ Top)
31 simpr1 1191 . . . . . . . . . . . 12 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ 𝐴 βŠ† 𝑋)
3231ad2antrr 724 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝐴 βŠ† 𝑋)
331mopnuni 24377 . . . . . . . . . . . 12 (𝐷 ∈ (∞Metβ€˜π‘‹) β†’ 𝑋 = βˆͺ 𝐽)
3433ad3antrrr 728 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝑋 = βˆͺ 𝐽)
3532, 34sseqtrd 4018 . . . . . . . . . 10 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝐴 βŠ† βˆͺ 𝐽)
36 simplrr 776 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝑧 ∈ 𝑒)
37 simplrl 775 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝑒 ∈ 𝐽)
38 elunii 4913 . . . . . . . . . . . . 13 ((𝑧 ∈ 𝑒 ∧ 𝑒 ∈ 𝐽) β†’ 𝑧 ∈ βˆͺ 𝐽)
3936, 37, 38syl2anc 582 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝑧 ∈ βˆͺ 𝐽)
4039, 34eleqtrrd 2828 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝑧 ∈ 𝑋)
41 simpr3 1193 . . . . . . . . . . . 12 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ ((clsβ€˜π½)β€˜π΄) = 𝑋)
4241ad2antrr 724 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ ((clsβ€˜π½)β€˜π΄) = 𝑋)
4340, 42eleqtrrd 2828 . . . . . . . . . 10 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝑧 ∈ ((clsβ€˜π½)β€˜π΄))
4419adantr 479 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
45 simprrl 779 . . . . . . . . . . . . . 14 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝑛 ∈ β„•)
4645nnrpd 13046 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝑛 ∈ ℝ+)
4746rpreccld 13058 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ (1 / 𝑛) ∈ ℝ+)
4847rpxrd 13049 . . . . . . . . . . 11 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ (1 / 𝑛) ∈ ℝ*)
491blopn 24439 . . . . . . . . . . 11 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ 𝑧 ∈ 𝑋 ∧ (1 / 𝑛) ∈ ℝ*) β†’ (𝑧(ballβ€˜π·)(1 / 𝑛)) ∈ 𝐽)
5044, 40, 48, 49syl3anc 1368 . . . . . . . . . 10 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ (𝑧(ballβ€˜π·)(1 / 𝑛)) ∈ 𝐽)
51 blcntr 24349 . . . . . . . . . . 11 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ 𝑧 ∈ 𝑋 ∧ (1 / 𝑛) ∈ ℝ+) β†’ 𝑧 ∈ (𝑧(ballβ€˜π·)(1 / 𝑛)))
5244, 40, 47, 51syl3anc 1368 . . . . . . . . . 10 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ 𝑧 ∈ (𝑧(ballβ€˜π·)(1 / 𝑛)))
53 eqid 2725 . . . . . . . . . . 11 βˆͺ 𝐽 = βˆͺ 𝐽
5453clsndisj 23009 . . . . . . . . . 10 (((𝐽 ∈ Top ∧ 𝐴 βŠ† βˆͺ 𝐽 ∧ 𝑧 ∈ ((clsβ€˜π½)β€˜π΄)) ∧ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∈ 𝐽 ∧ 𝑧 ∈ (𝑧(ballβ€˜π·)(1 / 𝑛)))) β†’ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴) β‰  βˆ…)
5530, 35, 43, 50, 52, 54syl32anc 1375 . . . . . . . . 9 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴) β‰  βˆ…)
56 n0 4347 . . . . . . . . 9 (((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴) β‰  βˆ… ↔ βˆƒπ‘‘ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴))
5755, 56sylib 217 . . . . . . . 8 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ βˆƒπ‘‘ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴))
5845adantr 479 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝑛 ∈ β„•)
59 simpr 483 . . . . . . . . . . . 12 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴))
6059elin2d 4198 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝑑 ∈ 𝐴)
61 eqidd 2726 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑑(ballβ€˜π·)(1 / 𝑛)))
62 oveq2 7425 . . . . . . . . . . . . . 14 (π‘₯ = 𝑛 β†’ (1 / π‘₯) = (1 / 𝑛))
6362oveq2d 7433 . . . . . . . . . . . . 13 (π‘₯ = 𝑛 β†’ (𝑦(ballβ€˜π·)(1 / π‘₯)) = (𝑦(ballβ€˜π·)(1 / 𝑛)))
6463eqeq2d 2736 . . . . . . . . . . . 12 (π‘₯ = 𝑛 β†’ ((𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑦(ballβ€˜π·)(1 / π‘₯)) ↔ (𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑦(ballβ€˜π·)(1 / 𝑛))))
65 oveq1 7424 . . . . . . . . . . . . 13 (𝑦 = 𝑑 β†’ (𝑦(ballβ€˜π·)(1 / 𝑛)) = (𝑑(ballβ€˜π·)(1 / 𝑛)))
6665eqeq2d 2736 . . . . . . . . . . . 12 (𝑦 = 𝑑 β†’ ((𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑦(ballβ€˜π·)(1 / 𝑛)) ↔ (𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑑(ballβ€˜π·)(1 / 𝑛))))
6764, 66rspc2ev 3620 . . . . . . . . . . 11 ((𝑛 ∈ β„• ∧ 𝑑 ∈ 𝐴 ∧ (𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑑(ballβ€˜π·)(1 / 𝑛))) β†’ βˆƒπ‘₯ ∈ β„• βˆƒπ‘¦ ∈ 𝐴 (𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑦(ballβ€˜π·)(1 / π‘₯)))
6858, 60, 61, 67syl3anc 1368 . . . . . . . . . 10 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ βˆƒπ‘₯ ∈ β„• βˆƒπ‘¦ ∈ 𝐴 (𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑦(ballβ€˜π·)(1 / π‘₯)))
69 ovex 7450 . . . . . . . . . . 11 (𝑑(ballβ€˜π·)(1 / 𝑛)) ∈ V
70 eqeq1 2729 . . . . . . . . . . . 12 (𝑧 = (𝑑(ballβ€˜π·)(1 / 𝑛)) β†’ (𝑧 = (𝑦(ballβ€˜π·)(1 / π‘₯)) ↔ (𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑦(ballβ€˜π·)(1 / π‘₯))))
71702rexbidv 3210 . . . . . . . . . . 11 (𝑧 = (𝑑(ballβ€˜π·)(1 / 𝑛)) β†’ (βˆƒπ‘₯ ∈ β„• βˆƒπ‘¦ ∈ 𝐴 𝑧 = (𝑦(ballβ€˜π·)(1 / π‘₯)) ↔ βˆƒπ‘₯ ∈ β„• βˆƒπ‘¦ ∈ 𝐴 (𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑦(ballβ€˜π·)(1 / π‘₯))))
7215rnmpo 7552 . . . . . . . . . . 11 ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) = {𝑧 ∣ βˆƒπ‘₯ ∈ β„• βˆƒπ‘¦ ∈ 𝐴 𝑧 = (𝑦(ballβ€˜π·)(1 / π‘₯))}
7369, 71, 72elab2 3669 . . . . . . . . . 10 ((𝑑(ballβ€˜π·)(1 / 𝑛)) ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) ↔ βˆƒπ‘₯ ∈ β„• βˆƒπ‘¦ ∈ 𝐴 (𝑑(ballβ€˜π·)(1 / 𝑛)) = (𝑦(ballβ€˜π·)(1 / π‘₯)))
7468, 73sylibr 233 . . . . . . . . 9 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (𝑑(ballβ€˜π·)(1 / 𝑛)) ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))))
7559elin1d 4197 . . . . . . . . . 10 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝑑 ∈ (𝑧(ballβ€˜π·)(1 / 𝑛)))
7644adantr 479 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
7748adantr 479 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (1 / 𝑛) ∈ ℝ*)
7840adantr 479 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝑧 ∈ 𝑋)
7932adantr 479 . . . . . . . . . . . 12 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝐴 βŠ† 𝑋)
8079, 60sseldd 3978 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝑑 ∈ 𝑋)
81 blcom 24330 . . . . . . . . . . 11 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (1 / 𝑛) ∈ ℝ*) ∧ (𝑧 ∈ 𝑋 ∧ 𝑑 ∈ 𝑋)) β†’ (𝑑 ∈ (𝑧(ballβ€˜π·)(1 / 𝑛)) ↔ 𝑧 ∈ (𝑑(ballβ€˜π·)(1 / 𝑛))))
8276, 77, 78, 80, 81syl22anc 837 . . . . . . . . . 10 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (𝑑 ∈ (𝑧(ballβ€˜π·)(1 / 𝑛)) ↔ 𝑧 ∈ (𝑑(ballβ€˜π·)(1 / 𝑛))))
8375, 82mpbid 231 . . . . . . . . 9 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝑧 ∈ (𝑑(ballβ€˜π·)(1 / 𝑛)))
84 simprll 777 . . . . . . . . . . . . . 14 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ π‘Ÿ ∈ ℝ+)
8584adantr 479 . . . . . . . . . . . . 13 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ π‘Ÿ ∈ ℝ+)
8685rphalfcld 13060 . . . . . . . . . . . 12 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (π‘Ÿ / 2) ∈ ℝ+)
8786rpxrd 13049 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (π‘Ÿ / 2) ∈ ℝ*)
88 simprrr 780 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ (1 / 𝑛) < (π‘Ÿ / 2))
8984rphalfcld 13060 . . . . . . . . . . . . . 14 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ (π‘Ÿ / 2) ∈ ℝ+)
90 rpre 13014 . . . . . . . . . . . . . . 15 ((1 / 𝑛) ∈ ℝ+ β†’ (1 / 𝑛) ∈ ℝ)
91 rpre 13014 . . . . . . . . . . . . . . 15 ((π‘Ÿ / 2) ∈ ℝ+ β†’ (π‘Ÿ / 2) ∈ ℝ)
92 ltle 11332 . . . . . . . . . . . . . . 15 (((1 / 𝑛) ∈ ℝ ∧ (π‘Ÿ / 2) ∈ ℝ) β†’ ((1 / 𝑛) < (π‘Ÿ / 2) β†’ (1 / 𝑛) ≀ (π‘Ÿ / 2)))
9390, 91, 92syl2an 594 . . . . . . . . . . . . . 14 (((1 / 𝑛) ∈ ℝ+ ∧ (π‘Ÿ / 2) ∈ ℝ+) β†’ ((1 / 𝑛) < (π‘Ÿ / 2) β†’ (1 / 𝑛) ≀ (π‘Ÿ / 2)))
9447, 89, 93syl2anc 582 . . . . . . . . . . . . 13 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ ((1 / 𝑛) < (π‘Ÿ / 2) β†’ (1 / 𝑛) ≀ (π‘Ÿ / 2)))
9588, 94mpd 15 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ (1 / 𝑛) ≀ (π‘Ÿ / 2))
9695adantr 479 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (1 / 𝑛) ≀ (π‘Ÿ / 2))
97 ssbl 24359 . . . . . . . . . . 11 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ 𝑑 ∈ 𝑋) ∧ ((1 / 𝑛) ∈ ℝ* ∧ (π‘Ÿ / 2) ∈ ℝ*) ∧ (1 / 𝑛) ≀ (π‘Ÿ / 2)) β†’ (𝑑(ballβ€˜π·)(1 / 𝑛)) βŠ† (𝑑(ballβ€˜π·)(π‘Ÿ / 2)))
9876, 80, 77, 87, 96, 97syl221anc 1378 . . . . . . . . . 10 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (𝑑(ballβ€˜π·)(1 / 𝑛)) βŠ† (𝑑(ballβ€˜π·)(π‘Ÿ / 2)))
9985rpred 13048 . . . . . . . . . . . 12 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ π‘Ÿ ∈ ℝ)
10098, 83sseldd 3978 . . . . . . . . . . . 12 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ 𝑧 ∈ (𝑑(ballβ€˜π·)(π‘Ÿ / 2)))
101 blhalf 24341 . . . . . . . . . . . 12 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ 𝑑 ∈ 𝑋) ∧ (π‘Ÿ ∈ ℝ ∧ 𝑧 ∈ (𝑑(ballβ€˜π·)(π‘Ÿ / 2)))) β†’ (𝑑(ballβ€˜π·)(π‘Ÿ / 2)) βŠ† (𝑧(ballβ€˜π·)π‘Ÿ))
10276, 80, 99, 100, 101syl22anc 837 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (𝑑(ballβ€˜π·)(π‘Ÿ / 2)) βŠ† (𝑧(ballβ€˜π·)π‘Ÿ))
103 simprlr 778 . . . . . . . . . . . 12 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒)
104103adantr 479 . . . . . . . . . . 11 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒)
105102, 104sstrd 3988 . . . . . . . . . 10 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (𝑑(ballβ€˜π·)(π‘Ÿ / 2)) βŠ† 𝑒)
10698, 105sstrd 3988 . . . . . . . . 9 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ (𝑑(ballβ€˜π·)(1 / 𝑛)) βŠ† 𝑒)
107 eleq2 2814 . . . . . . . . . . 11 (𝑀 = (𝑑(ballβ€˜π·)(1 / 𝑛)) β†’ (𝑧 ∈ 𝑀 ↔ 𝑧 ∈ (𝑑(ballβ€˜π·)(1 / 𝑛))))
108 sseq1 4003 . . . . . . . . . . 11 (𝑀 = (𝑑(ballβ€˜π·)(1 / 𝑛)) β†’ (𝑀 βŠ† 𝑒 ↔ (𝑑(ballβ€˜π·)(1 / 𝑛)) βŠ† 𝑒))
109107, 108anbi12d 630 . . . . . . . . . 10 (𝑀 = (𝑑(ballβ€˜π·)(1 / 𝑛)) β†’ ((𝑧 ∈ 𝑀 ∧ 𝑀 βŠ† 𝑒) ↔ (𝑧 ∈ (𝑑(ballβ€˜π·)(1 / 𝑛)) ∧ (𝑑(ballβ€˜π·)(1 / 𝑛)) βŠ† 𝑒)))
110109rspcev 3607 . . . . . . . . 9 (((𝑑(ballβ€˜π·)(1 / 𝑛)) ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) ∧ (𝑧 ∈ (𝑑(ballβ€˜π·)(1 / 𝑛)) ∧ (𝑑(ballβ€˜π·)(1 / 𝑛)) βŠ† 𝑒)) β†’ βˆƒπ‘€ ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))(𝑧 ∈ 𝑀 ∧ 𝑀 βŠ† 𝑒))
11174, 83, 106, 110syl12anc 835 . . . . . . . 8 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) ∧ 𝑑 ∈ ((𝑧(ballβ€˜π·)(1 / 𝑛)) ∩ 𝐴)) β†’ βˆƒπ‘€ ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))(𝑧 ∈ 𝑀 ∧ 𝑀 βŠ† 𝑒))
11257, 111exlimddv 1930 . . . . . . 7 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ ((π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2)))) β†’ βˆƒπ‘€ ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))(𝑧 ∈ 𝑀 ∧ 𝑀 βŠ† 𝑒))
113112anassrs 466 . . . . . 6 (((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ (π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒)) ∧ (𝑛 ∈ β„• ∧ (1 / 𝑛) < (π‘Ÿ / 2))) β†’ βˆƒπ‘€ ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))(𝑧 ∈ 𝑀 ∧ 𝑀 βŠ† 𝑒))
11429, 113rexlimddv 3151 . . . . 5 ((((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) ∧ (π‘Ÿ ∈ ℝ+ ∧ (𝑧(ballβ€˜π·)π‘Ÿ) βŠ† 𝑒)) β†’ βˆƒπ‘€ ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))(𝑧 ∈ 𝑀 ∧ 𝑀 βŠ† 𝑒))
11523, 114rexlimddv 3151 . . . 4 (((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) ∧ (𝑒 ∈ 𝐽 ∧ 𝑧 ∈ 𝑒)) β†’ βˆƒπ‘€ ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))(𝑧 ∈ 𝑀 ∧ 𝑀 βŠ† 𝑒))
116115ralrimivva 3191 . . 3 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ βˆ€π‘’ ∈ 𝐽 βˆ€π‘§ ∈ 𝑒 βˆƒπ‘€ ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))(𝑧 ∈ 𝑀 ∧ 𝑀 βŠ† 𝑒))
117 basgen2 22922 . . 3 ((𝐽 ∈ Top ∧ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) βŠ† 𝐽 ∧ βˆ€π‘’ ∈ 𝐽 βˆ€π‘§ ∈ 𝑒 βˆƒπ‘€ ∈ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))(𝑧 ∈ 𝑀 ∧ 𝑀 βŠ† 𝑒)) β†’ (topGenβ€˜ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))) = 𝐽)
1183, 18, 116, 117syl3anc 1368 . 2 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ (topGenβ€˜ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))) = 𝐽)
119118, 3eqeltrd 2825 . . . 4 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ (topGenβ€˜ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))) ∈ Top)
120 tgclb 22903 . . . 4 (ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) ∈ TopBases ↔ (topGenβ€˜ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))) ∈ Top)
121119, 120sylibr 233 . . 3 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) ∈ TopBases)
122 omelon 9669 . . . . . 6 Ο‰ ∈ On
123 simpr2 1192 . . . . . . . 8 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ 𝐴 β‰Ό Ο‰)
124 nnex 12248 . . . . . . . . 9 β„• ∈ V
125124xpdom2 9090 . . . . . . . 8 (𝐴 β‰Ό Ο‰ β†’ (β„• Γ— 𝐴) β‰Ό (β„• Γ— Ο‰))
126123, 125syl 17 . . . . . . 7 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ (β„• Γ— 𝐴) β‰Ό (β„• Γ— Ο‰))
127 nnenom 13977 . . . . . . . . 9 β„• β‰ˆ Ο‰
128 omex 9666 . . . . . . . . . 10 Ο‰ ∈ V
129128enref 9004 . . . . . . . . 9 Ο‰ β‰ˆ Ο‰
130 xpen 9163 . . . . . . . . 9 ((β„• β‰ˆ Ο‰ ∧ Ο‰ β‰ˆ Ο‰) β†’ (β„• Γ— Ο‰) β‰ˆ (Ο‰ Γ— Ο‰))
131127, 129, 130mp2an 690 . . . . . . . 8 (β„• Γ— Ο‰) β‰ˆ (Ο‰ Γ— Ο‰)
132 xpomen 10038 . . . . . . . 8 (Ο‰ Γ— Ο‰) β‰ˆ Ο‰
133131, 132entri 9027 . . . . . . 7 (β„• Γ— Ο‰) β‰ˆ Ο‰
134 domentr 9032 . . . . . . 7 (((β„• Γ— 𝐴) β‰Ό (β„• Γ— Ο‰) ∧ (β„• Γ— Ο‰) β‰ˆ Ο‰) β†’ (β„• Γ— 𝐴) β‰Ό Ο‰)
135126, 133, 134sylancl 584 . . . . . 6 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ (β„• Γ— 𝐴) β‰Ό Ο‰)
136 ondomen 10060 . . . . . 6 ((Ο‰ ∈ On ∧ (β„• Γ— 𝐴) β‰Ό Ο‰) β†’ (β„• Γ— 𝐴) ∈ dom card)
137122, 135, 136sylancr 585 . . . . 5 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ (β„• Γ— 𝐴) ∈ dom card)
13817ffnd 6722 . . . . . 6 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) Fn (β„• Γ— 𝐴))
139 dffn4 6814 . . . . . 6 ((π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) Fn (β„• Γ— 𝐴) ↔ (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))):(β„• Γ— 𝐴)–ontoβ†’ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))))
140138, 139sylib 217 . . . . 5 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))):(β„• Γ— 𝐴)–ontoβ†’ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))))
141 fodomnum 10080 . . . . 5 ((β„• Γ— 𝐴) ∈ dom card β†’ ((π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))):(β„• Γ— 𝐴)–ontoβ†’ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) β†’ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) β‰Ό (β„• Γ— 𝐴)))
142137, 140, 141sylc 65 . . . 4 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) β‰Ό (β„• Γ— 𝐴))
143 domtr 9026 . . . 4 ((ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) β‰Ό (β„• Γ— 𝐴) ∧ (β„• Γ— 𝐴) β‰Ό Ο‰) β†’ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) β‰Ό Ο‰)
144142, 135, 143syl2anc 582 . . 3 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) β‰Ό Ο‰)
145 2ndci 23382 . . 3 ((ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) ∈ TopBases ∧ ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯))) β‰Ό Ο‰) β†’ (topGenβ€˜ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))) ∈ 2ndΟ‰)
146121, 144, 145syl2anc 582 . 2 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ (topGenβ€˜ran (π‘₯ ∈ β„•, 𝑦 ∈ 𝐴 ↦ (𝑦(ballβ€˜π·)(1 / π‘₯)))) ∈ 2ndΟ‰)
147118, 146eqeltrrd 2826 1 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ (𝐴 βŠ† 𝑋 ∧ 𝐴 β‰Ό Ο‰ ∧ ((clsβ€˜π½)β€˜π΄) = 𝑋)) β†’ 𝐽 ∈ 2ndΟ‰)
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 394   ∧ w3a 1084   = wceq 1533  βˆƒwex 1773   ∈ wcel 2098   β‰  wne 2930  βˆ€wral 3051  βˆƒwrex 3060   ∩ cin 3944   βŠ† wss 3945  βˆ…c0 4323  βˆͺ cuni 4908   class class class wbr 5148   Γ— cxp 5675  dom cdm 5677  ran crn 5678  Oncon0 6369   Fn wfn 6542  βŸΆwf 6543  β€“ontoβ†’wfo 6545  β€˜cfv 6547  (class class class)co 7417   ∈ cmpo 7419  Ο‰com 7869   β‰ˆ cen 8959   β‰Ό cdom 8960  cardccrd 9958  β„cr 11137  0cc0 11138  1c1 11139  β„*cxr 11277   < clt 11278   ≀ cle 11279   / cdiv 11901  β„•cn 12242  2c2 12297  β„+crp 13006  topGenctg 17418  βˆžMetcxmet 21268  ballcbl 21270  MetOpencmopn 21273  Topctop 22825  TopBasesctb 22878  clsccl 22952  2ndΟ‰c2ndc 23372
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5364  ax-pr 5428  ax-un 7739  ax-inf2 9664  ax-cnex 11194  ax-resscn 11195  ax-1cn 11196  ax-icn 11197  ax-addcl 11198  ax-addrcl 11199  ax-mulcl 11200  ax-mulrcl 11201  ax-mulcom 11202  ax-addass 11203  ax-mulass 11204  ax-distr 11205  ax-i2m1 11206  ax-1ne0 11207  ax-1rid 11208  ax-rnegex 11209  ax-rrecex 11210  ax-cnre 11211  ax-pre-lttri 11212  ax-pre-lttrn 11213  ax-pre-ltadd 11214  ax-pre-mulgt0 11215  ax-pre-sup 11216
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2931  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3364  df-reu 3365  df-rab 3420  df-v 3465  df-sbc 3775  df-csb 3891  df-dif 3948  df-un 3950  df-in 3952  df-ss 3962  df-pss 3965  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4909  df-int 4950  df-iun 4998  df-iin 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5575  df-eprel 5581  df-po 5589  df-so 5590  df-fr 5632  df-se 5633  df-we 5634  df-xp 5683  df-rel 5684  df-cnv 5685  df-co 5686  df-dm 5687  df-rn 5688  df-res 5689  df-ima 5690  df-pred 6305  df-ord 6372  df-on 6373  df-lim 6374  df-suc 6375  df-iota 6499  df-fun 6549  df-fn 6550  df-f 6551  df-f1 6552  df-fo 6553  df-f1o 6554  df-fv 6555  df-isom 6556  df-riota 7373  df-ov 7420  df-oprab 7421  df-mpo 7422  df-om 7870  df-1st 7992  df-2nd 7993  df-frecs 8285  df-wrecs 8316  df-recs 8390  df-rdg 8429  df-1o 8485  df-er 8723  df-map 8845  df-en 8963  df-dom 8964  df-sdom 8965  df-fin 8966  df-sup 9465  df-inf 9466  df-oi 9533  df-card 9962  df-acn 9965  df-pnf 11280  df-mnf 11281  df-xr 11282  df-ltxr 11283  df-le 11284  df-sub 11476  df-neg 11477  df-div 11902  df-nn 12243  df-2 12305  df-n0 12503  df-z 12589  df-uz 12853  df-q 12963  df-rp 13007  df-xneg 13124  df-xadd 13125  df-xmul 13126  df-topgen 17424  df-psmet 21275  df-xmet 21276  df-bl 21278  df-mopn 21279  df-top 22826  df-topon 22843  df-bases 22879  df-cld 22953  df-ntr 22954  df-cls 22955  df-2ndc 23374
This theorem is referenced by:  met2ndc  24462
  Copyright terms: Public domain W3C validator