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