Step | Hyp | Ref
| Expression |
1 | | simpll1 1212 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β§ πΉ β π) β (πΎ β HL β§ π β π»)) |
2 | | simpll2 1213 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β§ πΉ β π) β (π β π΄ β§ Β¬ π β€ π)) |
3 | | simpr 485 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β§ πΉ β π) β πΉ β π) |
4 | | cdlemg1c.l |
. . . . 5
β’ β€ =
(leβπΎ) |
5 | | cdlemg1c.a |
. . . . 5
β’ π΄ = (AtomsβπΎ) |
6 | | cdlemg1c.h |
. . . . 5
β’ π» = (LHypβπΎ) |
7 | | cdlemg1c.t |
. . . . 5
β’ π = ((LTrnβπΎ)βπ) |
8 | 4, 5, 6, 7 | cdlemeiota 39451 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ πΉ β π) β πΉ = (β©π β π (πβπ) = (πΉβπ))) |
9 | 1, 2, 3, 8 | syl3anc 1371 |
. . 3
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β§ πΉ β π) β πΉ = (β©π β π (πβπ) = (πΉβπ))) |
10 | | simplr 767 |
. . . . 5
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β§ πΉ β π) β (πΉβπ) = π) |
11 | 10 | eqeq2d 2743 |
. . . 4
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β§ πΉ β π) β ((πβπ) = (πΉβπ) β (πβπ) = π)) |
12 | 11 | riotabidv 7366 |
. . 3
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β§ πΉ β π) β (β©π β π (πβπ) = (πΉβπ)) = (β©π β π (πβπ) = π)) |
13 | 9, 12 | eqtrd 2772 |
. 2
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β§ πΉ β π) β πΉ = (β©π β π (πβπ) = π)) |
14 | 4, 5, 6, 7 | cdlemg1ci2 39452 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ πΉ = (β©π β π (πβπ) = π)) β πΉ β π) |
15 | 14 | adantlr 713 |
. 2
β’
(((((πΎ β HL
β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β§ πΉ = (β©π β π (πβπ) = π)) β πΉ β π) |
16 | 13, 15 | impbida 799 |
1
β’ ((((πΎ β HL β§ π β π») β§ (π β π΄ β§ Β¬ π β€ π) β§ (π β π΄ β§ Β¬ π β€ π)) β§ (πΉβπ) = π) β (πΉ β π β πΉ = (β©π β π (πβπ) = π))) |