Metamath Proof Explorer

Theorem xmstri2

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

Ref Expression
Hypotheses mscl.x ⊒ 𝑋 = ( Base β€˜ 𝑀 )
mscl.d ⊒ 𝐷 = ( dist β€˜ 𝑀 )
Assertion xmstri2 ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ ( 𝐴 𝐷 𝐡 ) ≀ ( ( 𝐢 𝐷 𝐴 ) +𝑒 ( 𝐢 𝐷 𝐡 ) ) )

Proof

Step Hyp Ref Expression
1 mscl.x ⊒ 𝑋 = ( Base β€˜ 𝑀 )
2 mscl.d ⊒ 𝐷 = ( dist β€˜ 𝑀 )
3 1 2 xmsxmet2 ⊒ ( 𝑀 ∈ ∞MetSp β†’ ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) ∈ ( ∞Met β€˜ 𝑋 ) )
4 xmettri2 ⊒ ( ( ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) ∈ ( ∞Met β€˜ 𝑋 ) ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ ( 𝐴 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) ≀ ( ( 𝐢 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐴 ) +𝑒 ( 𝐢 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) ) )
5 3 4 sylan ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ ( 𝐴 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) ≀ ( ( 𝐢 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐴 ) +𝑒 ( 𝐢 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) ) )
6 simpr2 ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ 𝐴 ∈ 𝑋 )
7 simpr3 ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ 𝐡 ∈ 𝑋 )
8 6 7 ovresd ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ ( 𝐴 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) = ( 𝐴 𝐷 𝐡 ) )
9 simpr1 ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ 𝐢 ∈ 𝑋 )
10 9 6 ovresd ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ ( 𝐢 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐴 ) = ( 𝐢 𝐷 𝐴 ) )
11 9 7 ovresd ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ ( 𝐢 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) = ( 𝐢 𝐷 𝐡 ) )
12 10 11 oveq12d ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ ( ( 𝐢 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐴 ) +𝑒 ( 𝐢 ( 𝐷 β†Ύ ( 𝑋 Γ— 𝑋 ) ) 𝐡 ) ) = ( ( 𝐢 𝐷 𝐴 ) +𝑒 ( 𝐢 𝐷 𝐡 ) ) )
13 5 8 12 3brtr3d ⊒ ( ( 𝑀 ∈ ∞MetSp ∧ ( 𝐢 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐡 ∈ 𝑋 ) ) β†’ ( 𝐴 𝐷 𝐡 ) ≀ ( ( 𝐢 𝐷 𝐴 ) +𝑒 ( 𝐢 𝐷 𝐡 ) ) )