Step | Hyp | Ref
| Expression |
1 | | simp1 1137 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π)) |
2 | | simp2 1138 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ))) |
3 | | simp311 1321 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β πΉ β ( I βΎ π΅)) |
4 | | simp312 1322 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β πΊ β ( I βΎ π΅)) |
5 | | simp32 1211 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π
βπΊ) β (π
βπΉ)) |
6 | | simp33 1212 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π
βπ) β (π
βπΉ)) |
7 | 5, 6 | jca 513 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) |
8 | | cdlemk.b |
. . . 4
β’ π΅ = (BaseβπΎ) |
9 | | cdlemk.l |
. . . 4
β’ β€ =
(leβπΎ) |
10 | | cdlemk.j |
. . . 4
β’ β¨ =
(joinβπΎ) |
11 | | cdlemk.a |
. . . 4
β’ π΄ = (AtomsβπΎ) |
12 | | cdlemk.h |
. . . 4
β’ π» = (LHypβπΎ) |
13 | | cdlemk.t |
. . . 4
β’ π = ((LTrnβπΎ)βπ) |
14 | | cdlemk.r |
. . . 4
β’ π
= ((trLβπΎ)βπ) |
15 | | cdlemk.m |
. . . 4
β’ β§ =
(meetβπΎ) |
16 | 8, 9, 10, 11, 12, 13, 14, 15 | cdlemk6 39646 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ (πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ ((π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ)))) β ((π β¨ (πΊβπ)) β§ ((πβπ) β¨ (π
β(πΊ β β‘πΉ)))) β€ ((((πΊβπ) β¨ (πβπ)) β§ ((π
β(πΊ β β‘πΉ)) β¨ (π
β(π β β‘πΉ)))) β¨ (((πβπ) β¨ π) β§ ((π
β(π β β‘πΉ)) β¨ (πβπ))))) |
17 | 1, 2, 3, 4, 7, 16 | syl113anc 1383 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((π β¨ (πΊβπ)) β§ ((πβπ) β¨ (π
β(πΊ β β‘πΉ)))) β€ ((((πΊβπ) β¨ (πβπ)) β§ ((π
β(πΊ β β‘πΉ)) β¨ (π
β(π β β‘πΉ)))) β¨ (((πβπ) β¨ π) β§ ((π
β(π β β‘πΉ)) β¨ (πβπ))))) |
18 | | simp21l 1291 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β π β π) |
19 | | simp22 1208 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π β π΄ β§ Β¬ π β€ π)) |
20 | | simp23 1209 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π
βπΉ) = (π
βπ)) |
21 | 18, 19, 20 | 3jca 1129 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π β π β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ))) |
22 | | cdlemk.s |
. . . . 5
β’ π = (π β π β¦ (β©π β π (πβπ) = ((π β¨ (π
βπ)) β§ ((πβπ) β¨ (π
β(π β β‘πΉ)))))) |
23 | 8, 9, 10, 11, 12, 13, 14, 15, 22 | cdlemksv2 39656 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ (π β π β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ (πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ (π
βπΊ) β (π
βπΉ))) β ((πβπΊ)βπ) = ((π β¨ (π
βπΊ)) β§ ((πβπ) β¨ (π
β(πΊ β β‘πΉ))))) |
24 | 1, 21, 3, 4, 5, 23 | syl113anc 1383 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πβπΊ)βπ) = ((π β¨ (π
βπΊ)) β§ ((πβπ) β¨ (π
β(πΊ β β‘πΉ))))) |
25 | | simp11 1204 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (πΎ β HL β§ π β π»)) |
26 | | simp13 1206 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β πΊ β π) |
27 | 9, 10, 11, 12, 13, 14 | trljat1 38975 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ πΊ β π β§ (π β π΄ β§ Β¬ π β€ π)) β (π β¨ (π
βπΊ)) = (π β¨ (πΊβπ))) |
28 | 25, 26, 19, 27 | syl3anc 1372 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π β¨ (π
βπΊ)) = (π β¨ (πΊβπ))) |
29 | 28 | oveq1d 7419 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((π β¨ (π
βπΊ)) β§ ((πβπ) β¨ (π
β(πΊ β β‘πΉ)))) = ((π β¨ (πΊβπ)) β§ ((πβπ) β¨ (π
β(πΊ β β‘πΉ))))) |
30 | 24, 29 | eqtrd 2773 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πβπΊ)βπ) = ((π β¨ (πΊβπ)) β§ ((πβπ) β¨ (π
β(πΊ β β‘πΉ))))) |
31 | | simp11l 1285 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β πΎ β HL) |
32 | 31 | hllatd 38172 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β πΎ β Lat) |
33 | | simp12 1205 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β πΉ β π) |
34 | | simp21r 1292 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β π β π) |
35 | 25, 33, 34 | 3jca 1129 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πΎ β HL β§ π β π») β§ πΉ β π β§ π β π)) |
36 | | simp313 1323 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β π β ( I βΎ π΅)) |
37 | 8, 9, 10, 11, 12, 13, 14, 15, 22 | cdlemksat 39655 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ π β π) β§ (π β π β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ (πΉ β ( I βΎ π΅) β§ π β ( I βΎ π΅) β§ (π
βπ) β (π
βπΉ))) β ((πβπ)βπ) β π΄) |
38 | 35, 21, 3, 36, 6, 37 | syl113anc 1383 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πβπ)βπ) β π΄) |
39 | 8, 11 | atbase 38097 |
. . . . 5
β’ (((πβπ)βπ) β π΄ β ((πβπ)βπ) β π΅) |
40 | 38, 39 | syl 17 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πβπ)βπ) β π΅) |
41 | | simp11r 1286 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β π β π») |
42 | | simp22l 1293 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β π β π΄) |
43 | | cdlemk.v |
. . . . . 6
β’ π = (((πΊβπ) β¨ (πβπ)) β§ ((π
β(πΊ β β‘πΉ)) β¨ (π
β(π β β‘πΉ)))) |
44 | 8, 9, 10, 11, 12, 13, 14, 15, 43 | cdlemkvcl 39651 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΊ β π β§ π β π) β§ π β π΄) β π β π΅) |
45 | 31, 41, 33, 26, 34, 42, 44 | syl231anc 1391 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β π β π΅) |
46 | 8, 10 | latjcom 18396 |
. . . 4
β’ ((πΎ β Lat β§ ((πβπ)βπ) β π΅ β§ π β π΅) β (((πβπ)βπ) β¨ π) = (π β¨ ((πβπ)βπ))) |
47 | 32, 40, 45, 46 | syl3anc 1372 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (((πβπ)βπ) β¨ π) = (π β¨ ((πβπ)βπ))) |
48 | 43 | a1i 11 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β π = (((πΊβπ) β¨ (πβπ)) β§ ((π
β(πΊ β β‘πΉ)) β¨ (π
β(π β β‘πΉ))))) |
49 | 8, 9, 10, 11, 12, 13, 14, 15, 22 | cdlemksv2 39656 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ π β π) β§ (π β π β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ (πΉ β ( I βΎ π΅) β§ π β ( I βΎ π΅) β§ (π
βπ) β (π
βπΉ))) β ((πβπ)βπ) = ((π β¨ (π
βπ)) β§ ((πβπ) β¨ (π
β(π β β‘πΉ))))) |
50 | 35, 21, 3, 36, 6, 49 | syl113anc 1383 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πβπ)βπ) = ((π β¨ (π
βπ)) β§ ((πβπ) β¨ (π
β(π β β‘πΉ))))) |
51 | 9, 10, 11, 12, 13, 14 | trljat1 38975 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ π β π β§ (π β π΄ β§ Β¬ π β€ π)) β (π β¨ (π
βπ)) = (π β¨ (πβπ))) |
52 | 25, 34, 19, 51 | syl3anc 1372 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π β¨ (π
βπ)) = (π β¨ (πβπ))) |
53 | 9, 11, 12, 13 | ltrnat 38949 |
. . . . . . . . 9
β’ (((πΎ β HL β§ π β π») β§ π β π β§ π β π΄) β (πβπ) β π΄) |
54 | 25, 34, 42, 53 | syl3anc 1372 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (πβπ) β π΄) |
55 | 10, 11 | hlatjcom 38176 |
. . . . . . . 8
β’ ((πΎ β HL β§ (πβπ) β π΄ β§ π β π΄) β ((πβπ) β¨ π) = (π β¨ (πβπ))) |
56 | 31, 54, 42, 55 | syl3anc 1372 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πβπ) β¨ π) = (π β¨ (πβπ))) |
57 | 52, 56 | eqtr4d 2776 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π β¨ (π
βπ)) = ((πβπ) β¨ π)) |
58 | 9, 11, 12, 13 | ltrnat 38949 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ π β π β§ π β π΄) β (πβπ) β π΄) |
59 | 25, 18, 42, 58 | syl3anc 1372 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (πβπ) β π΄) |
60 | 34, 33 | jca 513 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π β π β§ πΉ β π)) |
61 | 11, 12, 13, 14 | trlcocnvat 39533 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ (π β π β§ πΉ β π) β§ (π
βπ) β (π
βπΉ)) β (π
β(π β β‘πΉ)) β π΄) |
62 | 25, 60, 6, 61 | syl3anc 1372 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π
β(π β β‘πΉ)) β π΄) |
63 | 10, 11 | hlatjcom 38176 |
. . . . . . 7
β’ ((πΎ β HL β§ (πβπ) β π΄ β§ (π
β(π β β‘πΉ)) β π΄) β ((πβπ) β¨ (π
β(π β β‘πΉ))) = ((π
β(π β β‘πΉ)) β¨ (πβπ))) |
64 | 31, 59, 62, 63 | syl3anc 1372 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πβπ) β¨ (π
β(π β β‘πΉ))) = ((π
β(π β β‘πΉ)) β¨ (πβπ))) |
65 | 57, 64 | oveq12d 7422 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((π β¨ (π
βπ)) β§ ((πβπ) β¨ (π
β(π β β‘πΉ)))) = (((πβπ) β¨ π) β§ ((π
β(π β β‘πΉ)) β¨ (πβπ)))) |
66 | 50, 65 | eqtrd 2773 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πβπ)βπ) = (((πβπ) β¨ π) β§ ((π
β(π β β‘πΉ)) β¨ (πβπ)))) |
67 | 48, 66 | oveq12d 7422 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (π β¨ ((πβπ)βπ)) = ((((πΊβπ) β¨ (πβπ)) β§ ((π
β(πΊ β β‘πΉ)) β¨ (π
β(π β β‘πΉ)))) β¨ (((πβπ) β¨ π) β§ ((π
β(π β β‘πΉ)) β¨ (πβπ))))) |
68 | 47, 67 | eqtrd 2773 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β (((πβπ)βπ) β¨ π) = ((((πΊβπ) β¨ (πβπ)) β§ ((π
β(πΊ β β‘πΉ)) β¨ (π
β(π β β‘πΉ)))) β¨ (((πβπ) β¨ π) β§ ((π
β(π β β‘πΉ)) β¨ (πβπ))))) |
69 | 17, 30, 68 | 3brtr4d 5179 |
1
β’ ((((πΎ β HL β§ π β π») β§ πΉ β π β§ πΊ β π) β§ ((π β π β§ π β π) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π
βπΉ) = (π
βπ)) β§ ((πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π β ( I βΎ π΅)) β§ (π
βπΊ) β (π
βπΉ) β§ (π
βπ) β (π
βπΉ))) β ((πβπΊ)βπ) β€ (((πβπ)βπ) β¨ π)) |