Step | Hyp | Ref
| Expression |
1 | | dihglbc.h |
. . . 4
β’ π» = (LHypβπΎ) |
2 | | dihglbc.i |
. . . 4
β’ πΌ = ((DIsoHβπΎ)βπ) |
3 | 1, 2 | dihvalrel 40139 |
. . 3
β’ ((πΎ β HL β§ π β π») β Rel (πΌβ(πΊβπ))) |
4 | 3 | 3ad2ant1 1134 |
. 2
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β Rel (πΌβ(πΊβπ))) |
5 | | simp2r 1201 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β π β β
) |
6 | | n0 4346 |
. . . . . 6
β’ (π β β
β
βπ₯ π₯ β π) |
7 | 5, 6 | sylib 217 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β βπ₯ π₯ β π) |
8 | | simpr 486 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ π₯ β π) β π₯ β π) |
9 | | simpl1 1192 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ π₯ β π) β (πΎ β HL β§ π β π»)) |
10 | 1, 2 | dihvalrel 40139 |
. . . . . . . . 9
β’ ((πΎ β HL β§ π β π») β Rel (πΌβπ₯)) |
11 | 9, 10 | syl 17 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ π₯ β π) β Rel (πΌβπ₯)) |
12 | 8, 11 | jca 513 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ π₯ β π) β (π₯ β π β§ Rel (πΌβπ₯))) |
13 | 12 | ex 414 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β (π₯ β π β (π₯ β π β§ Rel (πΌβπ₯)))) |
14 | 13 | eximdv 1921 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β (βπ₯ π₯ β π β βπ₯(π₯ β π β§ Rel (πΌβπ₯)))) |
15 | 7, 14 | mpd 15 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β βπ₯(π₯ β π β§ Rel (πΌβπ₯))) |
16 | | df-rex 3072 |
. . . 4
β’
(βπ₯ β
π Rel (πΌβπ₯) β βπ₯(π₯ β π β§ Rel (πΌβπ₯))) |
17 | 15, 16 | sylibr 233 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β βπ₯ β π Rel (πΌβπ₯)) |
18 | | reliin 5816 |
. . 3
β’
(βπ₯ β
π Rel (πΌβπ₯) β Rel β© π₯ β π (πΌβπ₯)) |
19 | 17, 18 | syl 17 |
. 2
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β Rel β© π₯ β π (πΌβπ₯)) |
20 | | id 22 |
. 2
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β ((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π)) |
21 | | simp1 1137 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β (πΎ β HL β§ π β π»)) |
22 | | simp1l 1198 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β πΎ β HL) |
23 | | hlclat 38217 |
. . . . . . 7
β’ (πΎ β HL β πΎ β CLat) |
24 | 22, 23 | syl 17 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β πΎ β CLat) |
25 | | simp2l 1200 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β π β π΅) |
26 | | dihglbc.b |
. . . . . . 7
β’ π΅ = (BaseβπΎ) |
27 | | dihglbc.g |
. . . . . . 7
β’ πΊ = (glbβπΎ) |
28 | 26, 27 | clatglbcl 18455 |
. . . . . 6
β’ ((πΎ β CLat β§ π β π΅) β (πΊβπ) β π΅) |
29 | 24, 25, 28 | syl2anc 585 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β (πΊβπ) β π΅) |
30 | | simp3 1139 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β Β¬ (πΊβπ) β€ π) |
31 | | dihglbc.l |
. . . . . 6
β’ β€ =
(leβπΎ) |
32 | | dihglbcpre.j |
. . . . . 6
β’ β¨ =
(joinβπΎ) |
33 | | dihglbcpre.m |
. . . . . 6
β’ β§ =
(meetβπΎ) |
34 | | dihglbcpre.a |
. . . . . 6
β’ π΄ = (AtomsβπΎ) |
35 | 26, 31, 32, 33, 34, 1 | lhpmcvr2 38884 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ ((πΊβπ) β π΅ β§ Β¬ (πΊβπ) β€ π)) β βπ β π΄ (Β¬ π β€ π β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) |
36 | 21, 29, 30, 35 | syl12anc 836 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β βπ β π΄ (Β¬ π β€ π β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) |
37 | | simpl1 1192 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (πΎ β HL β§ π β π»)) |
38 | 29 | adantr 482 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (πΊβπ) β π΅) |
39 | | simpl3 1194 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β Β¬ (πΊβπ) β€ π) |
40 | | simpr 486 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) |
41 | | dihglbcpre.p |
. . . . . . . . . 10
β’ π = ((ocβπΎ)βπ) |
42 | | dihglbcpre.t |
. . . . . . . . . 10
β’ π = ((LTrnβπΎ)βπ) |
43 | | dihglbcpre.r |
. . . . . . . . . 10
β’ π
= ((trLβπΎ)βπ) |
44 | | dihglbcpre.e |
. . . . . . . . . 10
β’ πΈ = ((TEndoβπΎ)βπ) |
45 | | dihglbcpre.f |
. . . . . . . . . 10
β’ πΉ = (β©π β π (πβπ) = π) |
46 | | vex 3479 |
. . . . . . . . . 10
β’ π β V |
47 | | vex 3479 |
. . . . . . . . . 10
β’ π β V |
48 | 26, 31, 32, 33, 34, 1, 41, 42, 43, 44, 2, 45, 46, 47 | dihopelvalc 40109 |
. . . . . . . . 9
β’ (((πΎ β HL β§ π β π») β§ ((πΊβπ) β π΅ β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (β¨π, π β© β (πΌβ(πΊβπ)) β ((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ (πΊβπ)))) |
49 | 37, 38, 39, 40, 48 | syl121anc 1376 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (β¨π, π β© β (πΌβ(πΊβπ)) β ((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ (πΊβπ)))) |
50 | | simpl2r 1228 |
. . . . . . . . . . 11
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β π β β
) |
51 | | r19.28zv 4500 |
. . . . . . . . . . 11
β’ (π β β
β
(βπ₯ β π ((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ π₯) β ((π β π β§ π β πΈ) β§ βπ₯ β π (π
β(π β β‘(π βπΉ))) β€ π₯))) |
52 | 50, 51 | syl 17 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (βπ₯ β π ((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ π₯) β ((π β π β§ π β πΈ) β§ βπ₯ β π (π
β(π β β‘(π βπΉ))) β€ π₯))) |
53 | | simp11 1204 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (πΎ β HL β§ π β π»)) |
54 | | simp12l 1287 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π β π΅) |
55 | | simp3 1139 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π₯ β π) |
56 | 54, 55 | sseldd 3983 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π₯ β π΅) |
57 | | simp13 1206 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β Β¬ (πΊβπ) β€ π) |
58 | | simp11l 1285 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β πΎ β HL) |
59 | 58, 23 | syl 17 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β πΎ β CLat) |
60 | 26, 31, 27 | clatglble 18467 |
. . . . . . . . . . . . . . . 16
β’ ((πΎ β CLat β§ π β π΅ β§ π₯ β π) β (πΊβπ) β€ π₯) |
61 | 59, 54, 55, 60 | syl3anc 1372 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (πΊβπ) β€ π₯) |
62 | 58 | hllatd 38223 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β πΎ β Lat) |
63 | 29 | 3ad2ant1 1134 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (πΊβπ) β π΅) |
64 | | simp11r 1286 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π β π») |
65 | 26, 1 | lhpbase 38858 |
. . . . . . . . . . . . . . . . 17
β’ (π β π» β π β π΅) |
66 | 64, 65 | syl 17 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π β π΅) |
67 | 26, 31 | lattr 18394 |
. . . . . . . . . . . . . . . 16
β’ ((πΎ β Lat β§ ((πΊβπ) β π΅ β§ π₯ β π΅ β§ π β π΅)) β (((πΊβπ) β€ π₯ β§ π₯ β€ π) β (πΊβπ) β€ π)) |
68 | 62, 63, 56, 66, 67 | syl13anc 1373 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (((πΊβπ) β€ π₯ β§ π₯ β€ π) β (πΊβπ) β€ π)) |
69 | 61, 68 | mpand 694 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (π₯ β€ π β (πΊβπ) β€ π)) |
70 | 57, 69 | mtod 197 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β Β¬ π₯ β€ π) |
71 | | simp2l 1200 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (π β π΄ β§ Β¬ π β€ π)) |
72 | | simp2ll 1241 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π β π΄) |
73 | 26, 34 | atbase 38148 |
. . . . . . . . . . . . . . . . 17
β’ (π β π΄ β π β π΅) |
74 | 72, 73 | syl 17 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π β π΅) |
75 | 26, 33 | latmcl 18390 |
. . . . . . . . . . . . . . . . . . 19
β’ ((πΎ β Lat β§ (πΊβπ) β π΅ β§ π β π΅) β ((πΊβπ) β§ π) β π΅) |
76 | 62, 63, 66, 75 | syl3anc 1372 |
. . . . . . . . . . . . . . . . . 18
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β ((πΊβπ) β§ π) β π΅) |
77 | 26, 31, 32 | latlej1 18398 |
. . . . . . . . . . . . . . . . . 18
β’ ((πΎ β Lat β§ π β π΅ β§ ((πΊβπ) β§ π) β π΅) β π β€ (π β¨ ((πΊβπ) β§ π))) |
78 | 62, 74, 76, 77 | syl3anc 1372 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π β€ (π β¨ ((πΊβπ) β§ π))) |
79 | | simp2r 1201 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) |
80 | 78, 79 | breqtrd 5174 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π β€ (πΊβπ)) |
81 | 26, 31, 62, 74, 63, 56, 80, 61 | lattrd 18396 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β π β€ π₯) |
82 | 26, 31, 32, 33, 34 | atmod3i1 38724 |
. . . . . . . . . . . . . . 15
β’ ((πΎ β HL β§ (π β π΄ β§ π₯ β π΅ β§ π β π΅) β§ π β€ π₯) β (π β¨ (π₯ β§ π)) = (π₯ β§ (π β¨ π))) |
83 | 58, 72, 56, 66, 81, 82 | syl131anc 1384 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (π β¨ (π₯ β§ π)) = (π₯ β§ (π β¨ π))) |
84 | | eqid 2733 |
. . . . . . . . . . . . . . . . 17
β’
(1.βπΎ) =
(1.βπΎ) |
85 | 31, 32, 84, 34, 1 | lhpjat2 38881 |
. . . . . . . . . . . . . . . 16
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π)) β (π β¨ π) = (1.βπΎ)) |
86 | 53, 71, 85 | syl2anc 585 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (π β¨ π) = (1.βπΎ)) |
87 | 86 | oveq2d 7422 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (π₯ β§ (π β¨ π)) = (π₯ β§ (1.βπΎ))) |
88 | | hlol 38220 |
. . . . . . . . . . . . . . . 16
β’ (πΎ β HL β πΎ β OL) |
89 | 58, 88 | syl 17 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β πΎ β OL) |
90 | 26, 33, 84 | olm11 38086 |
. . . . . . . . . . . . . . 15
β’ ((πΎ β OL β§ π₯ β π΅) β (π₯ β§ (1.βπΎ)) = π₯) |
91 | 89, 56, 90 | syl2anc 585 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (π₯ β§ (1.βπΎ)) = π₯) |
92 | 83, 87, 91 | 3eqtrd 2777 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (π β¨ (π₯ β§ π)) = π₯) |
93 | 26, 31, 32, 33, 34, 1, 41, 42, 43, 44, 2, 45, 46, 47 | dihopelvalc 40109 |
. . . . . . . . . . . . 13
β’ (((πΎ β HL β§ π β π») β§ (π₯ β π΅ β§ Β¬ π₯ β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ (π₯ β§ π)) = π₯)) β (β¨π, π β© β (πΌβπ₯) β ((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ π₯))) |
94 | 53, 56, 70, 71, 92, 93 | syl122anc 1380 |
. . . . . . . . . . . 12
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ π₯ β π) β (β¨π, π β© β (πΌβπ₯) β ((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ π₯))) |
95 | 94 | 3expa 1119 |
. . . . . . . . . . 11
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β§ π₯ β π) β (β¨π, π β© β (πΌβπ₯) β ((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ π₯))) |
96 | 95 | ralbidva 3176 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (βπ₯ β π β¨π, π β© β (πΌβπ₯) β βπ₯ β π ((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ π₯))) |
97 | | simp11l 1285 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β πΎ β HL) |
98 | 97, 23 | syl 17 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β πΎ β CLat) |
99 | | simp11 1204 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β (πΎ β HL β§ π β π»)) |
100 | | simp3l 1202 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β π β π) |
101 | | simp3r 1203 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β π β πΈ) |
102 | 31, 34, 1, 41 | lhpocnel2 38879 |
. . . . . . . . . . . . . . . . . . 19
β’ ((πΎ β HL β§ π β π») β (π β π΄ β§ Β¬ π β€ π)) |
103 | 99, 102 | syl 17 |
. . . . . . . . . . . . . . . . . 18
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β (π β π΄ β§ Β¬ π β€ π)) |
104 | | simp2l 1200 |
. . . . . . . . . . . . . . . . . 18
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β (π β π΄ β§ Β¬ π β€ π)) |
105 | 31, 34, 1, 42, 45 | ltrniotacl 39439 |
. . . . . . . . . . . . . . . . . 18
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β πΉ β π) |
106 | 99, 103, 104, 105 | syl3anc 1372 |
. . . . . . . . . . . . . . . . 17
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β πΉ β π) |
107 | 1, 42, 44 | tendocl 39627 |
. . . . . . . . . . . . . . . . 17
β’ (((πΎ β HL β§ π β π») β§ π β πΈ β§ πΉ β π) β (π βπΉ) β π) |
108 | 99, 101, 106, 107 | syl3anc 1372 |
. . . . . . . . . . . . . . . 16
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β (π βπΉ) β π) |
109 | 1, 42 | ltrncnv 39006 |
. . . . . . . . . . . . . . . 16
β’ (((πΎ β HL β§ π β π») β§ (π βπΉ) β π) β β‘(π βπΉ) β π) |
110 | 99, 108, 109 | syl2anc 585 |
. . . . . . . . . . . . . . 15
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β β‘(π βπΉ) β π) |
111 | 1, 42 | ltrnco 39579 |
. . . . . . . . . . . . . . 15
β’ (((πΎ β HL β§ π β π») β§ π β π β§ β‘(π βπΉ) β π) β (π β β‘(π βπΉ)) β π) |
112 | 99, 100, 110, 111 | syl3anc 1372 |
. . . . . . . . . . . . . 14
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β (π β β‘(π βπΉ)) β π) |
113 | 26, 1, 42, 43 | trlcl 39024 |
. . . . . . . . . . . . . 14
β’ (((πΎ β HL β§ π β π») β§ (π β β‘(π βπΉ)) β π) β (π
β(π β β‘(π βπΉ))) β π΅) |
114 | 99, 112, 113 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β (π
β(π β β‘(π βπΉ))) β π΅) |
115 | | simp12l 1287 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β π β π΅) |
116 | 26, 31, 27 | clatleglb 18468 |
. . . . . . . . . . . . 13
β’ ((πΎ β CLat β§ (π
β(π β β‘(π βπΉ))) β π΅ β§ π β π΅) β ((π
β(π β β‘(π βπΉ))) β€ (πΊβπ) β βπ₯ β π (π
β(π β β‘(π βπΉ))) β€ π₯)) |
117 | 98, 114, 115, 116 | syl3anc 1372 |
. . . . . . . . . . . 12
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β§ (π β π β§ π β πΈ)) β ((π
β(π β β‘(π βπΉ))) β€ (πΊβπ) β βπ₯ β π (π
β(π β β‘(π βπΉ))) β€ π₯)) |
118 | 117 | 3expa 1119 |
. . . . . . . . . . 11
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β§ (π β π β§ π β πΈ)) β ((π
β(π β β‘(π βπΉ))) β€ (πΊβπ) β βπ₯ β π (π
β(π β β‘(π βπΉ))) β€ π₯)) |
119 | 118 | pm5.32da 580 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ (πΊβπ)) β ((π β π β§ π β πΈ) β§ βπ₯ β π (π
β(π β β‘(π βπΉ))) β€ π₯))) |
120 | 52, 96, 119 | 3bitr4rd 312 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ (πΊβπ)) β βπ₯ β π β¨π, π β© β (πΌβπ₯))) |
121 | | opex 5464 |
. . . . . . . . . 10
β’
β¨π, π β© β V |
122 | | eliin 5002 |
. . . . . . . . . 10
β’
(β¨π, π β© β V β
(β¨π, π β© β β© π₯ β π (πΌβπ₯) β βπ₯ β π β¨π, π β© β (πΌβπ₯))) |
123 | 121, 122 | ax-mp 5 |
. . . . . . . . 9
β’
(β¨π, π β© β β© π₯ β π (πΌβπ₯) β βπ₯ β π β¨π, π β© β (πΌβπ₯)) |
124 | 120, 123 | bitr4di 289 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (((π β π β§ π β πΈ) β§ (π
β(π β β‘(π βπΉ))) β€ (πΊβπ)) β β¨π, π β© β β© π₯ β π (πΌβπ₯))) |
125 | 49, 124 | bitrd 279 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ))) β (β¨π, π β© β (πΌβ(πΊβπ)) β β¨π, π β© β β© π₯ β π (πΌβπ₯))) |
126 | 125 | exp44 439 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β (π β π΄ β (Β¬ π β€ π β ((π β¨ ((πΊβπ) β§ π)) = (πΊβπ) β (β¨π, π β© β (πΌβ(πΊβπ)) β β¨π, π β© β β© π₯ β π (πΌβπ₯)))))) |
127 | 126 | imp4a 424 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β (π β π΄ β ((Β¬ π β€ π β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β (β¨π, π β© β (πΌβ(πΊβπ)) β β¨π, π β© β β© π₯ β π (πΌβπ₯))))) |
128 | 127 | rexlimdv 3154 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β (βπ β π΄ (Β¬ π β€ π β§ (π β¨ ((πΊβπ) β§ π)) = (πΊβπ)) β (β¨π, π β© β (πΌβ(πΊβπ)) β β¨π, π β© β β© π₯ β π (πΌβπ₯)))) |
129 | 36, 128 | mpd 15 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β (β¨π, π β© β (πΌβ(πΊβπ)) β β¨π, π β© β β© π₯ β π (πΌβπ₯))) |
130 | 129 | eqrelrdv2 5794 |
. 2
β’ (((Rel
(πΌβ(πΊβπ)) β§ Rel β© π₯ β π (πΌβπ₯)) β§ ((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π)) β (πΌβ(πΊβπ)) = β©
π₯ β π (πΌβπ₯)) |
131 | 4, 19, 20, 130 | syl21anc 837 |
1
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β β
) β§ Β¬ (πΊβπ) β€ π) β (πΌβ(πΊβπ)) = β©
π₯ β π (πΌβπ₯)) |