Step | Hyp | Ref
| Expression |
1 | | mrieqvlemd.1 |
. . . . 5
β’ (π β π΄ β (Mooreβπ)) |
2 | 1 | adantr 480 |
. . . 4
β’ ((π β§ π β (πβ(π β {π}))) β π΄ β (Mooreβπ)) |
3 | | mrieqvlemd.2 |
. . . 4
β’ π = (mrClsβπ΄) |
4 | | undif1 4475 |
. . . . . 6
β’ ((π β {π}) βͺ {π}) = (π βͺ {π}) |
5 | | mrieqvlemd.3 |
. . . . . . . . . 10
β’ (π β π β π) |
6 | 5 | adantr 480 |
. . . . . . . . 9
β’ ((π β§ π β (πβ(π β {π}))) β π β π) |
7 | 6 | ssdifssd 4142 |
. . . . . . . 8
β’ ((π β§ π β (πβ(π β {π}))) β (π β {π}) β π) |
8 | 2, 3, 7 | mrcssidd 17574 |
. . . . . . 7
β’ ((π β§ π β (πβ(π β {π}))) β (π β {π}) β (πβ(π β {π}))) |
9 | | simpr 484 |
. . . . . . . 8
β’ ((π β§ π β (πβ(π β {π}))) β π β (πβ(π β {π}))) |
10 | 9 | snssd 4812 |
. . . . . . 7
β’ ((π β§ π β (πβ(π β {π}))) β {π} β (πβ(π β {π}))) |
11 | 8, 10 | unssd 4186 |
. . . . . 6
β’ ((π β§ π β (πβ(π β {π}))) β ((π β {π}) βͺ {π}) β (πβ(π β {π}))) |
12 | 4, 11 | eqsstrrid 4031 |
. . . . 5
β’ ((π β§ π β (πβ(π β {π}))) β (π βͺ {π}) β (πβ(π β {π}))) |
13 | 12 | unssad 4187 |
. . . 4
β’ ((π β§ π β (πβ(π β {π}))) β π β (πβ(π β {π}))) |
14 | | difssd 4132 |
. . . 4
β’ ((π β§ π β (πβ(π β {π}))) β (π β {π}) β π) |
15 | 2, 3, 13, 14 | mressmrcd 17576 |
. . 3
β’ ((π β§ π β (πβ(π β {π}))) β (πβπ) = (πβ(π β {π}))) |
16 | 15 | eqcomd 2737 |
. 2
β’ ((π β§ π β (πβ(π β {π}))) β (πβ(π β {π})) = (πβπ)) |
17 | 1, 3, 5 | mrcssidd 17574 |
. . . . 5
β’ (π β π β (πβπ)) |
18 | | mrieqvlemd.4 |
. . . . 5
β’ (π β π β π) |
19 | 17, 18 | sseldd 3983 |
. . . 4
β’ (π β π β (πβπ)) |
20 | 19 | adantr 480 |
. . 3
β’ ((π β§ (πβ(π β {π})) = (πβπ)) β π β (πβπ)) |
21 | | simpr 484 |
. . 3
β’ ((π β§ (πβ(π β {π})) = (πβπ)) β (πβ(π β {π})) = (πβπ)) |
22 | 20, 21 | eleqtrrd 2835 |
. 2
β’ ((π β§ (πβ(π β {π})) = (πβπ)) β π β (πβ(π β {π}))) |
23 | 16, 22 | impbida 798 |
1
β’ (π β (π β (πβ(π β {π})) β (πβ(π β {π})) = (πβπ))) |