Step | Hyp | Ref
| Expression |
1 | | baerlem3.w |
. . . . 5
β’ (π β π β LVec) |
2 | | lveclmod 20709 |
. . . . 5
β’ (π β LVec β π β LMod) |
3 | 1, 2 | syl 17 |
. . . 4
β’ (π β π β LMod) |
4 | | baerlem3.y |
. . . . 5
β’ (π β π β (π β { 0 })) |
5 | 4 | eldifad 3959 |
. . . 4
β’ (π β π β π) |
6 | | baerlem3.z |
. . . . 5
β’ (π β π β (π β { 0 })) |
7 | 6 | eldifad 3959 |
. . . 4
β’ (π β π β π) |
8 | | baerlem3.v |
. . . . 5
β’ π = (Baseβπ) |
9 | | baerlem3.m |
. . . . 5
β’ β =
(-gβπ) |
10 | | baerlem3.s |
. . . . 5
β’ β =
(LSSumβπ) |
11 | | baerlem3.n |
. . . . 5
β’ π = (LSpanβπ) |
12 | 8, 9, 10, 11 | lspsntrim 20701 |
. . . 4
β’ ((π β LMod β§ π β π β§ π β π) β (πβ{(π β π)}) β ((πβ{π}) β (πβ{π}))) |
13 | 3, 5, 7, 12 | syl3anc 1371 |
. . 3
β’ (π β (πβ{(π β π)}) β ((πβ{π}) β (πβ{π}))) |
14 | 8, 9, 11, 3, 5, 7 | lspsnsub 20610 |
. . . . 5
β’ (π β (πβ{(π β π)}) = (πβ{(π β π)})) |
15 | | lmodabl 20511 |
. . . . . . . . 9
β’ (π β LMod β π β Abel) |
16 | 3, 15 | syl 17 |
. . . . . . . 8
β’ (π β π β Abel) |
17 | | baerlem3.x |
. . . . . . . 8
β’ (π β π β π) |
18 | 8, 9, 16, 17, 5, 7 | ablnnncan1 19685 |
. . . . . . 7
β’ (π β ((π β π) β (π β π)) = (π β π)) |
19 | 18 | sneqd 4639 |
. . . . . 6
β’ (π β {((π β π) β (π β π))} = {(π β π)}) |
20 | 19 | fveq2d 6892 |
. . . . 5
β’ (π β (πβ{((π β π) β (π β π))}) = (πβ{(π β π)})) |
21 | 14, 20 | eqtr4d 2775 |
. . . 4
β’ (π β (πβ{(π β π)}) = (πβ{((π β π) β (π β π))})) |
22 | 8, 9 | lmodvsubcl 20509 |
. . . . . 6
β’ ((π β LMod β§ π β π β§ π β π) β (π β π) β π) |
23 | 3, 17, 5, 22 | syl3anc 1371 |
. . . . 5
β’ (π β (π β π) β π) |
24 | 8, 9 | lmodvsubcl 20509 |
. . . . . 6
β’ ((π β LMod β§ π β π β§ π β π) β (π β π) β π) |
25 | 3, 17, 7, 24 | syl3anc 1371 |
. . . . 5
β’ (π β (π β π) β π) |
26 | 8, 9, 10, 11 | lspsntrim 20701 |
. . . . 5
β’ ((π β LMod β§ (π β π) β π β§ (π β π) β π) β (πβ{((π β π) β (π β π))}) β ((πβ{(π β π)}) β (πβ{(π β π)}))) |
27 | 3, 23, 25, 26 | syl3anc 1371 |
. . . 4
β’ (π β (πβ{((π β π) β (π β π))}) β ((πβ{(π β π)}) β (πβ{(π β π)}))) |
28 | 21, 27 | eqsstrd 4019 |
. . 3
β’ (π β (πβ{(π β π)}) β ((πβ{(π β π)}) β (πβ{(π β π)}))) |
29 | 13, 28 | ssind 4231 |
. 2
β’ (π β (πβ{(π β π)}) β (((πβ{π}) β (πβ{π})) β© ((πβ{(π β π)}) β (πβ{(π β π)})))) |
30 | | elin 3963 |
. . . . 5
β’ (π β (((πβ{π}) β (πβ{π})) β© ((πβ{(π β π)}) β (πβ{(π β π)}))) β (π β ((πβ{π}) β (πβ{π})) β§ π β ((πβ{(π β π)}) β (πβ{(π β π)})))) |
31 | | baerlem3.p |
. . . . . . 7
β’ + =
(+gβπ) |
32 | | baerlem3.r |
. . . . . . 7
β’ π
= (Scalarβπ) |
33 | | baerlem3.b |
. . . . . . 7
β’ π΅ = (Baseβπ
) |
34 | | baerlem3.t |
. . . . . . 7
β’ Β· = (
Β·π βπ) |
35 | 8, 31, 32, 33, 34, 10, 11, 3, 5, 7 | lsmspsn 20687 |
. . . . . 6
β’ (π β (π β ((πβ{π}) β (πβ{π})) β βπ β π΅ βπ β π΅ π = ((π Β· π) + (π Β· π)))) |
36 | 8, 31, 32, 33, 34, 10, 11, 3, 23, 25 | lsmspsn 20687 |
. . . . . 6
β’ (π β (π β ((πβ{(π β π)}) β (πβ{(π β π)})) β βπ β π΅ βπ β π΅ π = ((π Β· (π β π)) + (π Β· (π β π))))) |
37 | 35, 36 | anbi12d 631 |
. . . . 5
β’ (π β ((π β ((πβ{π}) β (πβ{π})) β§ π β ((πβ{(π β π)}) β (πβ{(π β π)}))) β (βπ β π΅ βπ β π΅ π = ((π Β· π) + (π Β· π)) β§ βπ β π΅ βπ β π΅ π = ((π Β· (π β π)) + (π Β· (π β π)))))) |
38 | 30, 37 | bitrid 282 |
. . . 4
β’ (π β (π β (((πβ{π}) β (πβ{π})) β© ((πβ{(π β π)}) β (πβ{(π β π)}))) β (βπ β π΅ βπ β π΅ π = ((π Β· π) + (π Β· π)) β§ βπ β π΅ βπ β π΅ π = ((π Β· (π β π)) + (π Β· (π β π)))))) |
39 | | baerlem3.o |
. . . . . . . . . . 11
β’ 0 =
(0gβπ) |
40 | | simp11 1203 |
. . . . . . . . . . . 12
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π) |
41 | 40, 1 | syl 17 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β LVec) |
42 | 40, 17 | syl 17 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β π) |
43 | | baerlem3.c |
. . . . . . . . . . . 12
β’ (π β Β¬ π β (πβ{π, π})) |
44 | 40, 43 | syl 17 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β Β¬ π β (πβ{π, π})) |
45 | | baerlem3.d |
. . . . . . . . . . . 12
β’ (π β (πβ{π}) β (πβ{π})) |
46 | 40, 45 | syl 17 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β (πβ{π}) β (πβ{π})) |
47 | 40, 4 | syl 17 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β (π β { 0 })) |
48 | 40, 6 | syl 17 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β (π β { 0 })) |
49 | | baerlem3.a |
. . . . . . . . . . 11
⒠⨣ =
(+gβπ
) |
50 | | baerlem3.l |
. . . . . . . . . . 11
β’ πΏ = (-gβπ
) |
51 | | baerlem3.q |
. . . . . . . . . . 11
β’ π = (0gβπ
) |
52 | | baerlem3.i |
. . . . . . . . . . 11
β’ πΌ = (invgβπ
) |
53 | | simp12l 1286 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β π΅) |
54 | | simp12r 1287 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β π΅) |
55 | | simp2l 1199 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β π΅) |
56 | | simp2r 1200 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β π΅) |
57 | | simp13 1205 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π = ((π Β· π) + (π Β· π))) |
58 | | simp3 1138 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π = ((π Β· (π β π)) + (π Β· (π β π)))) |
59 | 8, 9, 39, 10, 11, 41, 42, 44, 46, 47, 48, 31, 34, 32, 33, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58 | baerlem3lem1 40566 |
. . . . . . . . . 10
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π = (π Β· (π β π))) |
60 | 40, 3 | syl 17 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β LMod) |
61 | 8, 9 | lmodvsubcl 20509 |
. . . . . . . . . . . . 13
β’ ((π β LMod β§ π β π β§ π β π) β (π β π) β π) |
62 | 3, 5, 7, 61 | syl3anc 1371 |
. . . . . . . . . . . 12
β’ (π β (π β π) β π) |
63 | 40, 62 | syl 17 |
. . . . . . . . . . 11
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β (π β π) β π) |
64 | 8, 34, 32, 33, 11, 60, 53, 63 | lspsneli 20604 |
. . . . . . . . . 10
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β (π Β· (π β π)) β (πβ{(π β π)})) |
65 | 59, 64 | eqeltrd 2833 |
. . . . . . . . 9
β’ (((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β (πβ{(π β π)})) |
66 | 65 | 3exp 1119 |
. . . . . . . 8
β’ ((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β ((π β π΅ β§ π β π΅) β (π = ((π Β· (π β π)) + (π Β· (π β π))) β π β (πβ{(π β π)})))) |
67 | 66 | rexlimdvv 3210 |
. . . . . . 7
β’ ((π β§ (π β π΅ β§ π β π΅) β§ π = ((π Β· π) + (π Β· π))) β (βπ β π΅ βπ β π΅ π = ((π Β· (π β π)) + (π Β· (π β π))) β π β (πβ{(π β π)}))) |
68 | 67 | 3exp 1119 |
. . . . . 6
β’ (π β ((π β π΅ β§ π β π΅) β (π = ((π Β· π) + (π Β· π)) β (βπ β π΅ βπ β π΅ π = ((π Β· (π β π)) + (π Β· (π β π))) β π β (πβ{(π β π)}))))) |
69 | 68 | rexlimdvv 3210 |
. . . . 5
β’ (π β (βπ β π΅ βπ β π΅ π = ((π Β· π) + (π Β· π)) β (βπ β π΅ βπ β π΅ π = ((π Β· (π β π)) + (π Β· (π β π))) β π β (πβ{(π β π)})))) |
70 | 69 | impd 411 |
. . . 4
β’ (π β ((βπ β π΅ βπ β π΅ π = ((π Β· π) + (π Β· π)) β§ βπ β π΅ βπ β π΅ π = ((π Β· (π β π)) + (π Β· (π β π)))) β π β (πβ{(π β π)}))) |
71 | 38, 70 | sylbid 239 |
. . 3
β’ (π β (π β (((πβ{π}) β (πβ{π})) β© ((πβ{(π β π)}) β (πβ{(π β π)}))) β π β (πβ{(π β π)}))) |
72 | 71 | ssrdv 3987 |
. 2
β’ (π β (((πβ{π}) β (πβ{π})) β© ((πβ{(π β π)}) β (πβ{(π β π)}))) β (πβ{(π β π)})) |
73 | 29, 72 | eqssd 3998 |
1
β’ (π β (πβ{(π β π)}) = (((πβ{π}) β (πβ{π})) β© ((πβ{(π β π)}) β (πβ{(π β π)})))) |