Step | Hyp | Ref
| Expression |
1 | | lplnle.b |
. . . 4
β’ π΅ = (BaseβπΎ) |
2 | | lplnle.l |
. . . 4
β’ β€ =
(leβπΎ) |
3 | | lplnle.z |
. . . 4
β’ 0 =
(0.βπΎ) |
4 | | lplnle.a |
. . . 4
β’ π΄ = (AtomsβπΎ) |
5 | | lplnle.n |
. . . 4
β’ π = (LLinesβπΎ) |
6 | 1, 2, 3, 4, 5 | llnle 38377 |
. . 3
β’ (((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄)) β βπ§ β π π§ β€ π) |
7 | 6 | 3adantr3 1171 |
. 2
β’ (((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β βπ§ β π π§ β€ π) |
8 | | simp1ll 1236 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β πΎ β HL) |
9 | 1, 5 | llnbase 38368 |
. . . . . . 7
β’ (π§ β π β π§ β π΅) |
10 | 9 | 3ad2ant2 1134 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β π§ β π΅) |
11 | | simp1lr 1237 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β π β π΅) |
12 | | simp3 1138 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β π§ β€ π) |
13 | | simp2 1137 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β π§ β π) |
14 | | simp1r3 1271 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β Β¬ π β π) |
15 | | nelne2 3040 |
. . . . . . . 8
β’ ((π§ β π β§ Β¬ π β π) β π§ β π) |
16 | 13, 14, 15 | syl2anc 584 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β π§ β π) |
17 | | eqid 2732 |
. . . . . . . . 9
β’
(ltβπΎ) =
(ltβπΎ) |
18 | 2, 17 | pltval 18281 |
. . . . . . . 8
β’ ((πΎ β HL β§ π§ β π β§ π β π΅) β (π§(ltβπΎ)π β (π§ β€ π β§ π§ β π))) |
19 | 8, 13, 11, 18 | syl3anc 1371 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β (π§(ltβπΎ)π β (π§ β€ π β§ π§ β π))) |
20 | 12, 16, 19 | mpbir2and 711 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β π§(ltβπΎ)π) |
21 | | eqid 2732 |
. . . . . . 7
β’
(joinβπΎ) =
(joinβπΎ) |
22 | | eqid 2732 |
. . . . . . 7
β’ ( β
βπΎ) = ( β
βπΎ) |
23 | 1, 2, 17, 21, 22, 4 | hlrelat3 38271 |
. . . . . 6
β’ (((πΎ β HL β§ π§ β π΅ β§ π β π΅) β§ π§(ltβπΎ)π) β βπ β π΄ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) |
24 | 8, 10, 11, 20, 23 | syl31anc 1373 |
. . . . 5
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β βπ β π΄ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) |
25 | | simp1ll 1236 |
. . . . . . . . . . 11
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β πΎ β HL) |
26 | 25 | hllatd 38222 |
. . . . . . . . . . . 12
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β πΎ β Lat) |
27 | | simp21 1206 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β π§ β π) |
28 | 27, 9 | syl 17 |
. . . . . . . . . . . 12
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β π§ β π΅) |
29 | | simp23 1208 |
. . . . . . . . . . . . 13
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β π β π΄) |
30 | 1, 4 | atbase 38147 |
. . . . . . . . . . . . 13
β’ (π β π΄ β π β π΅) |
31 | 29, 30 | syl 17 |
. . . . . . . . . . . 12
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β π β π΅) |
32 | 1, 21 | latjcl 18388 |
. . . . . . . . . . . 12
β’ ((πΎ β Lat β§ π§ β π΅ β§ π β π΅) β (π§(joinβπΎ)π) β π΅) |
33 | 26, 28, 31, 32 | syl3anc 1371 |
. . . . . . . . . . 11
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β (π§(joinβπΎ)π) β π΅) |
34 | | simp3l 1201 |
. . . . . . . . . . 11
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β π§( β βπΎ)(π§(joinβπΎ)π)) |
35 | | lplnle.p |
. . . . . . . . . . . 12
β’ π = (LPlanesβπΎ) |
36 | 1, 22, 5, 35 | lplni 38391 |
. . . . . . . . . . 11
β’ (((πΎ β HL β§ (π§(joinβπΎ)π) β π΅ β§ π§ β π) β§ π§( β βπΎ)(π§(joinβπΎ)π)) β (π§(joinβπΎ)π) β π) |
37 | 25, 33, 27, 34, 36 | syl31anc 1373 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β (π§(joinβπΎ)π) β π) |
38 | | simp3r 1202 |
. . . . . . . . . 10
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β (π§(joinβπΎ)π) β€ π) |
39 | | breq1 5150 |
. . . . . . . . . . 11
β’ (π¦ = (π§(joinβπΎ)π) β (π¦ β€ π β (π§(joinβπΎ)π) β€ π)) |
40 | 39 | rspcev 3612 |
. . . . . . . . . 10
β’ (((π§(joinβπΎ)π) β π β§ (π§(joinβπΎ)π) β€ π) β βπ¦ β π π¦ β€ π) |
41 | 37, 38, 40 | syl2anc 584 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ (π§ β π β§ π§ β€ π β§ π β π΄) β§ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π)) β βπ¦ β π π¦ β€ π) |
42 | 41 | 3exp 1119 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β ((π§ β π β§ π§ β€ π β§ π β π΄) β ((π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π) β βπ¦ β π π¦ β€ π))) |
43 | 42 | 3expd 1353 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β (π§ β π β (π§ β€ π β (π β π΄ β ((π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π) β βπ¦ β π π¦ β€ π))))) |
44 | 43 | 3imp 1111 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β (π β π΄ β ((π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π) β βπ¦ β π π¦ β€ π))) |
45 | 44 | rexlimdv 3153 |
. . . . 5
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β (βπ β π΄ (π§( β βπΎ)(π§(joinβπΎ)π) β§ (π§(joinβπΎ)π) β€ π) β βπ¦ β π π¦ β€ π)) |
46 | 24, 45 | mpd 15 |
. . . 4
β’ ((((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β§ π§ β π β§ π§ β€ π) β βπ¦ β π π¦ β€ π) |
47 | 46 | 3exp 1119 |
. . 3
β’ (((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β (π§ β π β (π§ β€ π β βπ¦ β π π¦ β€ π))) |
48 | 47 | rexlimdv 3153 |
. 2
β’ (((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β (βπ§ β π π§ β€ π β βπ¦ β π π¦ β€ π)) |
49 | 7, 48 | mpd 15 |
1
β’ (((πΎ β HL β§ π β π΅) β§ (π β 0 β§ Β¬ π β π΄ β§ Β¬ π β π)) β βπ¦ β π π¦ β€ π) |