Proof of Theorem pmtrprfv
Step | Hyp | Ref
| Expression |
1 | | simpl 486 |
. . 3
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → 𝐷 ∈ 𝑉) |
2 | | simpr1 1195 |
. . . 4
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → 𝑋 ∈ 𝐷) |
3 | | simpr2 1196 |
. . . 4
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → 𝑌 ∈ 𝐷) |
4 | 2, 3 | prssd 4720 |
. . 3
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → {𝑋, 𝑌} ⊆ 𝐷) |
5 | | pr2nelem 9517 |
. . . 4
⊢ ((𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌) → {𝑋, 𝑌} ≈ 2o) |
6 | 5 | adantl 485 |
. . 3
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → {𝑋, 𝑌} ≈ 2o) |
7 | | pmtrfval.t |
. . . 4
⊢ 𝑇 = (pmTrsp‘𝐷) |
8 | 7 | pmtrfv 18711 |
. . 3
⊢ (((𝐷 ∈ 𝑉 ∧ {𝑋, 𝑌} ⊆ 𝐷 ∧ {𝑋, 𝑌} ≈ 2o) ∧ 𝑋 ∈ 𝐷) → ((𝑇‘{𝑋, 𝑌})‘𝑋) = if(𝑋 ∈ {𝑋, 𝑌}, ∪ ({𝑋, 𝑌} ∖ {𝑋}), 𝑋)) |
9 | 1, 4, 6, 2, 8 | syl31anc 1374 |
. 2
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → ((𝑇‘{𝑋, 𝑌})‘𝑋) = if(𝑋 ∈ {𝑋, 𝑌}, ∪ ({𝑋, 𝑌} ∖ {𝑋}), 𝑋)) |
10 | | prid1g 4661 |
. . . . 5
⊢ (𝑋 ∈ 𝐷 → 𝑋 ∈ {𝑋, 𝑌}) |
11 | 2, 10 | syl 17 |
. . . 4
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → 𝑋 ∈ {𝑋, 𝑌}) |
12 | 11 | iftrued 4432 |
. . 3
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → if(𝑋 ∈ {𝑋, 𝑌}, ∪ ({𝑋, 𝑌} ∖ {𝑋}), 𝑋) = ∪ ({𝑋, 𝑌} ∖ {𝑋})) |
13 | | difprsnss 4697 |
. . . . . . 7
⊢ ({𝑋, 𝑌} ∖ {𝑋}) ⊆ {𝑌} |
14 | 13 | a1i 11 |
. . . . . 6
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → ({𝑋, 𝑌} ∖ {𝑋}) ⊆ {𝑌}) |
15 | | prid2g 4662 |
. . . . . . . . 9
⊢ (𝑌 ∈ 𝐷 → 𝑌 ∈ {𝑋, 𝑌}) |
16 | 3, 15 | syl 17 |
. . . . . . . 8
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → 𝑌 ∈ {𝑋, 𝑌}) |
17 | | simpr3 1197 |
. . . . . . . . 9
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → 𝑋 ≠ 𝑌) |
18 | 17 | necomd 2990 |
. . . . . . . 8
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → 𝑌 ≠ 𝑋) |
19 | | eldifsn 4685 |
. . . . . . . 8
⊢ (𝑌 ∈ ({𝑋, 𝑌} ∖ {𝑋}) ↔ (𝑌 ∈ {𝑋, 𝑌} ∧ 𝑌 ≠ 𝑋)) |
20 | 16, 18, 19 | sylanbrc 586 |
. . . . . . 7
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → 𝑌 ∈ ({𝑋, 𝑌} ∖ {𝑋})) |
21 | 20 | snssd 4707 |
. . . . . 6
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → {𝑌} ⊆ ({𝑋, 𝑌} ∖ {𝑋})) |
22 | 14, 21 | eqssd 3904 |
. . . . 5
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → ({𝑋, 𝑌} ∖ {𝑋}) = {𝑌}) |
23 | 22 | unieqd 4820 |
. . . 4
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → ∪
({𝑋, 𝑌} ∖ {𝑋}) = ∪ {𝑌}) |
24 | | unisng 4827 |
. . . . 5
⊢ (𝑌 ∈ 𝐷 → ∪ {𝑌} = 𝑌) |
25 | 3, 24 | syl 17 |
. . . 4
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → ∪
{𝑌} = 𝑌) |
26 | 23, 25 | eqtrd 2774 |
. . 3
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → ∪
({𝑋, 𝑌} ∖ {𝑋}) = 𝑌) |
27 | 12, 26 | eqtrd 2774 |
. 2
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → if(𝑋 ∈ {𝑋, 𝑌}, ∪ ({𝑋, 𝑌} ∖ {𝑋}), 𝑋) = 𝑌) |
28 | 9, 27 | eqtrd 2774 |
1
⊢ ((𝐷 ∈ 𝑉 ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷 ∧ 𝑋 ≠ 𝑌)) → ((𝑇‘{𝑋, 𝑌})‘𝑋) = 𝑌) |