Step | Hyp | Ref
| Expression |
1 | | trlord.b |
. . . . 5
β’ π΅ = (BaseβπΎ) |
2 | | trlord.l |
. . . . 5
β’ β€ =
(leβπΎ) |
3 | | simpl1l 1224 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β πΎ β HL) |
4 | 3 | hllatd 38222 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β πΎ β Lat) |
5 | | simpl1 1191 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β (πΎ β HL β§ π β π»)) |
6 | | simprlr 778 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β π β π) |
7 | | trlord.h |
. . . . . . 7
β’ π» = (LHypβπΎ) |
8 | | trlord.t |
. . . . . . 7
β’ π = ((LTrnβπΎ)βπ) |
9 | | trlord.r |
. . . . . . 7
β’ π
= ((trLβπΎ)βπ) |
10 | 1, 7, 8, 9 | trlcl 39023 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ π β π) β (π
βπ) β π΅) |
11 | 5, 6, 10 | syl2anc 584 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β (π
βπ) β π΅) |
12 | | simpl2l 1226 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β π β π΅) |
13 | | simpl3l 1228 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β π β π΅) |
14 | | simprr 771 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β (π
βπ) β€ π) |
15 | | simprll 777 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β π β€ π) |
16 | 1, 2, 4, 11, 12, 13, 14, 15 | lattrd 18395 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ ((π β€ π β§ π β π) β§ (π
βπ) β€ π)) β (π
βπ) β€ π) |
17 | 16 | exp44 438 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β (π β€ π β (π β π β ((π
βπ) β€ π β (π
βπ) β€ π)))) |
18 | 17 | ralrimdv 3152 |
. 2
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β (π β€ π β βπ β π ((π
βπ) β€ π β (π
βπ) β€ π))) |
19 | | simp11l 1284 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β πΎ β HL) |
20 | 19 | hllatd 38222 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β πΎ β Lat) |
21 | | simp2r 1200 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π’ β π΄) |
22 | | trlord.a |
. . . . . . . . . . 11
β’ π΄ = (AtomsβπΎ) |
23 | 1, 22 | atbase 38147 |
. . . . . . . . . 10
β’ (π’ β π΄ β π’ β π΅) |
24 | 21, 23 | syl 17 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π’ β π΅) |
25 | | simp12l 1286 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π β π΅) |
26 | | simp11r 1285 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π β π») |
27 | 1, 7 | lhpbase 38857 |
. . . . . . . . . 10
β’ (π β π» β π β π΅) |
28 | 26, 27 | syl 17 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π β π΅) |
29 | | simp3 1138 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π’ β€ π) |
30 | | simp12r 1287 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π β€ π) |
31 | 1, 2, 20, 24, 25, 28, 29, 30 | lattrd 18395 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π’ β€ π) |
32 | 31, 29 | jca 512 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β (π’ β€ π β§ π’ β€ π)) |
33 | 32 | 3expia 1121 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄)) β (π’ β€ π β (π’ β€ π β§ π’ β€ π))) |
34 | | simp11 1203 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β (πΎ β HL β§ π β π»)) |
35 | | simp2r 1200 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π’ β π΄) |
36 | | simp3 1138 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β π’ β€ π) |
37 | 2, 22, 7, 8, 9 | cdlemf 39422 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π») β§ (π’ β π΄ β§ π’ β€ π)) β βπ β π (π
βπ) = π’) |
38 | 34, 35, 36, 37 | syl12anc 835 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β βπ β π (π
βπ) = π’) |
39 | | simp2l 1199 |
. . . . . . . . . . . 12
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β βπ β π ((π
βπ) β€ π β (π
βπ) β€ π)) |
40 | | fveq2 6888 |
. . . . . . . . . . . . . . 15
β’ (π = π β (π
βπ) = (π
βπ)) |
41 | 40 | breq1d 5157 |
. . . . . . . . . . . . . 14
β’ (π = π β ((π
βπ) β€ π β (π
βπ) β€ π)) |
42 | 40 | breq1d 5157 |
. . . . . . . . . . . . . 14
β’ (π = π β ((π
βπ) β€ π β (π
βπ) β€ π)) |
43 | 41, 42 | imbi12d 344 |
. . . . . . . . . . . . 13
β’ (π = π β (((π
βπ) β€ π β (π
βπ) β€ π) β ((π
βπ) β€ π β (π
βπ) β€ π))) |
44 | 43 | rspccv 3609 |
. . . . . . . . . . . 12
β’
(βπ β
π ((π
βπ) β€ π β (π
βπ) β€ π) β (π β π β ((π
βπ) β€ π β (π
βπ) β€ π))) |
45 | 39, 44 | syl 17 |
. . . . . . . . . . 11
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β (π β π β ((π
βπ) β€ π β (π
βπ) β€ π))) |
46 | | breq1 5150 |
. . . . . . . . . . . . 13
β’ ((π
βπ) = π’ β ((π
βπ) β€ π β π’ β€ π)) |
47 | | breq1 5150 |
. . . . . . . . . . . . 13
β’ ((π
βπ) = π’ β ((π
βπ) β€ π β π’ β€ π)) |
48 | 46, 47 | imbi12d 344 |
. . . . . . . . . . . 12
β’ ((π
βπ) = π’ β (((π
βπ) β€ π β (π
βπ) β€ π) β (π’ β€ π β π’ β€ π))) |
49 | 48 | biimpcd 248 |
. . . . . . . . . . 11
β’ (((π
βπ) β€ π β (π
βπ) β€ π) β ((π
βπ) = π’ β (π’ β€ π β π’ β€ π))) |
50 | 45, 49 | syl6 35 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β (π β π β ((π
βπ) = π’ β (π’ β€ π β π’ β€ π)))) |
51 | 50 | rexlimdv 3153 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β (βπ β π (π
βπ) = π’ β (π’ β€ π β π’ β€ π))) |
52 | 38, 51 | mpd 15 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄) β§ π’ β€ π) β (π’ β€ π β π’ β€ π)) |
53 | 52 | 3expia 1121 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄)) β (π’ β€ π β (π’ β€ π β π’ β€ π))) |
54 | 53 | impd 411 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄)) β ((π’ β€ π β§ π’ β€ π) β π’ β€ π)) |
55 | 33, 54 | syld 47 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β§ (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β§ π’ β π΄)) β (π’ β€ π β π’ β€ π)) |
56 | 55 | exp32 421 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β (π’ β π΄ β (π’ β€ π β π’ β€ π)))) |
57 | 56 | ralrimdv 3152 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β βπ’ β π΄ (π’ β€ π β π’ β€ π))) |
58 | | simp1l 1197 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β πΎ β HL) |
59 | | simp2l 1199 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β π β π΅) |
60 | | simp3l 1201 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β π β π΅) |
61 | 1, 2, 22 | hlatle 38257 |
. . . 4
β’ ((πΎ β HL β§ π β π΅ β§ π β π΅) β (π β€ π β βπ’ β π΄ (π’ β€ π β π’ β€ π))) |
62 | 58, 59, 60, 61 | syl3anc 1371 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β (π β€ π β βπ’ β π΄ (π’ β€ π β π’ β€ π))) |
63 | 57, 62 | sylibrd 258 |
. 2
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β (βπ β π ((π
βπ) β€ π β (π
βπ) β€ π) β π β€ π)) |
64 | 18, 63 | impbid 211 |
1
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β€ π) β§ (π β π΅ β§ π β€ π)) β (π β€ π β βπ β π ((π
βπ) β€ π β (π
βπ) β€ π))) |