Step | Hyp | Ref
| Expression |
1 | | ltrnel.l |
. . . 4
β’ β€ =
(leβπΎ) |
2 | | ltrnel.a |
. . . 4
β’ π΄ = (AtomsβπΎ) |
3 | | ltrnel.h |
. . . 4
β’ π» = (LHypβπΎ) |
4 | | ltrnel.t |
. . . 4
β’ π = ((LTrnβπΎ)βπ) |
5 | 1, 2, 3, 4 | ltrncnvat 38710 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ π β π΄) β (β‘πΉβπ) β π΄) |
6 | 5 | 3adant3r 1181 |
. 2
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β (β‘πΉβπ) β π΄) |
7 | | simp3r 1202 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β Β¬ π β€ π) |
8 | | simp1 1136 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β (πΎ β HL β§ π β π»)) |
9 | | simp2 1137 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β πΉ β π) |
10 | | eqid 2731 |
. . . . . . 7
β’
(BaseβπΎ) =
(BaseβπΎ) |
11 | 10, 2 | atbase 37857 |
. . . . . 6
β’ ((β‘πΉβπ) β π΄ β (β‘πΉβπ) β (BaseβπΎ)) |
12 | 6, 11 | syl 17 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β (β‘πΉβπ) β (BaseβπΎ)) |
13 | | simp1r 1198 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β π β π») |
14 | 10, 3 | lhpbase 38567 |
. . . . . 6
β’ (π β π» β π β (BaseβπΎ)) |
15 | 13, 14 | syl 17 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β π β (BaseβπΎ)) |
16 | 10, 1, 3, 4 | ltrnle 38698 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ ((β‘πΉβπ) β (BaseβπΎ) β§ π β (BaseβπΎ))) β ((β‘πΉβπ) β€ π β (πΉβ(β‘πΉβπ)) β€ (πΉβπ))) |
17 | 8, 9, 12, 15, 16 | syl112anc 1374 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β ((β‘πΉβπ) β€ π β (πΉβ(β‘πΉβπ)) β€ (πΉβπ))) |
18 | 10, 3, 4 | ltrn1o 38693 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ πΉ β π) β πΉ:(BaseβπΎ)β1-1-ontoβ(BaseβπΎ)) |
19 | 18 | 3adant3 1132 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β πΉ:(BaseβπΎ)β1-1-ontoβ(BaseβπΎ)) |
20 | | simp3l 1201 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β π β π΄) |
21 | 10, 2 | atbase 37857 |
. . . . . . 7
β’ (π β π΄ β π β (BaseβπΎ)) |
22 | 20, 21 | syl 17 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β π β (BaseβπΎ)) |
23 | | f1ocnvfv2 7243 |
. . . . . 6
β’ ((πΉ:(BaseβπΎ)β1-1-ontoβ(BaseβπΎ) β§ π β (BaseβπΎ)) β (πΉβ(β‘πΉβπ)) = π) |
24 | 19, 22, 23 | syl2anc 584 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β (πΉβ(β‘πΉβπ)) = π) |
25 | | simp1l 1197 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β πΎ β HL) |
26 | 25 | hllatd 37932 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β πΎ β Lat) |
27 | 10, 1 | latref 18359 |
. . . . . . 7
β’ ((πΎ β Lat β§ π β (BaseβπΎ)) β π β€ π) |
28 | 26, 15, 27 | syl2anc 584 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β π β€ π) |
29 | 10, 1, 3, 4 | ltrnval1 38703 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β (BaseβπΎ) β§ π β€ π)) β (πΉβπ) = π) |
30 | 8, 9, 15, 28, 29 | syl112anc 1374 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β (πΉβπ) = π) |
31 | 24, 30 | breq12d 5138 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β ((πΉβ(β‘πΉβπ)) β€ (πΉβπ) β π β€ π)) |
32 | 17, 31 | bitrd 278 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β ((β‘πΉβπ) β€ π β π β€ π)) |
33 | 7, 32 | mtbird 324 |
. 2
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β Β¬ (β‘πΉβπ) β€ π) |
34 | 6, 33 | jca 512 |
1
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ (π β π΄ β§ Β¬ π β€ π)) β ((β‘πΉβπ) β π΄ β§ Β¬ (β‘πΉβπ) β€ π)) |