Step | Hyp | Ref
| Expression |
1 | | simpl1l 1225 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) β (AtomsβπΎ)) β πΎ β HL) |
2 | | hlop 38170 |
. . . . . . 7
β’ (πΎ β HL β πΎ β OP) |
3 | 1, 2 | syl 17 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) β (AtomsβπΎ)) β πΎ β OP) |
4 | | simpl1 1192 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) β (AtomsβπΎ)) β (πΎ β HL β§ π β π»)) |
5 | | simpl2r 1228 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) β (AtomsβπΎ)) β π β π) |
6 | | eqid 2733 |
. . . . . . . 8
β’
(BaseβπΎ) =
(BaseβπΎ) |
7 | | tendoex.h |
. . . . . . . 8
β’ π» = (LHypβπΎ) |
8 | | tendoex.t |
. . . . . . . 8
β’ π = ((LTrnβπΎ)βπ) |
9 | | tendoex.r |
. . . . . . . 8
β’ π
= ((trLβπΎ)βπ) |
10 | 6, 7, 8, 9 | trlcl 38973 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ π β π) β (π
βπ) β (BaseβπΎ)) |
11 | 4, 5, 10 | syl2anc 585 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) β (AtomsβπΎ)) β (π
βπ) β (BaseβπΎ)) |
12 | | simpr 486 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) β (AtomsβπΎ)) β (π
βπΉ) β (AtomsβπΎ)) |
13 | | simpl3 1194 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) β (AtomsβπΎ)) β (π
βπ) β€ (π
βπΉ)) |
14 | | tendoex.l |
. . . . . . 7
β’ β€ =
(leβπΎ) |
15 | | eqid 2733 |
. . . . . . 7
β’
(0.βπΎ) =
(0.βπΎ) |
16 | | eqid 2733 |
. . . . . . 7
β’
(AtomsβπΎ) =
(AtomsβπΎ) |
17 | 6, 14, 15, 16 | leat 38101 |
. . . . . 6
β’ (((πΎ β OP β§ (π
βπ) β (BaseβπΎ) β§ (π
βπΉ) β (AtomsβπΎ)) β§ (π
βπ) β€ (π
βπΉ)) β ((π
βπ) = (π
βπΉ) β¨ (π
βπ) = (0.βπΎ))) |
18 | 3, 11, 12, 13, 17 | syl31anc 1374 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) β (AtomsβπΎ)) β ((π
βπ) = (π
βπΉ) β¨ (π
βπ) = (0.βπΎ))) |
19 | | simp3 1139 |
. . . . . . . . 9
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β (π
βπ) β€ (π
βπΉ)) |
20 | | breq2 5151 |
. . . . . . . . 9
β’ ((π
βπΉ) = (0.βπΎ) β ((π
βπ) β€ (π
βπΉ) β (π
βπ) β€ (0.βπΎ))) |
21 | 19, 20 | syl5ibcom 244 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β ((π
βπΉ) = (0.βπΎ) β (π
βπ) β€ (0.βπΎ))) |
22 | 21 | imp 408 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) = (0.βπΎ)) β (π
βπ) β€ (0.βπΎ)) |
23 | | simpl1l 1225 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) = (0.βπΎ)) β πΎ β HL) |
24 | 23, 2 | syl 17 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) = (0.βπΎ)) β πΎ β OP) |
25 | | simpl1 1192 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) = (0.βπΎ)) β (πΎ β HL β§ π β π»)) |
26 | | simpl2r 1228 |
. . . . . . . . 9
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) = (0.βπΎ)) β π β π) |
27 | 25, 26, 10 | syl2anc 585 |
. . . . . . . 8
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) = (0.βπΎ)) β (π
βπ) β (BaseβπΎ)) |
28 | 6, 14, 15 | ople0 37995 |
. . . . . . . 8
β’ ((πΎ β OP β§ (π
βπ) β (BaseβπΎ)) β ((π
βπ) β€ (0.βπΎ) β (π
βπ) = (0.βπΎ))) |
29 | 24, 27, 28 | syl2anc 585 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) = (0.βπΎ)) β ((π
βπ) β€ (0.βπΎ) β (π
βπ) = (0.βπΎ))) |
30 | 22, 29 | mpbid 231 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) = (0.βπΎ)) β (π
βπ) = (0.βπΎ)) |
31 | 30 | olcd 873 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β§ (π
βπΉ) = (0.βπΎ)) β ((π
βπ) = (π
βπΉ) β¨ (π
βπ) = (0.βπΎ))) |
32 | | simp1 1137 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β (πΎ β HL β§ π β π»)) |
33 | | simp2l 1200 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β πΉ β π) |
34 | 15, 16, 7, 8, 9 | trlator0 38980 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ πΉ β π) β ((π
βπΉ) β (AtomsβπΎ) β¨ (π
βπΉ) = (0.βπΎ))) |
35 | 32, 33, 34 | syl2anc 585 |
. . . . 5
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β ((π
βπΉ) β (AtomsβπΎ) β¨ (π
βπΉ) = (0.βπΎ))) |
36 | 18, 31, 35 | mpjaodan 958 |
. . . 4
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β ((π
βπ) = (π
βπΉ) β¨ (π
βπ) = (0.βπΎ))) |
37 | 36 | 3expa 1119 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπ) β€ (π
βπΉ)) β ((π
βπ) = (π
βπΉ) β¨ (π
βπ) = (0.βπΎ))) |
38 | | eqcom 2740 |
. . . . 5
β’ ((π
βπ) = (π
βπΉ) β (π
βπΉ) = (π
βπ)) |
39 | | tendoex.e |
. . . . . . 7
β’ πΈ = ((TEndoβπΎ)βπ) |
40 | 7, 8, 9, 39 | cdlemk 39783 |
. . . . . 6
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπΉ) = (π
βπ)) β βπ’ β πΈ (π’βπΉ) = π) |
41 | 40 | 3expa 1119 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπΉ) = (π
βπ)) β βπ’ β πΈ (π’βπΉ) = π) |
42 | 38, 41 | sylan2b 595 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπ) = (π
βπΉ)) β βπ’ β πΈ (π’βπΉ) = π) |
43 | | eqid 2733 |
. . . . . . 7
β’ (β β π β¦ ( I βΎ (BaseβπΎ))) = (β β π β¦ ( I βΎ (BaseβπΎ))) |
44 | 6, 7, 8, 39, 43 | tendo0cl 39599 |
. . . . . 6
β’ ((πΎ β HL β§ π β π») β (β β π β¦ ( I βΎ (BaseβπΎ))) β πΈ) |
45 | 44 | ad2antrr 725 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπ) = (0.βπΎ)) β (β β π β¦ ( I βΎ (BaseβπΎ))) β πΈ) |
46 | | simplrl 776 |
. . . . . . 7
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπ) = (0.βπΎ)) β πΉ β π) |
47 | 43, 6 | tendo02 39596 |
. . . . . . 7
β’ (πΉ β π β ((β β π β¦ ( I βΎ (BaseβπΎ)))βπΉ) = ( I βΎ (BaseβπΎ))) |
48 | 46, 47 | syl 17 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπ) = (0.βπΎ)) β ((β β π β¦ ( I βΎ (BaseβπΎ)))βπΉ) = ( I βΎ (BaseβπΎ))) |
49 | 6, 15, 7, 8, 9 | trlid0b 38987 |
. . . . . . . 8
β’ (((πΎ β HL β§ π β π») β§ π β π) β (π = ( I βΎ (BaseβπΎ)) β (π
βπ) = (0.βπΎ))) |
50 | 49 | adantrl 715 |
. . . . . . 7
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β (π = ( I βΎ (BaseβπΎ)) β (π
βπ) = (0.βπΎ))) |
51 | 50 | biimpar 479 |
. . . . . 6
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπ) = (0.βπΎ)) β π = ( I βΎ (BaseβπΎ))) |
52 | 48, 51 | eqtr4d 2776 |
. . . . 5
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπ) = (0.βπΎ)) β ((β β π β¦ ( I βΎ (BaseβπΎ)))βπΉ) = π) |
53 | | fveq1 6887 |
. . . . . . 7
β’ (π’ = (β β π β¦ ( I βΎ (BaseβπΎ))) β (π’βπΉ) = ((β β π β¦ ( I βΎ (BaseβπΎ)))βπΉ)) |
54 | 53 | eqeq1d 2735 |
. . . . . 6
β’ (π’ = (β β π β¦ ( I βΎ (BaseβπΎ))) β ((π’βπΉ) = π β ((β β π β¦ ( I βΎ (BaseβπΎ)))βπΉ) = π)) |
55 | 54 | rspcev 3612 |
. . . . 5
β’ (((β β π β¦ ( I βΎ (BaseβπΎ))) β πΈ β§ ((β β π β¦ ( I βΎ (BaseβπΎ)))βπΉ) = π) β βπ’ β πΈ (π’βπΉ) = π) |
56 | 45, 52, 55 | syl2anc 585 |
. . . 4
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπ) = (0.βπΎ)) β βπ’ β πΈ (π’βπΉ) = π) |
57 | 42, 56 | jaodan 957 |
. . 3
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ ((π
βπ) = (π
βπΉ) β¨ (π
βπ) = (0.βπΎ))) β βπ’ β πΈ (π’βπΉ) = π) |
58 | 37, 57 | syldan 592 |
. 2
β’ ((((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π)) β§ (π
βπ) β€ (π
βπΉ)) β βπ’ β πΈ (π’βπΉ) = π) |
59 | 58 | 3impa 1111 |
1
β’ (((πΎ β HL β§ π β π») β§ (πΉ β π β§ π β π) β§ (π
βπ) β€ (π
βπΉ)) β βπ’ β πΈ (π’βπΉ) = π) |