Metamath Proof Explorer


Theorem isbnd2

Description: The predicate "is a bounded metric space". Uses a single point instead of an arbitrary point in the space. (Contributed by Jeff Madsen, 2-Sep-2009)

Ref Expression
Assertion isbnd2 ( ( 𝑀 ∈ ( Bnd β€˜ 𝑋 ) ∧ 𝑋 β‰  βˆ… ) ↔ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )

Proof

Step Hyp Ref Expression
1 isbndx ⊒ ( 𝑀 ∈ ( Bnd β€˜ 𝑋 ) ↔ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )
2 1 anbi1i ⊒ ( ( 𝑀 ∈ ( Bnd β€˜ 𝑋 ) ∧ 𝑋 β‰  βˆ… ) ↔ ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) ∧ 𝑋 β‰  βˆ… ) )
3 anass ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) ∧ 𝑋 β‰  βˆ… ) ↔ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ∧ 𝑋 β‰  βˆ… ) ) )
4 r19.2z ⊒ ( ( 𝑋 β‰  βˆ… ∧ βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) β†’ βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) )
5 4 ancoms ⊒ ( ( βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ∧ 𝑋 β‰  βˆ… ) β†’ βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) )
6 oveq1 ⊒ ( π‘₯ = 𝑦 β†’ ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) = ( 𝑦 ( ball β€˜ 𝑀 ) π‘Ÿ ) )
7 6 eqeq2d ⊒ ( π‘₯ = 𝑦 β†’ ( 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ↔ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )
8 oveq2 ⊒ ( π‘Ÿ = 𝑠 β†’ ( 𝑦 ( ball β€˜ 𝑀 ) π‘Ÿ ) = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) )
9 8 eqeq2d ⊒ ( π‘Ÿ = 𝑠 β†’ ( 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) π‘Ÿ ) ↔ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) ) )
10 7 9 cbvrex2vw ⊒ ( βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ↔ βˆƒ 𝑦 ∈ 𝑋 βˆƒ 𝑠 ∈ ℝ+ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) )
11 2rp ⊒ 2 ∈ ℝ+
12 rpmulcl ⊒ ( ( 2 ∈ ℝ+ ∧ 𝑠 ∈ ℝ+ ) β†’ ( 2 Β· 𝑠 ) ∈ ℝ+ )
13 11 12 mpan ⊒ ( 𝑠 ∈ ℝ+ β†’ ( 2 Β· 𝑠 ) ∈ ℝ+ )
14 13 ad2antll ⊒ ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) β†’ ( 2 Β· 𝑠 ) ∈ ℝ+ )
15 14 ad2antrr ⊒ ( ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) ) β†’ ( 2 Β· 𝑠 ) ∈ ℝ+ )
16 rpcn ⊒ ( 𝑠 ∈ ℝ+ β†’ 𝑠 ∈ β„‚ )
17 2cnd ⊒ ( 𝑠 ∈ ℝ+ β†’ 2 ∈ β„‚ )
18 2ne0 ⊒ 2 β‰  0
19 18 a1i ⊒ ( 𝑠 ∈ ℝ+ β†’ 2 β‰  0 )
20 divcan3 ⊒ ( ( 𝑠 ∈ β„‚ ∧ 2 ∈ β„‚ ∧ 2 β‰  0 ) β†’ ( ( 2 Β· 𝑠 ) / 2 ) = 𝑠 )
21 20 eqcomd ⊒ ( ( 𝑠 ∈ β„‚ ∧ 2 ∈ β„‚ ∧ 2 β‰  0 ) β†’ 𝑠 = ( ( 2 Β· 𝑠 ) / 2 ) )
22 16 17 19 21 syl3anc ⊒ ( 𝑠 ∈ ℝ+ β†’ 𝑠 = ( ( 2 Β· 𝑠 ) / 2 ) )
23 22 oveq2d ⊒ ( 𝑠 ∈ ℝ+ β†’ ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) )
24 23 eqeq2d ⊒ ( 𝑠 ∈ ℝ+ β†’ ( 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) ↔ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) )
25 24 biimpd ⊒ ( 𝑠 ∈ ℝ+ β†’ ( 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) β†’ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) )
26 25 ad2antll ⊒ ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) β†’ ( 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) β†’ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) )
27 26 adantr ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) β†’ ( 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) β†’ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) )
28 27 imp ⊒ ( ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) ) β†’ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) )
29 simpr ⊒ ( ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) β†’ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) )
30 eleq2 ⊒ ( 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) β†’ ( π‘₯ ∈ 𝑋 ↔ π‘₯ ∈ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) )
31 30 biimpac ⊒ ( ( π‘₯ ∈ 𝑋 ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) β†’ π‘₯ ∈ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) )
32 2re ⊒ 2 ∈ ℝ
33 rpre ⊒ ( 𝑠 ∈ ℝ+ β†’ 𝑠 ∈ ℝ )
34 remulcl ⊒ ( ( 2 ∈ ℝ ∧ 𝑠 ∈ ℝ ) β†’ ( 2 Β· 𝑠 ) ∈ ℝ )
35 32 33 34 sylancr ⊒ ( 𝑠 ∈ ℝ+ β†’ ( 2 Β· 𝑠 ) ∈ ℝ )
36 blhalf ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ 𝑦 ∈ 𝑋 ) ∧ ( ( 2 Β· 𝑠 ) ∈ ℝ ∧ π‘₯ ∈ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) ) β†’ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) βŠ† ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) )
37 36 expr ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ 𝑦 ∈ 𝑋 ) ∧ ( 2 Β· 𝑠 ) ∈ ℝ ) β†’ ( π‘₯ ∈ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) β†’ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) βŠ† ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) ) )
38 35 37 sylan2 ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ 𝑦 ∈ 𝑋 ) ∧ 𝑠 ∈ ℝ+ ) β†’ ( π‘₯ ∈ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) β†’ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) βŠ† ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) ) )
39 38 anasss ⊒ ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) β†’ ( π‘₯ ∈ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) β†’ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) βŠ† ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) ) )
40 39 imp ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) β†’ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) βŠ† ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) )
41 31 40 sylan2 ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ ( π‘₯ ∈ 𝑋 ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) ) β†’ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) βŠ† ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) )
42 41 anassrs ⊒ ( ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) β†’ ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) βŠ† ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) )
43 29 42 eqsstrd ⊒ ( ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) ( ( 2 Β· 𝑠 ) / 2 ) ) ) β†’ 𝑋 βŠ† ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) )
44 28 43 syldan ⊒ ( ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) ) β†’ 𝑋 βŠ† ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) )
45 13 adantl ⊒ ( ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) β†’ ( 2 Β· 𝑠 ) ∈ ℝ+ )
46 rpxr ⊒ ( ( 2 Β· 𝑠 ) ∈ ℝ+ β†’ ( 2 Β· 𝑠 ) ∈ ℝ* )
47 blssm ⊒ ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ π‘₯ ∈ 𝑋 ∧ ( 2 Β· 𝑠 ) ∈ ℝ* ) β†’ ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) βŠ† 𝑋 )
48 46 47 syl3an3 ⊒ ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ π‘₯ ∈ 𝑋 ∧ ( 2 Β· 𝑠 ) ∈ ℝ+ ) β†’ ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) βŠ† 𝑋 )
49 48 3expa ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ π‘₯ ∈ 𝑋 ) ∧ ( 2 Β· 𝑠 ) ∈ ℝ+ ) β†’ ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) βŠ† 𝑋 )
50 45 49 sylan2 ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ π‘₯ ∈ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) β†’ ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) βŠ† 𝑋 )
51 50 an32s ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) β†’ ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) βŠ† 𝑋 )
52 51 adantr ⊒ ( ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) ) β†’ ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) βŠ† 𝑋 )
53 44 52 eqssd ⊒ ( ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) ) β†’ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) )
54 oveq2 ⊒ ( π‘Ÿ = ( 2 Β· 𝑠 ) β†’ ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) = ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) )
55 54 rspceeqv ⊒ ( ( ( 2 Β· 𝑠 ) ∈ ℝ+ ∧ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) ( 2 Β· 𝑠 ) ) ) β†’ βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) )
56 15 53 55 syl2anc ⊒ ( ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) ∧ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) ) β†’ βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) )
57 56 ex ⊒ ( ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) ∧ π‘₯ ∈ 𝑋 ) β†’ ( 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) β†’ βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )
58 57 ralrimdva ⊒ ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝑦 ∈ 𝑋 ∧ 𝑠 ∈ ℝ+ ) ) β†’ ( 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) β†’ βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )
59 58 rexlimdvva ⊒ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) β†’ ( βˆƒ 𝑦 ∈ 𝑋 βˆƒ 𝑠 ∈ ℝ+ 𝑋 = ( 𝑦 ( ball β€˜ 𝑀 ) 𝑠 ) β†’ βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )
60 10 59 biimtrid ⊒ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) β†’ ( βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) β†’ βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )
61 rexn0 ⊒ ( βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) β†’ 𝑋 β‰  βˆ… )
62 61 a1i ⊒ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) β†’ ( βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) β†’ 𝑋 β‰  βˆ… ) )
63 60 62 jcad ⊒ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) β†’ ( βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) β†’ ( βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ∧ 𝑋 β‰  βˆ… ) ) )
64 5 63 impbid2 ⊒ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) β†’ ( ( βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ∧ 𝑋 β‰  βˆ… ) ↔ βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )
65 64 pm5.32i ⊒ ( ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( βˆ€ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ∧ 𝑋 β‰  βˆ… ) ) ↔ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )
66 2 3 65 3bitri ⊒ ( ( 𝑀 ∈ ( Bnd β€˜ 𝑋 ) ∧ 𝑋 β‰  βˆ… ) ↔ ( 𝑀 ∈ ( ∞Met β€˜ 𝑋 ) ∧ βˆƒ π‘₯ ∈ 𝑋 βˆƒ π‘Ÿ ∈ ℝ+ 𝑋 = ( π‘₯ ( ball β€˜ 𝑀 ) π‘Ÿ ) ) )