Step | Hyp | Ref
| Expression |
1 | | isprs.b |
. . . 4
β’ π΅ = (BaseβπΎ) |
2 | | isprs.l |
. . . 4
β’ β€ =
(leβπΎ) |
3 | 1, 2 | isprs 18330 |
. . 3
β’ (πΎ β Proset β (πΎ β V β§ βπ₯ β π΅ βπ¦ β π΅ βπ§ β π΅ (π₯ β€ π₯ β§ ((π₯ β€ π¦ β§ π¦ β€ π§) β π₯ β€ π§)))) |
4 | 3 | simprbi 495 |
. 2
β’ (πΎ β Proset β
βπ₯ β π΅ βπ¦ β π΅ βπ§ β π΅ (π₯ β€ π₯ β§ ((π₯ β€ π¦ β§ π¦ β€ π§) β π₯ β€ π§))) |
5 | | breq12 5158 |
. . . . 5
β’ ((π₯ = π β§ π₯ = π) β (π₯ β€ π₯ β π β€ π)) |
6 | 5 | anidms 565 |
. . . 4
β’ (π₯ = π β (π₯ β€ π₯ β π β€ π)) |
7 | | breq1 5156 |
. . . . . 6
β’ (π₯ = π β (π₯ β€ π¦ β π β€ π¦)) |
8 | 7 | anbi1d 629 |
. . . . 5
β’ (π₯ = π β ((π₯ β€ π¦ β§ π¦ β€ π§) β (π β€ π¦ β§ π¦ β€ π§))) |
9 | | breq1 5156 |
. . . . 5
β’ (π₯ = π β (π₯ β€ π§ β π β€ π§)) |
10 | 8, 9 | imbi12d 343 |
. . . 4
β’ (π₯ = π β (((π₯ β€ π¦ β§ π¦ β€ π§) β π₯ β€ π§) β ((π β€ π¦ β§ π¦ β€ π§) β π β€ π§))) |
11 | 6, 10 | anbi12d 630 |
. . 3
β’ (π₯ = π β ((π₯ β€ π₯ β§ ((π₯ β€ π¦ β§ π¦ β€ π§) β π₯ β€ π§)) β (π β€ π β§ ((π β€ π¦ β§ π¦ β€ π§) β π β€ π§)))) |
12 | | breq2 5157 |
. . . . . 6
β’ (π¦ = π β (π β€ π¦ β π β€ π)) |
13 | | breq1 5156 |
. . . . . 6
β’ (π¦ = π β (π¦ β€ π§ β π β€ π§)) |
14 | 12, 13 | anbi12d 630 |
. . . . 5
β’ (π¦ = π β ((π β€ π¦ β§ π¦ β€ π§) β (π β€ π β§ π β€ π§))) |
15 | 14 | imbi1d 340 |
. . . 4
β’ (π¦ = π β (((π β€ π¦ β§ π¦ β€ π§) β π β€ π§) β ((π β€ π β§ π β€ π§) β π β€ π§))) |
16 | 15 | anbi2d 628 |
. . 3
β’ (π¦ = π β ((π β€ π β§ ((π β€ π¦ β§ π¦ β€ π§) β π β€ π§)) β (π β€ π β§ ((π β€ π β§ π β€ π§) β π β€ π§)))) |
17 | | breq2 5157 |
. . . . . 6
β’ (π§ = π β (π β€ π§ β π β€ π)) |
18 | 17 | anbi2d 628 |
. . . . 5
β’ (π§ = π β ((π β€ π β§ π β€ π§) β (π β€ π β§ π β€ π))) |
19 | | breq2 5157 |
. . . . 5
β’ (π§ = π β (π β€ π§ β π β€ π)) |
20 | 18, 19 | imbi12d 343 |
. . . 4
β’ (π§ = π β (((π β€ π β§ π β€ π§) β π β€ π§) β ((π β€ π β§ π β€ π) β π β€ π))) |
21 | 20 | anbi2d 628 |
. . 3
β’ (π§ = π β ((π β€ π β§ ((π β€ π β§ π β€ π§) β π β€ π§)) β (π β€ π β§ ((π β€ π β§ π β€ π) β π β€ π)))) |
22 | 11, 16, 21 | rspc3v 3633 |
. 2
β’ ((π β π΅ β§ π β π΅ β§ π β π΅) β (βπ₯ β π΅ βπ¦ β π΅ βπ§ β π΅ (π₯ β€ π₯ β§ ((π₯ β€ π¦ β§ π¦ β€ π§) β π₯ β€ π§)) β (π β€ π β§ ((π β€ π β§ π β€ π) β π β€ π)))) |
23 | 4, 22 | mpan9 505 |
1
β’ ((πΎ β Proset β§ (π β π΅ β§ π β π΅ β§ π β π΅)) β (π β€ π β§ ((π β€ π β§ π β€ π) β π β€ π))) |