Step | Hyp | Ref
| Expression |
1 | | dihjust.b |
. . 3
β’ π΅ = (BaseβπΎ) |
2 | | dihjust.l |
. . 3
β’ β€ =
(leβπΎ) |
3 | | dihjust.j |
. . 3
β’ β¨ =
(joinβπΎ) |
4 | | dihjust.m |
. . 3
β’ β§ =
(meetβπΎ) |
5 | | dihjust.a |
. . 3
β’ π΄ = (AtomsβπΎ) |
6 | | dihjust.h |
. . 3
β’ π» = (LHypβπΎ) |
7 | | dihjust.i |
. . 3
β’ πΌ = ((DIsoBβπΎ)βπ) |
8 | | dihjust.J |
. . 3
β’ π½ = ((DIsoCβπΎ)βπ) |
9 | | dihjust.u |
. . 3
β’ π = ((DVecHβπΎ)βπ) |
10 | | dihjust.s |
. . 3
β’ β =
(LSSumβπ) |
11 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 | dihord2a 40394 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β π β€ (π β¨ (π β§ π))) |
12 | | simp11l 1283 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β πΎ β HL) |
13 | 12 | hllatd 38538 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β πΎ β Lat) |
14 | | simp2l 1198 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β π β π΅) |
15 | | simp11r 1284 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β π β π») |
16 | 1, 6 | lhpbase 39173 |
. . . . 5
β’ (π β π» β π β π΅) |
17 | 15, 16 | syl 17 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β π β π΅) |
18 | 1, 4 | latmcl 18398 |
. . . 4
β’ ((πΎ β Lat β§ π β π΅ β§ π β π΅) β (π β§ π) β π΅) |
19 | 13, 14, 17, 18 | syl3anc 1370 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β (π β§ π) β π΅) |
20 | | simp2r 1199 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β π β π΅) |
21 | 1, 4 | latmcl 18398 |
. . . 4
β’ ((πΎ β Lat β§ π β π΅ β§ π β π΅) β (π β§ π) β π΅) |
22 | 13, 20, 17, 21 | syl3anc 1370 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β (π β§ π) β π΅) |
23 | | simp13l 1287 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β π β π΄) |
24 | 1, 5 | atbase 38463 |
. . . . 5
β’ (π β π΄ β π β π΅) |
25 | 23, 24 | syl 17 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β π β π΅) |
26 | 1, 3 | latjcl 18397 |
. . . 4
β’ ((πΎ β Lat β§ π β π΅ β§ (π β§ π) β π΅) β (π β¨ (π β§ π)) β π΅) |
27 | 13, 25, 22, 26 | syl3anc 1370 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β (π β¨ (π β§ π)) β π΅) |
28 | | simp33 1210 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π)))) |
29 | | dihord2c.t |
. . . . 5
β’ π = ((LTrnβπΎ)βπ) |
30 | | dihord2c.r |
. . . . 5
β’ π
= ((trLβπΎ)βπ) |
31 | | dihord2c.o |
. . . . 5
β’ π = (β β π β¦ ( I βΎ π΅)) |
32 | | dihord2.p |
. . . . 5
β’ π = ((ocβπΎ)βπ) |
33 | | dihord2.e |
. . . . 5
β’ πΈ = ((TEndoβπΎ)βπ) |
34 | | dihord2.d |
. . . . 5
β’ + =
(+gβπ) |
35 | | dihord2.g |
. . . . 5
β’ πΊ = (β©β β π (ββπ) = π) |
36 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10,
29, 30, 31, 32, 33, 34, 35 | dihord2pre 40400 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π)))) β (π β§ π) β€ (π β§ π)) |
37 | 28, 36 | syld3an3 1408 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β (π β§ π) β€ (π β§ π)) |
38 | 1, 2, 3 | latlej2 18407 |
. . . 4
β’ ((πΎ β Lat β§ π β π΅ β§ (π β§ π) β π΅) β (π β§ π) β€ (π β¨ (π β§ π))) |
39 | 13, 25, 22, 38 | syl3anc 1370 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β (π β§ π) β€ (π β¨ (π β§ π))) |
40 | 1, 2, 13, 19, 22, 27, 37, 39 | lattrd 18404 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β (π β§ π) β€ (π β¨ (π β§ π))) |
41 | | simp12l 1285 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β π β π΄) |
42 | 1, 5 | atbase 38463 |
. . . 4
β’ (π β π΄ β π β π΅) |
43 | 41, 42 | syl 17 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β π β π΅) |
44 | 1, 2, 3 | latjle12 18408 |
. . 3
β’ ((πΎ β Lat β§ (π β π΅ β§ (π β§ π) β π΅ β§ (π β¨ (π β§ π)) β π΅)) β ((π β€ (π β¨ (π β§ π)) β§ (π β§ π) β€ (π β¨ (π β§ π))) β (π β¨ (π β§ π)) β€ (π β¨ (π β§ π)))) |
45 | 13, 43, 19, 27, 44 | syl13anc 1371 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β ((π β€ (π β¨ (π β§ π)) β§ (π β§ π) β€ (π β¨ (π β§ π))) β (π β¨ (π β§ π)) β€ (π β¨ (π β§ π)))) |
46 | 11, 40, 45 | mpbi2and 709 |
1
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (π β π΅ β§ π β π΅) β§ ((π β¨ (π β§ π)) = π β§ (π β¨ (π β§ π)) = π β§ ((π½βπ) β (πΌβ(π β§ π))) β ((π½βπ) β (πΌβ(π β§ π))))) β (π β¨ (π β§ π)) β€ (π β¨ (π β§ π))) |