Step | Hyp | Ref
| Expression |
1 | | simp11 1203 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (πΎ β HL β§ π β π»)) |
2 | | simp2l 1199 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β πΉ β π) |
3 | | simp2r 1200 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β πΊ β π) |
4 | | simp12 1204 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (π β π΄ β§ Β¬ π β€ π)) |
5 | | cdlemg12.l |
. . . . . 6
β’ β€ =
(leβπΎ) |
6 | | cdlemg12.a |
. . . . . 6
β’ π΄ = (AtomsβπΎ) |
7 | | cdlemg12.h |
. . . . . 6
β’ π» = (LHypβπΎ) |
8 | | cdlemg12.t |
. . . . . 6
β’ π = ((LTrnβπΎ)βπ) |
9 | 5, 6, 7, 8 | ltrnel 38195 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΊ β π β§ (π β π΄ β§ Β¬ π β€ π)) β ((πΊβπ) β π΄ β§ Β¬ (πΊβπ) β€ π)) |
10 | 1, 3, 4, 9 | syl3anc 1371 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β ((πΊβπ) β π΄ β§ Β¬ (πΊβπ) β€ π)) |
11 | | cdlemg12.j |
. . . . 5
β’ β¨ =
(joinβπΎ) |
12 | | cdlemg12.m |
. . . . 5
β’ β§ =
(meetβπΎ) |
13 | | cdlemg12b.r |
. . . . 5
β’ π
= ((trLβπΎ)βπ) |
14 | 5, 11, 12, 6, 7, 8,
13 | trlval2 38219 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ ((πΊβπ) β π΄ β§ Β¬ (πΊβπ) β€ π)) β (π
βπΉ) = (((πΊβπ) β¨ (πΉβ(πΊβπ))) β§ π)) |
15 | 1, 2, 10, 14 | syl3anc 1371 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (π
βπΉ) = (((πΊβπ) β¨ (πΉβ(πΊβπ))) β§ π)) |
16 | | simp13 1205 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (π β π΄ β§ Β¬ π β€ π)) |
17 | 5, 6, 7, 8 | ltrnel 38195 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΊ β π β§ (π β π΄ β§ Β¬ π β€ π)) β ((πΊβπ) β π΄ β§ Β¬ (πΊβπ) β€ π)) |
18 | 1, 3, 16, 17 | syl3anc 1371 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β ((πΊβπ) β π΄ β§ Β¬ (πΊβπ) β€ π)) |
19 | 5, 11, 12, 6, 7, 8,
13 | trlval2 38219 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ πΉ β π β§ ((πΊβπ) β π΄ β§ Β¬ (πΊβπ) β€ π)) β (π
βπΉ) = (((πΊβπ) β¨ (πΉβ(πΊβπ))) β§ π)) |
20 | 1, 2, 18, 19 | syl3anc 1371 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (π
βπΉ) = (((πΊβπ) β¨ (πΉβ(πΊβπ))) β§ π)) |
21 | 15, 20 | eqtr3d 2778 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (((πΊβπ) β¨ (πΉβ(πΊβπ))) β§ π) = (((πΊβπ) β¨ (πΉβ(πΊβπ))) β§ π)) |
22 | 5, 11, 12, 6, 7, 8,
13 | cdlemg13a 38707 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (π β¨ (πΉβ(πΊβπ))) = ((πΊβπ) β¨ (πΉβ(πΊβπ)))) |
23 | 22 | oveq1d 7322 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β ((π β¨ (πΉβ(πΊβπ))) β§ π) = (((πΊβπ) β¨ (πΉβ(πΊβπ))) β§ π)) |
24 | | simp2 1137 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (πΉ β π β§ πΊ β π)) |
25 | | simp31 1209 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (πΉβπ) β π) |
26 | 5, 6, 7, 8 | ltrnatneq 38238 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) β π) β (πΉβπ) β π) |
27 | 1, 2, 4, 16, 25, 26 | syl131anc 1383 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (πΉβπ) β π) |
28 | | simp32 1210 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (π
βπΉ) = (π
βπΊ)) |
29 | | simp33 1211 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π)) |
30 | | simp11l 1284 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β πΎ β HL) |
31 | | simp12l 1286 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β π β π΄) |
32 | 5, 6, 7, 8 | ltrncoat 38200 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΊ β π) β§ π β π΄) β (πΉβ(πΊβπ)) β π΄) |
33 | 1, 24, 31, 32 | syl3anc 1371 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (πΉβ(πΊβπ)) β π΄) |
34 | | simp13l 1288 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β π β π΄) |
35 | 5, 6, 7, 8 | ltrncoat 38200 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΊ β π) β§ π β π΄) β (πΉβ(πΊβπ)) β π΄) |
36 | 1, 24, 34, 35 | syl3anc 1371 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (πΉβ(πΊβπ)) β π΄) |
37 | 11, 6 | hlatjcom 37424 |
. . . . . 6
β’ ((πΎ β HL β§ (πΉβ(πΊβπ)) β π΄ β§ (πΉβ(πΊβπ)) β π΄) β ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) = ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ)))) |
38 | 30, 33, 36, 37 | syl3anc 1371 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) = ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ)))) |
39 | 11, 6 | hlatjcom 37424 |
. . . . . 6
β’ ((πΎ β HL β§ π β π΄ β§ π β π΄) β (π β¨ π) = (π β¨ π)) |
40 | 30, 31, 34, 39 | syl3anc 1371 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (π β¨ π) = (π β¨ π)) |
41 | 29, 38, 40 | 3netr3d 3018 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π)) |
42 | 5, 11, 12, 6, 7, 8,
13 | cdlemg13a 38707 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (π β¨ (πΉβ(πΊβπ))) = ((πΊβπ) β¨ (πΉβ(πΊβπ)))) |
43 | 1, 16, 4, 24, 27, 28, 41, 42 | syl313anc 1394 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β (π β¨ (πΉβ(πΊβπ))) = ((πΊβπ) β¨ (πΉβ(πΊβπ)))) |
44 | 43 | oveq1d 7322 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β ((π β¨ (πΉβ(πΊβπ))) β§ π) = (((πΊβπ) β¨ (πΉβ(πΊβπ))) β§ π)) |
45 | 21, 23, 44 | 3eqtr4d 2786 |
1
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉ β π β§ πΊ β π) β§ ((πΉβπ) β π β§ (π
βπΉ) = (π
βπΊ) β§ ((πΉβ(πΊβπ)) β¨ (πΉβ(πΊβπ))) β (π β¨ π))) β ((π β¨ (πΉβ(πΊβπ))) β§ π) = ((π β¨ (πΉβ(πΊβπ))) β§ π)) |