Step | Hyp | Ref
| Expression |
1 | | lmhmlsp.v |
. . . . . 6
β’ π = (Baseβπ) |
2 | | eqid 2732 |
. . . . . 6
β’
(Baseβπ) =
(Baseβπ) |
3 | 1, 2 | lmhmf 20644 |
. . . . 5
β’ (πΉ β (π LMHom π) β πΉ:πβΆ(Baseβπ)) |
4 | 3 | adantr 481 |
. . . 4
β’ ((πΉ β (π LMHom π) β§ π β π) β πΉ:πβΆ(Baseβπ)) |
5 | 4 | ffund 6721 |
. . 3
β’ ((πΉ β (π LMHom π) β§ π β π) β Fun πΉ) |
6 | | lmhmlmod1 20643 |
. . . . 5
β’ (πΉ β (π LMHom π) β π β LMod) |
7 | 6 | adantr 481 |
. . . 4
β’ ((πΉ β (π LMHom π) β§ π β π) β π β LMod) |
8 | | lmhmlmod2 20642 |
. . . . . . 7
β’ (πΉ β (π LMHom π) β π β LMod) |
9 | 8 | adantr 481 |
. . . . . 6
β’ ((πΉ β (π LMHom π) β§ π β π) β π β LMod) |
10 | | imassrn 6070 |
. . . . . . 7
β’ (πΉ β π) β ran πΉ |
11 | 4 | frnd 6725 |
. . . . . . 7
β’ ((πΉ β (π LMHom π) β§ π β π) β ran πΉ β (Baseβπ)) |
12 | 10, 11 | sstrid 3993 |
. . . . . 6
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΉ β π) β (Baseβπ)) |
13 | | eqid 2732 |
. . . . . . 7
β’
(LSubSpβπ) =
(LSubSpβπ) |
14 | | lmhmlsp.l |
. . . . . . 7
β’ πΏ = (LSpanβπ) |
15 | 2, 13, 14 | lspcl 20586 |
. . . . . 6
β’ ((π β LMod β§ (πΉ β π) β (Baseβπ)) β (πΏβ(πΉ β π)) β (LSubSpβπ)) |
16 | 9, 12, 15 | syl2anc 584 |
. . . . 5
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΏβ(πΉ β π)) β (LSubSpβπ)) |
17 | | eqid 2732 |
. . . . . 6
β’
(LSubSpβπ) =
(LSubSpβπ) |
18 | 17, 13 | lmhmpreima 20658 |
. . . . 5
β’ ((πΉ β (π LMHom π) β§ (πΏβ(πΉ β π)) β (LSubSpβπ)) β (β‘πΉ β (πΏβ(πΉ β π))) β (LSubSpβπ)) |
19 | 16, 18 | syldan 591 |
. . . 4
β’ ((πΉ β (π LMHom π) β§ π β π) β (β‘πΉ β (πΏβ(πΉ β π))) β (LSubSpβπ)) |
20 | | incom 4201 |
. . . . . . 7
β’ (dom
πΉ β© π) = (π β© dom πΉ) |
21 | | simpr 485 |
. . . . . . . . 9
β’ ((πΉ β (π LMHom π) β§ π β π) β π β π) |
22 | 4 | fdmd 6728 |
. . . . . . . . 9
β’ ((πΉ β (π LMHom π) β§ π β π) β dom πΉ = π) |
23 | 21, 22 | sseqtrrd 4023 |
. . . . . . . 8
β’ ((πΉ β (π LMHom π) β§ π β π) β π β dom πΉ) |
24 | | df-ss 3965 |
. . . . . . . 8
β’ (π β dom πΉ β (π β© dom πΉ) = π) |
25 | 23, 24 | sylib 217 |
. . . . . . 7
β’ ((πΉ β (π LMHom π) β§ π β π) β (π β© dom πΉ) = π) |
26 | 20, 25 | eqtr2id 2785 |
. . . . . 6
β’ ((πΉ β (π LMHom π) β§ π β π) β π = (dom πΉ β© π)) |
27 | | dminss 6152 |
. . . . . 6
β’ (dom
πΉ β© π) β (β‘πΉ β (πΉ β π)) |
28 | 26, 27 | eqsstrdi 4036 |
. . . . 5
β’ ((πΉ β (π LMHom π) β§ π β π) β π β (β‘πΉ β (πΉ β π))) |
29 | 2, 14 | lspssid 20595 |
. . . . . . 7
β’ ((π β LMod β§ (πΉ β π) β (Baseβπ)) β (πΉ β π) β (πΏβ(πΉ β π))) |
30 | 9, 12, 29 | syl2anc 584 |
. . . . . 6
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΉ β π) β (πΏβ(πΉ β π))) |
31 | | imass2 6101 |
. . . . . 6
β’ ((πΉ β π) β (πΏβ(πΉ β π)) β (β‘πΉ β (πΉ β π)) β (β‘πΉ β (πΏβ(πΉ β π)))) |
32 | 30, 31 | syl 17 |
. . . . 5
β’ ((πΉ β (π LMHom π) β§ π β π) β (β‘πΉ β (πΉ β π)) β (β‘πΉ β (πΏβ(πΉ β π)))) |
33 | 28, 32 | sstrd 3992 |
. . . 4
β’ ((πΉ β (π LMHom π) β§ π β π) β π β (β‘πΉ β (πΏβ(πΉ β π)))) |
34 | | lmhmlsp.k |
. . . . 5
β’ πΎ = (LSpanβπ) |
35 | 17, 34 | lspssp 20598 |
. . . 4
β’ ((π β LMod β§ (β‘πΉ β (πΏβ(πΉ β π))) β (LSubSpβπ) β§ π β (β‘πΉ β (πΏβ(πΉ β π)))) β (πΎβπ) β (β‘πΉ β (πΏβ(πΉ β π)))) |
36 | 7, 19, 33, 35 | syl3anc 1371 |
. . 3
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΎβπ) β (β‘πΉ β (πΏβ(πΉ β π)))) |
37 | | funimass2 6631 |
. . 3
β’ ((Fun
πΉ β§ (πΎβπ) β (β‘πΉ β (πΏβ(πΉ β π)))) β (πΉ β (πΎβπ)) β (πΏβ(πΉ β π))) |
38 | 5, 36, 37 | syl2anc 584 |
. 2
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΉ β (πΎβπ)) β (πΏβ(πΉ β π))) |
39 | 1, 17, 34 | lspcl 20586 |
. . . . 5
β’ ((π β LMod β§ π β π) β (πΎβπ) β (LSubSpβπ)) |
40 | 7, 21, 39 | syl2anc 584 |
. . . 4
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΎβπ) β (LSubSpβπ)) |
41 | 17, 13 | lmhmima 20657 |
. . . 4
β’ ((πΉ β (π LMHom π) β§ (πΎβπ) β (LSubSpβπ)) β (πΉ β (πΎβπ)) β (LSubSpβπ)) |
42 | 40, 41 | syldan 591 |
. . 3
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΉ β (πΎβπ)) β (LSubSpβπ)) |
43 | 1, 34 | lspssid 20595 |
. . . . 5
β’ ((π β LMod β§ π β π) β π β (πΎβπ)) |
44 | 7, 21, 43 | syl2anc 584 |
. . . 4
β’ ((πΉ β (π LMHom π) β§ π β π) β π β (πΎβπ)) |
45 | | imass2 6101 |
. . . 4
β’ (π β (πΎβπ) β (πΉ β π) β (πΉ β (πΎβπ))) |
46 | 44, 45 | syl 17 |
. . 3
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΉ β π) β (πΉ β (πΎβπ))) |
47 | 13, 14 | lspssp 20598 |
. . 3
β’ ((π β LMod β§ (πΉ β (πΎβπ)) β (LSubSpβπ) β§ (πΉ β π) β (πΉ β (πΎβπ))) β (πΏβ(πΉ β π)) β (πΉ β (πΎβπ))) |
48 | 9, 42, 46, 47 | syl3anc 1371 |
. 2
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΏβ(πΉ β π)) β (πΉ β (πΎβπ))) |
49 | 38, 48 | eqssd 3999 |
1
β’ ((πΉ β (π LMHom π) β§ π β π) β (πΉ β (πΎβπ)) = (πΏβ(πΉ β π))) |