Proof of Theorem psmetsym
Step | Hyp | Ref
| Expression |
1 | | simp1 987 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → 𝐷 ∈ (PsMet‘𝑋)) |
2 | | simp3 989 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → 𝐵 ∈ 𝑋) |
3 | | simp2 988 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → 𝐴 ∈ 𝑋) |
4 | | psmettri2 12968 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ (𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋)) → (𝐴𝐷𝐵) ≤ ((𝐵𝐷𝐴) +𝑒 (𝐵𝐷𝐵))) |
5 | 1, 2, 3, 2, 4 | syl13anc 1230 |
. . 3
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐴𝐷𝐵) ≤ ((𝐵𝐷𝐴) +𝑒 (𝐵𝐷𝐵))) |
6 | | psmet0 12967 |
. . . . . 6
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐵 ∈ 𝑋) → (𝐵𝐷𝐵) = 0) |
7 | 6 | 3adant2 1006 |
. . . . 5
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐵𝐷𝐵) = 0) |
8 | 7 | oveq2d 5858 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → ((𝐵𝐷𝐴) +𝑒 (𝐵𝐷𝐵)) = ((𝐵𝐷𝐴) +𝑒 0)) |
9 | | psmetcl 12966 |
. . . . . 6
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋) → (𝐵𝐷𝐴) ∈
ℝ*) |
10 | | xaddid1 9798 |
. . . . . 6
⊢ ((𝐵𝐷𝐴) ∈ ℝ* → ((𝐵𝐷𝐴) +𝑒 0) = (𝐵𝐷𝐴)) |
11 | 9, 10 | syl 14 |
. . . . 5
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋) → ((𝐵𝐷𝐴) +𝑒 0) = (𝐵𝐷𝐴)) |
12 | 11 | 3com23 1199 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → ((𝐵𝐷𝐴) +𝑒 0) = (𝐵𝐷𝐴)) |
13 | 8, 12 | eqtrd 2198 |
. . 3
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → ((𝐵𝐷𝐴) +𝑒 (𝐵𝐷𝐵)) = (𝐵𝐷𝐴)) |
14 | 5, 13 | breqtrd 4008 |
. 2
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐴𝐷𝐵) ≤ (𝐵𝐷𝐴)) |
15 | | psmettri2 12968 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋)) → (𝐵𝐷𝐴) ≤ ((𝐴𝐷𝐵) +𝑒 (𝐴𝐷𝐴))) |
16 | 1, 3, 2, 3, 15 | syl13anc 1230 |
. . 3
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐵𝐷𝐴) ≤ ((𝐴𝐷𝐵) +𝑒 (𝐴𝐷𝐴))) |
17 | | psmet0 12967 |
. . . . . 6
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋) → (𝐴𝐷𝐴) = 0) |
18 | 17 | 3adant3 1007 |
. . . . 5
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐴𝐷𝐴) = 0) |
19 | 18 | oveq2d 5858 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → ((𝐴𝐷𝐵) +𝑒 (𝐴𝐷𝐴)) = ((𝐴𝐷𝐵) +𝑒 0)) |
20 | | psmetcl 12966 |
. . . . 5
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐴𝐷𝐵) ∈
ℝ*) |
21 | | xaddid1 9798 |
. . . . 5
⊢ ((𝐴𝐷𝐵) ∈ ℝ* → ((𝐴𝐷𝐵) +𝑒 0) = (𝐴𝐷𝐵)) |
22 | 20, 21 | syl 14 |
. . . 4
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → ((𝐴𝐷𝐵) +𝑒 0) = (𝐴𝐷𝐵)) |
23 | 19, 22 | eqtrd 2198 |
. . 3
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → ((𝐴𝐷𝐵) +𝑒 (𝐴𝐷𝐴)) = (𝐴𝐷𝐵)) |
24 | 16, 23 | breqtrd 4008 |
. 2
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐵𝐷𝐴) ≤ (𝐴𝐷𝐵)) |
25 | 9 | 3com23 1199 |
. . 3
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐵𝐷𝐴) ∈
ℝ*) |
26 | | xrletri3 9740 |
. . 3
⊢ (((𝐴𝐷𝐵) ∈ ℝ* ∧ (𝐵𝐷𝐴) ∈ ℝ*) → ((𝐴𝐷𝐵) = (𝐵𝐷𝐴) ↔ ((𝐴𝐷𝐵) ≤ (𝐵𝐷𝐴) ∧ (𝐵𝐷𝐴) ≤ (𝐴𝐷𝐵)))) |
27 | 20, 25, 26 | syl2anc 409 |
. 2
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → ((𝐴𝐷𝐵) = (𝐵𝐷𝐴) ↔ ((𝐴𝐷𝐵) ≤ (𝐵𝐷𝐴) ∧ (𝐵𝐷𝐴) ≤ (𝐴𝐷𝐵)))) |
28 | 14, 24, 27 | mpbir2and 934 |
1
⊢ ((𝐷 ∈ (PsMet‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐴𝐷𝐵) = (𝐵𝐷𝐴)) |