Step | Hyp | Ref
| Expression |
1 | | dalema.ph |
. . . . 5
β’ (π β (((πΎ β HL β§ πΆ β (BaseβπΎ)) β§ (π β π΄ β§ π β π΄ β§ π
β π΄) β§ (π β π΄ β§ π β π΄ β§ π β π΄)) β§ (π β π β§ π β π) β§ ((Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π
) β§ Β¬ πΆ β€ (π
β¨ π)) β§ (Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π)) β§ (πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π) β§ πΆ β€ (π
β¨ π))))) |
2 | | dalemc.l |
. . . . 5
β’ β€ =
(leβπΎ) |
3 | | dalemc.j |
. . . . 5
β’ β¨ =
(joinβπΎ) |
4 | | dalemc.a |
. . . . 5
β’ π΄ = (AtomsβπΎ) |
5 | 1, 2, 3, 4 | dalemswapyz 38515 |
. . . 4
β’ (π β (((πΎ β HL β§ πΆ β (BaseβπΎ)) β§ (π β π΄ β§ π β π΄ β§ π β π΄) β§ (π β π΄ β§ π β π΄ β§ π
β π΄)) β§ (π β π β§ π β π) β§ ((Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π)) β§ (Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π
) β§ Β¬ πΆ β€ (π
β¨ π)) β§ (πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π
))))) |
6 | 5 | adantr 481 |
. . 3
β’ ((π β§ π· β π) β (((πΎ β HL β§ πΆ β (BaseβπΎ)) β§ (π β π΄ β§ π β π΄ β§ π β π΄) β§ (π β π΄ β§ π β π΄ β§ π
β π΄)) β§ (π β π β§ π β π) β§ ((Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π)) β§ (Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π
) β§ Β¬ πΆ β€ (π
β¨ π)) β§ (πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π
))))) |
7 | | dalem3.d |
. . . . . 6
β’ π· = ((π β¨ π) β§ (π β¨ π)) |
8 | 1 | dalemkelat 38483 |
. . . . . . 7
β’ (π β πΎ β Lat) |
9 | 1, 3, 4 | dalempjqeb 38504 |
. . . . . . 7
β’ (π β (π β¨ π) β (BaseβπΎ)) |
10 | 1, 3, 4 | dalemsjteb 38505 |
. . . . . . 7
β’ (π β (π β¨ π) β (BaseβπΎ)) |
11 | | eqid 2732 |
. . . . . . . 8
β’
(BaseβπΎ) =
(BaseβπΎ) |
12 | | dalem3.m |
. . . . . . . 8
β’ β§ =
(meetβπΎ) |
13 | 11, 12 | latmcom 18412 |
. . . . . . 7
β’ ((πΎ β Lat β§ (π β¨ π) β (BaseβπΎ) β§ (π β¨ π) β (BaseβπΎ)) β ((π β¨ π) β§ (π β¨ π)) = ((π β¨ π) β§ (π β¨ π))) |
14 | 8, 9, 10, 13 | syl3anc 1371 |
. . . . . 6
β’ (π β ((π β¨ π) β§ (π β¨ π)) = ((π β¨ π) β§ (π β¨ π))) |
15 | 7, 14 | eqtrid 2784 |
. . . . 5
β’ (π β π· = ((π β¨ π) β§ (π β¨ π))) |
16 | 15 | neeq1d 3000 |
. . . 4
β’ (π β (π· β π β ((π β¨ π) β§ (π β¨ π)) β π)) |
17 | 16 | biimpa 477 |
. . 3
β’ ((π β§ π· β π) β ((π β¨ π) β§ (π β¨ π)) β π) |
18 | | biid 260 |
. . . 4
β’ ((((πΎ β HL β§ πΆ β (BaseβπΎ)) β§ (π β π΄ β§ π β π΄ β§ π β π΄) β§ (π β π΄ β§ π β π΄ β§ π
β π΄)) β§ (π β π β§ π β π) β§ ((Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π)) β§ (Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π
) β§ Β¬ πΆ β€ (π
β¨ π)) β§ (πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π
)))) β (((πΎ β HL β§ πΆ β (BaseβπΎ)) β§ (π β π΄ β§ π β π΄ β§ π β π΄) β§ (π β π΄ β§ π β π΄ β§ π
β π΄)) β§ (π β π β§ π β π) β§ ((Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π)) β§ (Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π
) β§ Β¬ πΆ β€ (π
β¨ π)) β§ (πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π
))))) |
19 | | dalem3.o |
. . . 4
β’ π = (LPlanesβπΎ) |
20 | | dalem3.z |
. . . 4
β’ π = ((π β¨ π) β¨ π) |
21 | | dalem3.y |
. . . 4
β’ π = ((π β¨ π) β¨ π
) |
22 | | eqid 2732 |
. . . 4
β’ ((π β¨ π) β§ (π β¨ π)) = ((π β¨ π) β§ (π β¨ π)) |
23 | | eqid 2732 |
. . . 4
β’ ((π β¨ π) β§ (π β¨ π
)) = ((π β¨ π) β§ (π β¨ π
)) |
24 | 18, 2, 3, 4, 12, 19, 20, 21, 22, 23 | dalem3 38523 |
. . 3
β’
(((((πΎ β HL
β§ πΆ β
(BaseβπΎ)) β§
(π β π΄ β§ π β π΄ β§ π β π΄) β§ (π β π΄ β§ π β π΄ β§ π
β π΄)) β§ (π β π β§ π β π) β§ ((Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π)) β§ (Β¬ πΆ β€ (π β¨ π) β§ Β¬ πΆ β€ (π β¨ π
) β§ Β¬ πΆ β€ (π
β¨ π)) β§ (πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π) β§ πΆ β€ (π β¨ π
)))) β§ ((π β¨ π) β§ (π β¨ π)) β π) β ((π β¨ π) β§ (π β¨ π)) β ((π β¨ π) β§ (π β¨ π
))) |
25 | 6, 17, 24 | syl2anc 584 |
. 2
β’ ((π β§ π· β π) β ((π β¨ π) β§ (π β¨ π)) β ((π β¨ π) β§ (π β¨ π
))) |
26 | 15 | adantr 481 |
. 2
β’ ((π β§ π· β π) β π· = ((π β¨ π) β§ (π β¨ π))) |
27 | | dalem3.e |
. . . 4
β’ πΈ = ((π β¨ π
) β§ (π β¨ π)) |
28 | 1 | dalemkehl 38482 |
. . . . . 6
β’ (π β πΎ β HL) |
29 | 1 | dalemqea 38486 |
. . . . . 6
β’ (π β π β π΄) |
30 | 1 | dalemrea 38487 |
. . . . . 6
β’ (π β π
β π΄) |
31 | 11, 3, 4 | hlatjcl 38225 |
. . . . . 6
β’ ((πΎ β HL β§ π β π΄ β§ π
β π΄) β (π β¨ π
) β (BaseβπΎ)) |
32 | 28, 29, 30, 31 | syl3anc 1371 |
. . . . 5
β’ (π β (π β¨ π
) β (BaseβπΎ)) |
33 | 1, 3, 4 | dalemtjueb 38506 |
. . . . 5
β’ (π β (π β¨ π) β (BaseβπΎ)) |
34 | 11, 12 | latmcom 18412 |
. . . . 5
β’ ((πΎ β Lat β§ (π β¨ π
) β (BaseβπΎ) β§ (π β¨ π) β (BaseβπΎ)) β ((π β¨ π
) β§ (π β¨ π)) = ((π β¨ π) β§ (π β¨ π
))) |
35 | 8, 32, 33, 34 | syl3anc 1371 |
. . . 4
β’ (π β ((π β¨ π
) β§ (π β¨ π)) = ((π β¨ π) β§ (π β¨ π
))) |
36 | 27, 35 | eqtrid 2784 |
. . 3
β’ (π β πΈ = ((π β¨ π) β§ (π β¨ π
))) |
37 | 36 | adantr 481 |
. 2
β’ ((π β§ π· β π) β πΈ = ((π β¨ π) β§ (π β¨ π
))) |
38 | 25, 26, 37 | 3netr4d 3018 |
1
β’ ((π β§ π· β π) β π· β πΈ) |