Step | Hyp | Ref
| Expression |
1 | | simpl1 1191 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π)) β (πΎ β HL β§ π β π»)) |
2 | | cdlemk3.b |
. . . 4
β’ π΅ = (BaseβπΎ) |
3 | | cdlemk3.h |
. . . 4
β’ π» = (LHypβπΎ) |
4 | | cdlemk3.t |
. . . 4
β’ π = ((LTrnβπΎ)βπ) |
5 | | cdlemk3.r |
. . . 4
β’ π
= ((trLβπΎ)βπ) |
6 | 2, 3, 4, 5 | cdlemftr2 39425 |
. . 3
β’ ((πΎ β HL β§ π β π») β βπ₯ β π (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ))) |
7 | 1, 6 | syl 17 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π)) β βπ₯ β π (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ))) |
8 | | simp3r 1202 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ))) |
9 | | simp11 1203 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β (πΎ β HL β§ π β π»)) |
10 | | simp133 1310 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β (π
βπΉ) = (π
βπ)) |
11 | | simp131 1308 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β πΊ β π) |
12 | | simp121 1305 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β πΉ β π) |
13 | | simp3l 1201 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β π₯ β π) |
14 | | simp123 1307 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β π β π) |
15 | | simp3r2 1282 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β (π
βπ₯) β (π
βπΉ)) |
16 | | simp3r3 1283 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β (π
βπ₯) β (π
βπΊ)) |
17 | 15, 16 | jca 512 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β ((π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ))) |
18 | | simp122 1306 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β πΉ β ( I βΎ π΅)) |
19 | | simp132 1309 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β πΊ β ( I βΎ π΅)) |
20 | | simp3r1 1281 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β π₯ β ( I βΎ π΅)) |
21 | 18, 19, 20 | 3jca 1128 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β (πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π₯ β ( I βΎ π΅))) |
22 | | simp2 1137 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β (π β π΄ β§ Β¬ π β€ π)) |
23 | | cdlemk3.l |
. . . . . . . 8
β’ β€ =
(leβπΎ) |
24 | | cdlemk3.j |
. . . . . . . 8
β’ β¨ =
(joinβπΎ) |
25 | | cdlemk3.m |
. . . . . . . 8
β’ β§ =
(meetβπΎ) |
26 | | cdlemk3.a |
. . . . . . . 8
β’ π΄ = (AtomsβπΎ) |
27 | | cdlemk3.s |
. . . . . . . 8
β’ π = (π β π β¦ (β©π β π (πβπ) = ((π β¨ (π
βπ)) β§ ((πβπ) β¨ (π
β(π β β‘πΉ)))))) |
28 | | cdlemk3.u1 |
. . . . . . . 8
β’ π = (π β π, π β π β¦ (β©π β π (πβπ) = ((π β¨ (π
βπ)) β§ (((πβπ)βπ) β¨ (π
β(π β β‘π)))))) |
29 | 2, 23, 24, 25, 26, 3, 4, 5, 27,
28 | cdlemkuel-3 39757 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (π
βπΉ) = (π
βπ) β§ πΊ β π) β§ (πΉ β π β§ π₯ β π β§ π β π) β§ (((π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)) β§ (πΉ β ( I βΎ π΅) β§ πΊ β ( I βΎ π΅) β§ π₯ β ( I βΎ π΅)) β§ (π β π΄ β§ Β¬ π β€ π))) β (π₯ππΊ) β π) |
30 | 9, 10, 11, 12, 13, 14, 17, 21, 22, 29 | syl333anc 1402 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β (π₯ππΊ) β π) |
31 | 8, 30 | jca 512 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π) β§ (π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)))) β ((π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)) β§ (π₯ππΊ) β π)) |
32 | 31 | 3expia 1121 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π)) β ((π₯ β π β§ (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ))) β ((π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)) β§ (π₯ππΊ) β π))) |
33 | 32 | expd 416 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π)) β (π₯ β π β ((π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)) β ((π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)) β§ (π₯ππΊ) β π)))) |
34 | 33 | reximdvai 3165 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π)) β (βπ₯ β π (π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)) β βπ₯ β π ((π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)) β§ (π₯ππΊ) β π))) |
35 | 7, 34 | mpd 15 |
1
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ πΉ β ( I βΎ π΅) β§ π β π) β§ (πΊ β π β§ πΊ β ( I βΎ π΅) β§ (π
βπΉ) = (π
βπ))) β§ (π β π΄ β§ Β¬ π β€ π)) β βπ₯ β π ((π₯ β ( I βΎ π΅) β§ (π
βπ₯) β (π
βπΉ) β§ (π
βπ₯) β (π
βπΊ)) β§ (π₯ππΊ) β π)) |