Metamath Proof Explorer

Theorem xmscl

Description: Closure of the distance function of an extended metric space. (Contributed by Mario Carneiro, 2-Oct-2015)

Ref Expression
Hypotheses mscl.x ⊒ 𝑋 = ( Base β€˜ 𝑀 )
mscl.d ⊒ 𝐷 = ( dist β€˜ 𝑀 )
Assertion xmscl ( ( 𝑀 ∈ ∞MetSp ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) β†’ ( 𝐴 𝐷 𝐡 ) ∈ ℝ* )

Proof

Step Hyp Ref Expression
1 mscl.x ⊒ 𝑋 = ( Base β€˜ 𝑀 )
2 mscl.d ⊒ 𝐷 = ( dist β€˜ 𝑀 )
3 ovres ⊒ ( ( 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) β†’ ( 𝐴 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) = ( 𝐴 𝐷 𝐡 ) )
4 3 3adant1 ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) β†’ ( 𝐴 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) = ( 𝐴 𝐷 𝐡 ) )
5 1 2 xmsxmet2 ⊒ ( 𝑀 ∈ ∞MetSp β†’ ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) ∈ ( ∞Met β€˜ 𝑋 ) )
6 xmetcl ⊒ ( ( ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) ∈ ( ∞Met β€˜ 𝑋 ) ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) β†’ ( 𝐴 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) ∈ ℝ* )
7 5 6 syl3an1 ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) β†’ ( 𝐴 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) ∈ ℝ* )
8 4 7 eqeltrrd ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) β†’ ( 𝐴 𝐷 𝐡 ) ∈ ℝ* )