Step | Hyp | Ref
| Expression |
1 | | simp1 1136 |
. . 3
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β πΎ β HL) |
2 | | simp21 1206 |
. . 3
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β π β π΄) |
3 | | simp23 1208 |
. . 3
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β π β π΅) |
4 | | simp22 1207 |
. . 3
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β π β π΅) |
5 | | simp3 1138 |
. . 3
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β π β€ π) |
6 | | atmod.b |
. . . 4
β’ π΅ = (BaseβπΎ) |
7 | | atmod.l |
. . . 4
β’ β€ =
(leβπΎ) |
8 | | atmod.j |
. . . 4
β’ β¨ =
(joinβπΎ) |
9 | | atmod.m |
. . . 4
β’ β§ =
(meetβπΎ) |
10 | | atmod.a |
. . . 4
β’ π΄ = (AtomsβπΎ) |
11 | 6, 7, 8, 9, 10 | atmod1i1 39031 |
. . 3
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β (π β¨ (π β§ π)) = ((π β¨ π) β§ π)) |
12 | 1, 2, 3, 4, 5, 11 | syl131anc 1383 |
. 2
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β (π β¨ (π β§ π)) = ((π β¨ π) β§ π)) |
13 | | hllat 38536 |
. . . . 5
β’ (πΎ β HL β πΎ β Lat) |
14 | 13 | 3ad2ant1 1133 |
. . . 4
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β πΎ β Lat) |
15 | 6, 9 | latmcom 18420 |
. . . 4
β’ ((πΎ β Lat β§ π β π΅ β§ π β π΅) β (π β§ π) = (π β§ π)) |
16 | 14, 4, 3, 15 | syl3anc 1371 |
. . 3
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β (π β§ π) = (π β§ π)) |
17 | 16 | oveq2d 7427 |
. 2
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β (π β¨ (π β§ π)) = (π β¨ (π β§ π))) |
18 | 6, 10 | atbase 38462 |
. . . . 5
β’ (π β π΄ β π β π΅) |
19 | 2, 18 | syl 17 |
. . . 4
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β π β π΅) |
20 | 6, 8 | latjcl 18396 |
. . . 4
β’ ((πΎ β Lat β§ π β π΅ β§ π β π΅) β (π β¨ π) β π΅) |
21 | 14, 19, 3, 20 | syl3anc 1371 |
. . 3
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β (π β¨ π) β π΅) |
22 | 6, 9 | latmcom 18420 |
. . 3
β’ ((πΎ β Lat β§ π β π΅ β§ (π β¨ π) β π΅) β (π β§ (π β¨ π)) = ((π β¨ π) β§ π)) |
23 | 14, 4, 21, 22 | syl3anc 1371 |
. 2
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β (π β§ (π β¨ π)) = ((π β¨ π) β§ π)) |
24 | 12, 17, 23 | 3eqtr4d 2782 |
1
β’ ((πΎ β HL β§ (π β π΄ β§ π β π΅ β§ π β π΅) β§ π β€ π) β (π β¨ (π β§ π)) = (π β§ (π β¨ π))) |