Step | Hyp | Ref
| Expression |
1 | | eldifi 4125 |
. . . 4
β’ (π β ((πΉβπ΄) β (πΉβsuc π΄)) β π β (πΉβπ΄)) |
2 | | simpll 765 |
. . . . . 6
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β π΄ β Ο) |
3 | | peano2 7877 |
. . . . . . 7
β’ (π΅ β Ο β suc π΅ β
Ο) |
4 | 3 | ad2antlr 725 |
. . . . . 6
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β suc π΅ β Ο) |
5 | | nnord 7859 |
. . . . . . . 8
β’ (π΄ β Ο β Ord π΄) |
6 | 5 | ad2antrr 724 |
. . . . . . 7
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β Ord π΄) |
7 | | simprl 769 |
. . . . . . 7
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β π΅ β π΄) |
8 | | ordsucss 7802 |
. . . . . . 7
β’ (Ord
π΄ β (π΅ β π΄ β suc π΅ β π΄)) |
9 | 6, 7, 8 | sylc 65 |
. . . . . 6
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β suc π΅ β π΄) |
10 | | simprr 771 |
. . . . . 6
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β π) |
11 | | isf32lem.a |
. . . . . . 7
β’ (π β πΉ:ΟβΆπ« πΊ) |
12 | | isf32lem.b |
. . . . . . 7
β’ (π β βπ₯ β Ο (πΉβsuc π₯) β (πΉβπ₯)) |
13 | | isf32lem.c |
. . . . . . 7
β’ (π β Β¬ β© ran πΉ β ran πΉ) |
14 | 11, 12, 13 | isf32lem1 10344 |
. . . . . 6
β’ (((π΄ β Ο β§ suc π΅ β Ο) β§ (suc
π΅ β π΄ β§ π)) β (πΉβπ΄) β (πΉβsuc π΅)) |
15 | 2, 4, 9, 10, 14 | syl22anc 837 |
. . . . 5
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β (πΉβπ΄) β (πΉβsuc π΅)) |
16 | 15 | sseld 3980 |
. . . 4
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β (π β (πΉβπ΄) β π β (πΉβsuc π΅))) |
17 | | elndif 4127 |
. . . 4
β’ (π β (πΉβsuc π΅) β Β¬ π β ((πΉβπ΅) β (πΉβsuc π΅))) |
18 | 1, 16, 17 | syl56 36 |
. . 3
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β (π β ((πΉβπ΄) β (πΉβsuc π΄)) β Β¬ π β ((πΉβπ΅) β (πΉβsuc π΅)))) |
19 | 18 | ralrimiv 3145 |
. 2
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β βπ β ((πΉβπ΄) β (πΉβsuc π΄)) Β¬ π β ((πΉβπ΅) β (πΉβsuc π΅))) |
20 | | disj 4446 |
. 2
β’ ((((πΉβπ΄) β (πΉβsuc π΄)) β© ((πΉβπ΅) β (πΉβsuc π΅))) = β
β βπ β ((πΉβπ΄) β (πΉβsuc π΄)) Β¬ π β ((πΉβπ΅) β (πΉβsuc π΅))) |
21 | 19, 20 | sylibr 233 |
1
β’ (((π΄ β Ο β§ π΅ β Ο) β§ (π΅ β π΄ β§ π)) β (((πΉβπ΄) β (πΉβsuc π΄)) β© ((πΉβπ΅) β (πΉβsuc π΅))) = β
) |