Step | Hyp | Ref
| Expression |
1 | | simpl1l 1225 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β πΎ β HL) |
2 | 1 | hllatd 38223 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β πΎ β Lat) |
3 | | simpl2 1193 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β π β π΅) |
4 | | simpl3 1194 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β π β π΅) |
5 | | dihmeetALT.b |
. . . . . 6
β’ π΅ = (BaseβπΎ) |
6 | | dihmeetALT.m |
. . . . . 6
β’ β§ =
(meetβπΎ) |
7 | 5, 6 | latmcom 18413 |
. . . . 5
β’ ((πΎ β Lat β§ π β π΅ β§ π β π΅) β (π β§ π) = (π β§ π)) |
8 | 2, 3, 4, 7 | syl3anc 1372 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β (π β§ π) = (π β§ π)) |
9 | 8 | fveq2d 6893 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β (πΌβ(π β§ π)) = (πΌβ(π β§ π))) |
10 | | simpl1 1192 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β (πΎ β HL β§ π β π»)) |
11 | | simpr 486 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β π(leβπΎ)π) |
12 | | eqid 2733 |
. . . . . 6
β’
(leβπΎ) =
(leβπΎ) |
13 | | dihmeetALT.h |
. . . . . 6
β’ π» = (LHypβπΎ) |
14 | | dihmeetALT.i |
. . . . . 6
β’ πΌ = ((DIsoHβπΎ)βπ) |
15 | 5, 12, 6, 13, 14 | dihmeetbN 40163 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ π β π΅ β§ (π β π΅ β§ π(leβπΎ)π)) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
16 | 10, 4, 3, 11, 15 | syl112anc 1375 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
17 | | incom 4201 |
. . . 4
β’ ((πΌβπ) β© (πΌβπ)) = ((πΌβπ) β© (πΌβπ)) |
18 | 16, 17 | eqtrdi 2789 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
19 | 9, 18 | eqtrd 2773 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ π(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
20 | | simpll1 1213 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ π(leβπΎ)π) β (πΎ β HL β§ π β π»)) |
21 | | simpll2 1214 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ π(leβπΎ)π) β π β π΅) |
22 | | simpll3 1215 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ π(leβπΎ)π) β π β π΅) |
23 | | simpr 486 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ π(leβπΎ)π) β π(leβπΎ)π) |
24 | 5, 12, 6, 13, 14 | dihmeetbN 40163 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ π β π΅ β§ (π β π΅ β§ π(leβπΎ)π)) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
25 | 20, 21, 22, 23, 24 | syl112anc 1375 |
. . . . 5
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ π(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
26 | 25 | adantlr 714 |
. . . 4
β’
((((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π) β§ π(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
27 | | simp1l1 1267 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π β§ Β¬ π(leβπΎ)π) β (πΎ β HL β§ π β π»)) |
28 | | simp1l2 1268 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π β§ Β¬ π(leβπΎ)π) β π β π΅) |
29 | | simp1r 1199 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π β§ Β¬ π(leβπΎ)π) β Β¬ π(leβπΎ)π) |
30 | | simp1l3 1269 |
. . . . . . 7
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π β§ Β¬ π(leβπΎ)π) β π β π΅) |
31 | | simp3 1139 |
. . . . . . 7
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π β§ Β¬ π(leβπΎ)π) β Β¬ π(leβπΎ)π) |
32 | 30, 31 | jca 513 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π β§ Β¬ π(leβπΎ)π) β (π β π΅ β§ Β¬ π(leβπΎ)π)) |
33 | | simp2 1138 |
. . . . . 6
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π β§ Β¬ π(leβπΎ)π) β (π β§ π)(leβπΎ)π) |
34 | | eqid 2733 |
. . . . . . 7
β’
(joinβπΎ) =
(joinβπΎ) |
35 | | eqid 2733 |
. . . . . . 7
β’
(AtomsβπΎ) =
(AtomsβπΎ) |
36 | | eqid 2733 |
. . . . . . 7
β’
((DVecHβπΎ)βπ) = ((DVecHβπΎ)βπ) |
37 | | eqid 2733 |
. . . . . . 7
β’
(LSSumβ((DVecHβπΎ)βπ)) = (LSSumβ((DVecHβπΎ)βπ)) |
38 | 5, 12, 13, 34, 6, 35, 36, 37, 14 | dihmeetlem20N 40186 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ Β¬ π(leβπΎ)π) β§ ((π β π΅ β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π)) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
39 | 27, 28, 29, 32, 33, 38 | syl122anc 1380 |
. . . . 5
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π β§ Β¬ π(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
40 | 39 | 3expa 1119 |
. . . 4
β’
((((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π) β§ Β¬ π(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
41 | 26, 40 | pm2.61dan 812 |
. . 3
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ (π β§ π)(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
42 | | simpll1 1213 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ Β¬ (π β§ π)(leβπΎ)π) β (πΎ β HL β§ π β π»)) |
43 | | simpll2 1214 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ Β¬ (π β§ π)(leβπΎ)π) β π β π΅) |
44 | | simpll3 1215 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ Β¬ (π β§ π)(leβπΎ)π) β π β π΅) |
45 | | simpr 486 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ Β¬ (π β§ π)(leβπΎ)π) β Β¬ (π β§ π)(leβπΎ)π) |
46 | 5, 12, 6, 13, 14 | dihmeetcN 40162 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΅ β§ π β π΅) β§ Β¬ (π β§ π)(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
47 | 42, 43, 44, 45, 46 | syl121anc 1376 |
. . 3
β’
(((((πΎ β HL
β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β§ Β¬ (π β§ π)(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
48 | 41, 47 | pm2.61dan 812 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β§ Β¬ π(leβπΎ)π) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |
49 | 19, 48 | pm2.61dan 812 |
1
β’ (((πΎ β HL β§ π β π») β§ π β π΅ β§ π β π΅) β (πΌβ(π β§ π)) = ((πΌβπ) β© (πΌβπ))) |