Step | Hyp | Ref
| Expression |
1 | | simpll 765 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β (πΎ β HL β§ π β π»)) |
2 | | simplr2 1216 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β (π β π΄ β§ Β¬ π β€ π)) |
3 | | simplr3 1217 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β πΊ β π) |
4 | | cdlemg4.l |
. . . . . . . . 9
β’ β€ =
(leβπΎ) |
5 | | cdlemg4.a |
. . . . . . . . 9
β’ π΄ = (AtomsβπΎ) |
6 | | cdlemg4.h |
. . . . . . . . 9
β’ π» = (LHypβπΎ) |
7 | | cdlemg4.t |
. . . . . . . . 9
β’ π = ((LTrnβπΎ)βπ) |
8 | | cdlemg4.r |
. . . . . . . . 9
β’ π
= ((trLβπΎ)βπ) |
9 | | cdlemg4.j |
. . . . . . . . 9
β’ β¨ =
(joinβπΎ) |
10 | | cdlemg4b.v |
. . . . . . . . 9
β’ π = (π
βπΊ) |
11 | 4, 5, 6, 7, 8, 9, 10 | cdlemg4b2 39469 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π) β ((πΊβπ) β¨ π) = (π β¨ (πΊβπ))) |
12 | 1, 2, 3, 11 | syl3anc 1371 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β ((πΊβπ) β¨ π) = (π β¨ (πΊβπ))) |
13 | | simpr 485 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β (πΊβπ) β€ (π β¨ π)) |
14 | | simpll 765 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β πΎ β HL) |
15 | 14 | hllatd 38222 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β πΎ β Lat) |
16 | | simpr1l 1230 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β π β π΄) |
17 | | eqid 2732 |
. . . . . . . . . . . 12
β’
(BaseβπΎ) =
(BaseβπΎ) |
18 | 17, 5 | atbase 38147 |
. . . . . . . . . . 11
β’ (π β π΄ β π β (BaseβπΎ)) |
19 | 16, 18 | syl 17 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β π β (BaseβπΎ)) |
20 | | simpl 483 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β (πΎ β HL β§ π β π»)) |
21 | | simpr3 1196 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β πΊ β π) |
22 | 17, 6, 7, 8 | trlcl 39023 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π») β§ πΊ β π) β (π
βπΊ) β (BaseβπΎ)) |
23 | 20, 21, 22 | syl2anc 584 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β (π
βπΊ) β (BaseβπΎ)) |
24 | 10, 23 | eqeltrid 2837 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β π β (BaseβπΎ)) |
25 | 17, 4, 9 | latlej2 18398 |
. . . . . . . . . 10
β’ ((πΎ β Lat β§ π β (BaseβπΎ) β§ π β (BaseβπΎ)) β π β€ (π β¨ π)) |
26 | 15, 19, 24, 25 | syl3anc 1371 |
. . . . . . . . 9
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β π β€ (π β¨ π)) |
27 | 26 | adantr 481 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β π β€ (π β¨ π)) |
28 | | simpr2l 1232 |
. . . . . . . . . . . 12
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β π β π΄) |
29 | 17, 5 | atbase 38147 |
. . . . . . . . . . . 12
β’ (π β π΄ β π β (BaseβπΎ)) |
30 | 28, 29 | syl 17 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β π β (BaseβπΎ)) |
31 | 17, 6, 7 | ltrncl 38984 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ π β π») β§ πΊ β π β§ π β (BaseβπΎ)) β (πΊβπ) β (BaseβπΎ)) |
32 | 20, 21, 30, 31 | syl3anc 1371 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β (πΊβπ) β (BaseβπΎ)) |
33 | 17, 9 | latjcl 18388 |
. . . . . . . . . . 11
β’ ((πΎ β Lat β§ π β (BaseβπΎ) β§ π β (BaseβπΎ)) β (π β¨ π) β (BaseβπΎ)) |
34 | 15, 19, 24, 33 | syl3anc 1371 |
. . . . . . . . . 10
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β (π β¨ π) β (BaseβπΎ)) |
35 | 17, 4, 9 | latjle12 18399 |
. . . . . . . . . 10
β’ ((πΎ β Lat β§ ((πΊβπ) β (BaseβπΎ) β§ π β (BaseβπΎ) β§ (π β¨ π) β (BaseβπΎ))) β (((πΊβπ) β€ (π β¨ π) β§ π β€ (π β¨ π)) β ((πΊβπ) β¨ π) β€ (π β¨ π))) |
36 | 15, 32, 24, 34, 35 | syl13anc 1372 |
. . . . . . . . 9
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β (((πΊβπ) β€ (π β¨ π) β§ π β€ (π β¨ π)) β ((πΊβπ) β¨ π) β€ (π β¨ π))) |
37 | 36 | adantr 481 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β (((πΊβπ) β€ (π β¨ π) β§ π β€ (π β¨ π)) β ((πΊβπ) β¨ π) β€ (π β¨ π))) |
38 | 13, 27, 37 | mpbi2and 710 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β ((πΊβπ) β¨ π) β€ (π β¨ π)) |
39 | 12, 38 | eqbrtrrd 5171 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β (π β¨ (πΊβπ)) β€ (π β¨ π)) |
40 | 15 | adantr 481 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β πΎ β Lat) |
41 | 30 | adantr 481 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β π β (BaseβπΎ)) |
42 | 32 | adantr 481 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β (πΊβπ) β (BaseβπΎ)) |
43 | 19 | adantr 481 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β π β (BaseβπΎ)) |
44 | 1, 3, 22 | syl2anc 584 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β (π
βπΊ) β (BaseβπΎ)) |
45 | 10, 44 | eqeltrid 2837 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β π β (BaseβπΎ)) |
46 | 40, 43, 45, 33 | syl3anc 1371 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β (π β¨ π) β (BaseβπΎ)) |
47 | 17, 4, 9 | latjle12 18399 |
. . . . . . 7
β’ ((πΎ β Lat β§ (π β (BaseβπΎ) β§ (πΊβπ) β (BaseβπΎ) β§ (π β¨ π) β (BaseβπΎ))) β ((π β€ (π β¨ π) β§ (πΊβπ) β€ (π β¨ π)) β (π β¨ (πΊβπ)) β€ (π β¨ π))) |
48 | 40, 41, 42, 46, 47 | syl13anc 1372 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β ((π β€ (π β¨ π) β§ (πΊβπ) β€ (π β¨ π)) β (π β¨ (πΊβπ)) β€ (π β¨ π))) |
49 | 39, 48 | mpbird 256 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β (π β€ (π β¨ π) β§ (πΊβπ) β€ (π β¨ π))) |
50 | 49 | simpld 495 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β§ (πΊβπ) β€ (π β¨ π)) β π β€ (π β¨ π)) |
51 | 50 | ex 413 |
. . 3
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β ((πΊβπ) β€ (π β¨ π) β π β€ (π β¨ π))) |
52 | 51 | con3d 152 |
. 2
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π)) β (Β¬ π β€ (π β¨ π) β Β¬ (πΊβπ) β€ (π β¨ π))) |
53 | 52 | 3impia 1117 |
1
β’ (((πΎ β HL β§ π β π») β§ ((π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π) β§ πΊ β π) β§ Β¬ π β€ (π β¨ π)) β Β¬ (πΊβπ) β€ (π β¨ π)) |