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

Theorem sstotbnd2 36631
Description: Condition for a subset of a metric space to be totally bounded. (Contributed by Mario Carneiro, 12-Sep-2015.)
Hypothesis
Ref Expression
sstotbnd.2 𝑁 = (𝑀 β†Ύ (π‘Œ Γ— π‘Œ))
Assertion
Ref Expression
sstotbnd2 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝑁 ∈ (TotBndβ€˜π‘Œ) ↔ βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑)))
Distinct variable groups:   𝑣,𝑑,π‘₯,𝑀   𝑋,𝑑,𝑣,π‘₯   𝑁,𝑑,𝑣,π‘₯   π‘Œ,𝑑,𝑣,π‘₯

Proof of Theorem sstotbnd2
Dummy variables 𝑐 𝑓 𝑀 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 sstotbnd.2 . . . . 5 𝑁 = (𝑀 β†Ύ (π‘Œ Γ— π‘Œ))
2 metres2 23861 . . . . 5 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝑀 β†Ύ (π‘Œ Γ— π‘Œ)) ∈ (Metβ€˜π‘Œ))
31, 2eqeltrid 2838 . . . 4 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ 𝑁 ∈ (Metβ€˜π‘Œ))
4 istotbnd3 36628 . . . . 5 (𝑁 ∈ (TotBndβ€˜π‘Œ) ↔ (𝑁 ∈ (Metβ€˜π‘Œ) ∧ βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ))
54baib 537 . . . 4 (𝑁 ∈ (Metβ€˜π‘Œ) β†’ (𝑁 ∈ (TotBndβ€˜π‘Œ) ↔ βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ))
63, 5syl 17 . . 3 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝑁 ∈ (TotBndβ€˜π‘Œ) ↔ βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ))
7 simpllr 775 . . . . . . . . . 10 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)) β†’ π‘Œ βŠ† 𝑋)
87sspwd 4615 . . . . . . . . 9 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)) β†’ 𝒫 π‘Œ βŠ† 𝒫 𝑋)
98ssrind 4235 . . . . . . . 8 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)) β†’ (𝒫 π‘Œ ∩ Fin) βŠ† (𝒫 𝑋 ∩ Fin))
10 simprl 770 . . . . . . . 8 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)) β†’ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin))
119, 10sseldd 3983 . . . . . . 7 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)) β†’ 𝑣 ∈ (𝒫 𝑋 ∩ Fin))
12 simprr 772 . . . . . . . 8 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)) β†’ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)
13 metxmet 23832 . . . . . . . . . . . . . 14 (𝑀 ∈ (Metβ€˜π‘‹) β†’ 𝑀 ∈ (∞Metβ€˜π‘‹))
1413ad4antr 731 . . . . . . . . . . . . 13 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) ∧ π‘₯ ∈ 𝑣) β†’ 𝑀 ∈ (∞Metβ€˜π‘‹))
15 elfpw 9351 . . . . . . . . . . . . . . . . 17 (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ↔ (𝑣 βŠ† π‘Œ ∧ 𝑣 ∈ Fin))
1615simplbi 499 . . . . . . . . . . . . . . . 16 (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) β†’ 𝑣 βŠ† π‘Œ)
1716adantl 483 . . . . . . . . . . . . . . 15 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) β†’ 𝑣 βŠ† π‘Œ)
1817sselda 3982 . . . . . . . . . . . . . 14 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) ∧ π‘₯ ∈ 𝑣) β†’ π‘₯ ∈ π‘Œ)
19 simp-4r 783 . . . . . . . . . . . . . . 15 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) ∧ π‘₯ ∈ 𝑣) β†’ π‘Œ βŠ† 𝑋)
20 sseqin2 4215 . . . . . . . . . . . . . . 15 (π‘Œ βŠ† 𝑋 ↔ (𝑋 ∩ π‘Œ) = π‘Œ)
2119, 20sylib 217 . . . . . . . . . . . . . 14 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) ∧ π‘₯ ∈ 𝑣) β†’ (𝑋 ∩ π‘Œ) = π‘Œ)
2218, 21eleqtrrd 2837 . . . . . . . . . . . . 13 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) ∧ π‘₯ ∈ 𝑣) β†’ π‘₯ ∈ (𝑋 ∩ π‘Œ))
23 simpllr 775 . . . . . . . . . . . . . 14 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) ∧ π‘₯ ∈ 𝑣) β†’ 𝑑 ∈ ℝ+)
2423rpxrd 13014 . . . . . . . . . . . . 13 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) ∧ π‘₯ ∈ 𝑣) β†’ 𝑑 ∈ ℝ*)
251blres 23929 . . . . . . . . . . . . 13 ((𝑀 ∈ (∞Metβ€˜π‘‹) ∧ π‘₯ ∈ (𝑋 ∩ π‘Œ) ∧ 𝑑 ∈ ℝ*) β†’ (π‘₯(ballβ€˜π‘)𝑑) = ((π‘₯(ballβ€˜π‘€)𝑑) ∩ π‘Œ))
2614, 22, 24, 25syl3anc 1372 . . . . . . . . . . . 12 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) ∧ π‘₯ ∈ 𝑣) β†’ (π‘₯(ballβ€˜π‘)𝑑) = ((π‘₯(ballβ€˜π‘€)𝑑) ∩ π‘Œ))
27 inss1 4228 . . . . . . . . . . . 12 ((π‘₯(ballβ€˜π‘€)𝑑) ∩ π‘Œ) βŠ† (π‘₯(ballβ€˜π‘€)𝑑)
2826, 27eqsstrdi 4036 . . . . . . . . . . 11 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) ∧ π‘₯ ∈ 𝑣) β†’ (π‘₯(ballβ€˜π‘)𝑑) βŠ† (π‘₯(ballβ€˜π‘€)𝑑))
2928ralrimiva 3147 . . . . . . . . . 10 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) β†’ βˆ€π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) βŠ† (π‘₯(ballβ€˜π‘€)𝑑))
30 ss2iun 5015 . . . . . . . . . 10 (βˆ€π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) βŠ† (π‘₯(ballβ€˜π‘€)𝑑) β†’ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑))
3129, 30syl 17 . . . . . . . . 9 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ 𝑣 ∈ (𝒫 π‘Œ ∩ Fin)) β†’ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑))
3231adantrr 716 . . . . . . . 8 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)) β†’ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑))
3312, 32eqsstrrd 4021 . . . . . . 7 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)) β†’ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑))
3411, 33jca 513 . . . . . 6 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ)) β†’ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑)))
3534ex 414 . . . . 5 (((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) β†’ ((𝑣 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ) β†’ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑))))
3635reximdv2 3165 . . . 4 (((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑑 ∈ ℝ+) β†’ (βˆƒπ‘£ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ β†’ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑)))
3736ralimdva 3168 . . 3 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘)𝑑) = π‘Œ β†’ βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑)))
386, 37sylbid 239 . 2 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝑁 ∈ (TotBndβ€˜π‘Œ) β†’ βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑)))
39 simpr 486 . . . . . . 7 (((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) β†’ 𝑐 ∈ ℝ+)
4039rphalfcld 13025 . . . . . 6 (((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) β†’ (𝑐 / 2) ∈ ℝ+)
41 oveq2 7414 . . . . . . . . . 10 (𝑑 = (𝑐 / 2) β†’ (π‘₯(ballβ€˜π‘€)𝑑) = (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))
4241iuneq2d 5026 . . . . . . . . 9 (𝑑 = (𝑐 / 2) β†’ βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑) = βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))
4342sseq2d 4014 . . . . . . . 8 (𝑑 = (𝑐 / 2) β†’ (π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑) ↔ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2))))
4443rexbidv 3179 . . . . . . 7 (𝑑 = (𝑐 / 2) β†’ (βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑) ↔ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2))))
4544rspcv 3609 . . . . . 6 ((𝑐 / 2) ∈ ℝ+ β†’ (βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑) β†’ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2))))
4640, 45syl 17 . . . . 5 (((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) β†’ (βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑) β†’ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2))))
47 elfpw 9351 . . . . . . . . . . 11 (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ↔ (𝑣 βŠ† 𝑋 ∧ 𝑣 ∈ Fin))
4847simprbi 498 . . . . . . . . . 10 (𝑣 ∈ (𝒫 𝑋 ∩ Fin) β†’ 𝑣 ∈ Fin)
4948ad2antrl 727 . . . . . . . . 9 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) β†’ 𝑣 ∈ Fin)
50 ssrab2 4077 . . . . . . . . 9 {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} βŠ† 𝑣
51 ssfi 9170 . . . . . . . . 9 ((𝑣 ∈ Fin ∧ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} βŠ† 𝑣) β†’ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} ∈ Fin)
5249, 50, 51sylancl 587 . . . . . . . 8 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) β†’ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} ∈ Fin)
53 oveq1 7413 . . . . . . . . . . . . . . . 16 (π‘₯ = 𝑦 β†’ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)) = (𝑦(ballβ€˜π‘€)(𝑐 / 2)))
5453ineq1d 4211 . . . . . . . . . . . . . . 15 (π‘₯ = 𝑦 β†’ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ))
55 incom 4201 . . . . . . . . . . . . . . 15 ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = (π‘Œ ∩ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))
5654, 55eqtrdi 2789 . . . . . . . . . . . . . 14 (π‘₯ = 𝑦 β†’ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = (π‘Œ ∩ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
57 dfin5 3956 . . . . . . . . . . . . . 14 (π‘Œ ∩ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) = {𝑧 ∈ π‘Œ ∣ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))}
5856, 57eqtrdi 2789 . . . . . . . . . . . . 13 (π‘₯ = 𝑦 β†’ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = {𝑧 ∈ π‘Œ ∣ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))})
5958neeq1d 3001 . . . . . . . . . . . 12 (π‘₯ = 𝑦 β†’ (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… ↔ {𝑧 ∈ π‘Œ ∣ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))} β‰  βˆ…))
60 rabn0 4385 . . . . . . . . . . . 12 ({𝑧 ∈ π‘Œ ∣ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))} β‰  βˆ… ↔ βˆƒπ‘§ ∈ π‘Œ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))
6159, 60bitrdi 287 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… ↔ βˆƒπ‘§ ∈ π‘Œ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
6261elrab 3683 . . . . . . . . . 10 (𝑦 ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} ↔ (𝑦 ∈ 𝑣 ∧ βˆƒπ‘§ ∈ π‘Œ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
6362simprbi 498 . . . . . . . . 9 (𝑦 ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} β†’ βˆƒπ‘§ ∈ π‘Œ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))
6463rgen 3064 . . . . . . . 8 βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βˆƒπ‘§ ∈ π‘Œ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))
65 eleq1 2822 . . . . . . . . 9 (𝑧 = (π‘“β€˜π‘¦) β†’ (𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)) ↔ (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
6665ac6sfi 9284 . . . . . . . 8 (({π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} ∈ Fin ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βˆƒπ‘§ ∈ π‘Œ 𝑧 ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) β†’ βˆƒπ‘“(𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
6752, 64, 66sylancl 587 . . . . . . 7 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) β†’ βˆƒπ‘“(𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
68 fdm 6724 . . . . . . . . . . . . . 14 (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ β†’ dom 𝑓 = {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…})
6968ad2antrl 727 . . . . . . . . . . . . 13 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ dom 𝑓 = {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…})
7069, 50eqsstrdi 4036 . . . . . . . . . . . 12 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ dom 𝑓 βŠ† 𝑣)
71 simprl 770 . . . . . . . . . . . . 13 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ 𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ)
7269feq2d 6701 . . . . . . . . . . . . 13 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (𝑓:dom π‘“βŸΆπ‘Œ ↔ 𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ))
7371, 72mpbird 257 . . . . . . . . . . . 12 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ 𝑓:dom π‘“βŸΆπ‘Œ)
74 simprr 772 . . . . . . . . . . . . . 14 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))
75 ffn 6715 . . . . . . . . . . . . . . . . . 18 (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ β†’ 𝑓 Fn {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…})
76 elpreima 7057 . . . . . . . . . . . . . . . . . 18 (𝑓 Fn {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} β†’ (𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) ↔ (𝑦 ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} ∧ (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))))
7775, 76syl 17 . . . . . . . . . . . . . . . . 17 (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ β†’ (𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) ↔ (𝑦 ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} ∧ (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))))
7877baibd 541 . . . . . . . . . . . . . . . 16 ((𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ 𝑦 ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}) β†’ (𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) ↔ (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
7978ralbidva 3176 . . . . . . . . . . . . . . 15 (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ β†’ (βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) ↔ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
8079ad2antrl 727 . . . . . . . . . . . . . 14 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) ↔ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
8174, 80mpbird 257 . . . . . . . . . . . . 13 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
82 id 22 . . . . . . . . . . . . . . 15 (𝑦 = π‘₯ β†’ 𝑦 = π‘₯)
83 oveq1 7413 . . . . . . . . . . . . . . . 16 (𝑦 = π‘₯ β†’ (𝑦(ballβ€˜π‘€)(𝑐 / 2)) = (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))
8483imaeq2d 6058 . . . . . . . . . . . . . . 15 (𝑦 = π‘₯ β†’ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) = (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2))))
8582, 84eleq12d 2828 . . . . . . . . . . . . . 14 (𝑦 = π‘₯ β†’ (𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) ↔ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))
8685ralrab2 3694 . . . . . . . . . . . . 13 (βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) ↔ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))
8781, 86sylib 217 . . . . . . . . . . . 12 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))
8870, 73, 873jca 1129 . . . . . . . . . . 11 ((𝑣 ∈ Fin ∧ (𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2))))))
8988ex 414 . . . . . . . . . 10 (𝑣 ∈ Fin β†’ ((𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) β†’ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))))
9049, 89syl 17 . . . . . . . . 9 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) β†’ ((𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) β†’ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))))
91 simpr2 1196 . . . . . . . . . . . . 13 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ 𝑓:dom π‘“βŸΆπ‘Œ)
9291frnd 6723 . . . . . . . . . . . 12 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ ran 𝑓 βŠ† π‘Œ)
9391ffnd 6716 . . . . . . . . . . . . . 14 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ 𝑓 Fn dom 𝑓)
9449adantr 482 . . . . . . . . . . . . . . 15 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ 𝑣 ∈ Fin)
95 simpr1 1195 . . . . . . . . . . . . . . 15 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ dom 𝑓 βŠ† 𝑣)
96 ssfi 9170 . . . . . . . . . . . . . . 15 ((𝑣 ∈ Fin ∧ dom 𝑓 βŠ† 𝑣) β†’ dom 𝑓 ∈ Fin)
9794, 95, 96syl2anc 585 . . . . . . . . . . . . . 14 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ dom 𝑓 ∈ Fin)
98 fnfi 9178 . . . . . . . . . . . . . 14 ((𝑓 Fn dom 𝑓 ∧ dom 𝑓 ∈ Fin) β†’ 𝑓 ∈ Fin)
9993, 97, 98syl2anc 585 . . . . . . . . . . . . 13 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ 𝑓 ∈ Fin)
100 rnfi 9332 . . . . . . . . . . . . 13 (𝑓 ∈ Fin β†’ ran 𝑓 ∈ Fin)
10199, 100syl 17 . . . . . . . . . . . 12 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ ran 𝑓 ∈ Fin)
102 elfpw 9351 . . . . . . . . . . . 12 (ran 𝑓 ∈ (𝒫 π‘Œ ∩ Fin) ↔ (ran 𝑓 βŠ† π‘Œ ∧ ran 𝑓 ∈ Fin))
10392, 101, 102sylanbrc 584 . . . . . . . . . . 11 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ ran 𝑓 ∈ (𝒫 π‘Œ ∩ Fin))
104 oveq1 7413 . . . . . . . . . . . . 13 (π‘₯ = 𝑧 β†’ (π‘₯(ballβ€˜π‘)𝑐) = (𝑧(ballβ€˜π‘)𝑐))
105104cbviunv 5043 . . . . . . . . . . . 12 βˆͺ π‘₯ ∈ ran 𝑓(π‘₯(ballβ€˜π‘)𝑐) = βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐)
1063ad4antr 731 . . . . . . . . . . . . . . . . 17 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑧 ∈ ran 𝑓) β†’ 𝑁 ∈ (Metβ€˜π‘Œ))
107 metxmet 23832 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (Metβ€˜π‘Œ) β†’ 𝑁 ∈ (∞Metβ€˜π‘Œ))
108106, 107syl 17 . . . . . . . . . . . . . . . 16 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑧 ∈ ran 𝑓) β†’ 𝑁 ∈ (∞Metβ€˜π‘Œ))
10992sselda 3982 . . . . . . . . . . . . . . . 16 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑧 ∈ ran 𝑓) β†’ 𝑧 ∈ π‘Œ)
110 rpxr 12980 . . . . . . . . . . . . . . . . 17 (𝑐 ∈ ℝ+ β†’ 𝑐 ∈ ℝ*)
111110ad4antlr 732 . . . . . . . . . . . . . . . 16 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑧 ∈ ran 𝑓) β†’ 𝑐 ∈ ℝ*)
112 blssm 23916 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (∞Metβ€˜π‘Œ) ∧ 𝑧 ∈ π‘Œ ∧ 𝑐 ∈ ℝ*) β†’ (𝑧(ballβ€˜π‘)𝑐) βŠ† π‘Œ)
113108, 109, 111, 112syl3anc 1372 . . . . . . . . . . . . . . 15 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑧 ∈ ran 𝑓) β†’ (𝑧(ballβ€˜π‘)𝑐) βŠ† π‘Œ)
114113ralrimiva 3147 . . . . . . . . . . . . . 14 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ βˆ€π‘§ ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐) βŠ† π‘Œ)
115 iunss 5048 . . . . . . . . . . . . . 14 (βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐) βŠ† π‘Œ ↔ βˆ€π‘§ ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐) βŠ† π‘Œ)
116114, 115sylibr 233 . . . . . . . . . . . . 13 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐) βŠ† π‘Œ)
117 iunin1 5075 . . . . . . . . . . . . . . 15 βˆͺ 𝑦 ∈ 𝑣 ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = (βˆͺ 𝑦 ∈ 𝑣 (𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ)
118 simplrr 777 . . . . . . . . . . . . . . . . 17 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))
11953cbviunv 5043 . . . . . . . . . . . . . . . . 17 βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)) = βˆͺ 𝑦 ∈ 𝑣 (𝑦(ballβ€˜π‘€)(𝑐 / 2))
120118, 119sseqtrdi 4032 . . . . . . . . . . . . . . . 16 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ π‘Œ βŠ† βˆͺ 𝑦 ∈ 𝑣 (𝑦(ballβ€˜π‘€)(𝑐 / 2)))
121 sseqin2 4215 . . . . . . . . . . . . . . . 16 (π‘Œ βŠ† βˆͺ 𝑦 ∈ 𝑣 (𝑦(ballβ€˜π‘€)(𝑐 / 2)) ↔ (βˆͺ 𝑦 ∈ 𝑣 (𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = π‘Œ)
122120, 121sylib 217 . . . . . . . . . . . . . . 15 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ (βˆͺ 𝑦 ∈ 𝑣 (𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = π‘Œ)
123117, 122eqtrid 2785 . . . . . . . . . . . . . 14 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ βˆͺ 𝑦 ∈ 𝑣 ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = π‘Œ)
124 0ss 4396 . . . . . . . . . . . . . . . . . . 19 βˆ… βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐)
125 sseq1 4007 . . . . . . . . . . . . . . . . . . 19 (((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = βˆ… β†’ (((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐) ↔ βˆ… βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐)))
126124, 125mpbiri 258 . . . . . . . . . . . . . . . . . 18 (((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = βˆ… β†’ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
127126a1i 11 . . . . . . . . . . . . . . . . 17 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ 𝑣) β†’ (((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) = βˆ… β†’ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐)))
128 simpr3 1197 . . . . . . . . . . . . . . . . . . 19 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))
12954neeq1d 3001 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ = 𝑦 β†’ (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… ↔ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…))
130 id 22 . . . . . . . . . . . . . . . . . . . . . 22 (π‘₯ = 𝑦 β†’ π‘₯ = 𝑦)
13153imaeq2d 6058 . . . . . . . . . . . . . . . . . . . . . 22 (π‘₯ = 𝑦 β†’ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2))) = (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))
132130, 131eleq12d 2828 . . . . . . . . . . . . . . . . . . . . 21 (π‘₯ = 𝑦 β†’ (π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2))) ↔ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))))
133129, 132imbi12d 345 . . . . . . . . . . . . . . . . . . . 20 (π‘₯ = 𝑦 β†’ ((((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ↔ (((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))))))
134133rspccva 3612 . . . . . . . . . . . . . . . . . . 19 ((βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ 𝑦 ∈ 𝑣) β†’ (((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))))
135128, 134sylan 581 . . . . . . . . . . . . . . . . . 18 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ 𝑣) β†’ (((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))))
13613ad5antr 733 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ 𝑀 ∈ (∞Metβ€˜π‘‹))
137 cnvimass 6078 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) βŠ† dom 𝑓
13847simplbi 499 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑣 ∈ (𝒫 𝑋 ∩ Fin) β†’ 𝑣 βŠ† 𝑋)
139138ad2antrl 727 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) β†’ 𝑣 βŠ† 𝑋)
140139adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ 𝑣 βŠ† 𝑋)
14195, 140sstrd 3992 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ dom 𝑓 βŠ† 𝑋)
142137, 141sstrid 3993 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) βŠ† 𝑋)
143142sselda 3982 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ 𝑦 ∈ 𝑋)
144 simp-4r 783 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ 𝑐 ∈ ℝ+)
145144rpred 13013 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ 𝑐 ∈ ℝ)
146 elpreima 7057 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 Fn dom 𝑓 β†’ (𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) ↔ (𝑦 ∈ dom 𝑓 ∧ (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))))
147146simplbda 501 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑓 Fn dom 𝑓 ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))
14893, 147sylan 581 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))
149 blhalf 23903 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑀 ∈ (∞Metβ€˜π‘‹) ∧ 𝑦 ∈ 𝑋) ∧ (𝑐 ∈ ℝ ∧ (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (𝑦(ballβ€˜π‘€)(𝑐 / 2)) βŠ† ((π‘“β€˜π‘¦)(ballβ€˜π‘€)𝑐))
150136, 143, 145, 148, 149syl22anc 838 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (𝑦(ballβ€˜π‘€)(𝑐 / 2)) βŠ† ((π‘“β€˜π‘¦)(ballβ€˜π‘€)𝑐))
151150ssrind 4235 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† (((π‘“β€˜π‘¦)(ballβ€˜π‘€)𝑐) ∩ π‘Œ))
152137sseli 3978 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) β†’ 𝑦 ∈ dom 𝑓)
153 ffvelcdm 7081 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑓:dom π‘“βŸΆπ‘Œ ∧ 𝑦 ∈ dom 𝑓) β†’ (π‘“β€˜π‘¦) ∈ π‘Œ)
15491, 152, 153syl2an 597 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (π‘“β€˜π‘¦) ∈ π‘Œ)
155 simp-5r 785 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ π‘Œ βŠ† 𝑋)
156155, 20sylib 217 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (𝑋 ∩ π‘Œ) = π‘Œ)
157154, 156eleqtrrd 2837 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (π‘“β€˜π‘¦) ∈ (𝑋 ∩ π‘Œ))
158110ad4antlr 732 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ 𝑐 ∈ ℝ*)
1591blres 23929 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑀 ∈ (∞Metβ€˜π‘‹) ∧ (π‘“β€˜π‘¦) ∈ (𝑋 ∩ π‘Œ) ∧ 𝑐 ∈ ℝ*) β†’ ((π‘“β€˜π‘¦)(ballβ€˜π‘)𝑐) = (((π‘“β€˜π‘¦)(ballβ€˜π‘€)𝑐) ∩ π‘Œ))
160136, 157, 158, 159syl3anc 1372 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ ((π‘“β€˜π‘¦)(ballβ€˜π‘)𝑐) = (((π‘“β€˜π‘¦)(ballβ€˜π‘€)𝑐) ∩ π‘Œ))
161151, 160sseqtrrd 4023 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† ((π‘“β€˜π‘¦)(ballβ€˜π‘)𝑐))
162 fnfvelrn 7080 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑓 Fn dom 𝑓 ∧ 𝑦 ∈ dom 𝑓) β†’ (π‘“β€˜π‘¦) ∈ ran 𝑓)
16393, 152, 162syl2an 597 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (π‘“β€˜π‘¦) ∈ ran 𝑓)
164 oveq1 7413 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 = (π‘“β€˜π‘¦) β†’ (𝑧(ballβ€˜π‘)𝑐) = ((π‘“β€˜π‘¦)(ballβ€˜π‘)𝑐))
165164ssiun2s 5051 . . . . . . . . . . . . . . . . . . . . . 22 ((π‘“β€˜π‘¦) ∈ ran 𝑓 β†’ ((π‘“β€˜π‘¦)(ballβ€˜π‘)𝑐) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
166163, 165syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ ((π‘“β€˜π‘¦)(ballβ€˜π‘)𝑐) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
167161, 166sstrd 3992 . . . . . . . . . . . . . . . . . . . 20 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
168167adantlr 714 . . . . . . . . . . . . . . . . . . 19 (((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ 𝑣) ∧ 𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2)))) β†’ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
169168ex 414 . . . . . . . . . . . . . . . . . 18 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ 𝑣) β†’ (𝑦 ∈ (◑𝑓 β€œ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) β†’ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐)))
170135, 169syld 47 . . . . . . . . . . . . . . . . 17 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ 𝑣) β†’ (((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐)))
171127, 170pm2.61dne 3029 . . . . . . . . . . . . . . . 16 ((((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) ∧ 𝑦 ∈ 𝑣) β†’ ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
172171ralrimiva 3147 . . . . . . . . . . . . . . 15 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ βˆ€π‘¦ ∈ 𝑣 ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
173 iunss 5048 . . . . . . . . . . . . . . 15 (βˆͺ 𝑦 ∈ 𝑣 ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐) ↔ βˆ€π‘¦ ∈ 𝑣 ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
174172, 173sylibr 233 . . . . . . . . . . . . . 14 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ βˆͺ 𝑦 ∈ 𝑣 ((𝑦(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
175123, 174eqsstrrd 4021 . . . . . . . . . . . . 13 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ π‘Œ βŠ† βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐))
176116, 175eqssd 3999 . . . . . . . . . . . 12 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ βˆͺ 𝑧 ∈ ran 𝑓(𝑧(ballβ€˜π‘)𝑐) = π‘Œ)
177105, 176eqtrid 2785 . . . . . . . . . . 11 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ βˆͺ π‘₯ ∈ ran 𝑓(π‘₯(ballβ€˜π‘)𝑐) = π‘Œ)
178 iuneq1 5013 . . . . . . . . . . . . 13 (𝑀 = ran 𝑓 β†’ βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = βˆͺ π‘₯ ∈ ran 𝑓(π‘₯(ballβ€˜π‘)𝑐))
179178eqeq1d 2735 . . . . . . . . . . . 12 (𝑀 = ran 𝑓 β†’ (βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ ↔ βˆͺ π‘₯ ∈ ran 𝑓(π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
180179rspcev 3613 . . . . . . . . . . 11 ((ran 𝑓 ∈ (𝒫 π‘Œ ∩ Fin) ∧ βˆͺ π‘₯ ∈ ran 𝑓(π‘₯(ballβ€˜π‘)𝑐) = π‘Œ) β†’ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ)
181103, 177, 180syl2anc 585 . . . . . . . . . 10 (((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) ∧ (dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))))) β†’ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ)
182181ex 414 . . . . . . . . 9 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) β†’ ((dom 𝑓 βŠ† 𝑣 ∧ 𝑓:dom π‘“βŸΆπ‘Œ ∧ βˆ€π‘₯ ∈ 𝑣 (((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ… β†’ π‘₯ ∈ (◑𝑓 β€œ (π‘₯(ballβ€˜π‘€)(𝑐 / 2))))) β†’ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
18390, 182syld 47 . . . . . . . 8 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) β†’ ((𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) β†’ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
184183exlimdv 1937 . . . . . . 7 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) β†’ (βˆƒπ‘“(𝑓:{π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…}βŸΆπ‘Œ ∧ βˆ€π‘¦ ∈ {π‘₯ ∈ 𝑣 ∣ ((π‘₯(ballβ€˜π‘€)(𝑐 / 2)) ∩ π‘Œ) β‰  βˆ…} (π‘“β€˜π‘¦) ∈ (𝑦(ballβ€˜π‘€)(𝑐 / 2))) β†’ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
18567, 184mpd 15 . . . . . 6 ((((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) ∧ (𝑣 ∈ (𝒫 𝑋 ∩ Fin) ∧ π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)))) β†’ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ)
186185rexlimdvaa 3157 . . . . 5 (((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) β†’ (βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)(𝑐 / 2)) β†’ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
18746, 186syld 47 . . . 4 (((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) ∧ 𝑐 ∈ ℝ+) β†’ (βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑) β†’ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
188187ralrimdva 3155 . . 3 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑) β†’ βˆ€π‘ ∈ ℝ+ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
189 istotbnd3 36628 . . . . 5 (𝑁 ∈ (TotBndβ€˜π‘Œ) ↔ (𝑁 ∈ (Metβ€˜π‘Œ) ∧ βˆ€π‘ ∈ ℝ+ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
190189baib 537 . . . 4 (𝑁 ∈ (Metβ€˜π‘Œ) β†’ (𝑁 ∈ (TotBndβ€˜π‘Œ) ↔ βˆ€π‘ ∈ ℝ+ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
1913, 190syl 17 . . 3 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝑁 ∈ (TotBndβ€˜π‘Œ) ↔ βˆ€π‘ ∈ ℝ+ βˆƒπ‘€ ∈ (𝒫 π‘Œ ∩ Fin)βˆͺ π‘₯ ∈ 𝑀 (π‘₯(ballβ€˜π‘)𝑐) = π‘Œ))
192188, 191sylibrd 259 . 2 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑) β†’ 𝑁 ∈ (TotBndβ€˜π‘Œ)))
19338, 192impbid 211 1 ((𝑀 ∈ (Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝑁 ∈ (TotBndβ€˜π‘Œ) ↔ βˆ€π‘‘ ∈ ℝ+ βˆƒπ‘£ ∈ (𝒫 𝑋 ∩ Fin)π‘Œ βŠ† βˆͺ π‘₯ ∈ 𝑣 (π‘₯(ballβ€˜π‘€)𝑑)))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∧ w3a 1088   = wceq 1542  βˆƒwex 1782   ∈ wcel 2107   β‰  wne 2941  βˆ€wral 3062  βˆƒwrex 3071  {crab 3433   ∩ cin 3947   βŠ† wss 3948  βˆ…c0 4322  π’« cpw 4602  βˆͺ ciun 4997   Γ— cxp 5674  β—‘ccnv 5675  dom cdm 5676  ran crn 5677   β†Ύ cres 5678   β€œ cima 5679   Fn wfn 6536  βŸΆwf 6537  β€˜cfv 6541  (class class class)co 7406  Fincfn 8936  β„cr 11106  β„*cxr 11244   / cdiv 11868  2c2 12264  β„+crp 12971  βˆžMetcxmet 20922  Metcmet 20923  ballcbl 20924  TotBndctotbnd 36623
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-riota 7362  df-ov 7409  df-oprab 7410  df-mpo 7411  df-om 7853  df-1st 7972  df-2nd 7973  df-1o 8463  df-er 8700  df-map 8819  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-2 12272  df-rp 12972  df-xneg 13089  df-xadd 13090  df-xmul 13091  df-psmet 20929  df-xmet 20930  df-met 20931  df-bl 20932  df-totbnd 36625
This theorem is referenced by:  sstotbnd  36632  sstotbnd3  36633
  Copyright terms: Public domain W3C validator