Metamath Proof Explorer


Theorem slmdlema

Description: Lemma for properties of a semimodule. (Contributed by NM, 8-Dec-2013) (Revised by Mario Carneiro, 19-Jun-2014) (Revised by Thierry Arnoux, 1-Apr-2018)

Ref Expression
Hypotheses isslmd.v V=BaseW
isslmd.a +˙=+W
isslmd.s ·˙=W
isslmd.0 0˙=0W
isslmd.f F=ScalarW
isslmd.k K=BaseF
isslmd.p ˙=+F
isslmd.t ×˙=F
isslmd.u 1˙=1F
isslmd.o O=0F
Assertion slmdlema WSLModQKRKXVYVR·˙YVR·˙Y+˙X=R·˙Y+˙R·˙XQ˙R·˙Y=Q·˙Y+˙R·˙YQ×˙R·˙Y=Q·˙R·˙Y1˙·˙Y=YO·˙Y=0˙

Proof

Step Hyp Ref Expression
1 isslmd.v V=BaseW
2 isslmd.a +˙=+W
3 isslmd.s ·˙=W
4 isslmd.0 0˙=0W
5 isslmd.f F=ScalarW
6 isslmd.k K=BaseF
7 isslmd.p ˙=+F
8 isslmd.t ×˙=F
9 isslmd.u 1˙=1F
10 isslmd.o O=0F
11 1 2 3 4 5 6 7 8 9 10 isslmd WSLModWCMndFSRingqKrKxVwVr·˙wVr·˙w+˙x=r·˙w+˙r·˙xq˙r·˙w=q·˙w+˙r·˙wq×˙r·˙w=q·˙r·˙w1˙·˙w=wO·˙w=0˙
12 11 simp3bi WSLModqKrKxVwVr·˙wVr·˙w+˙x=r·˙w+˙r·˙xq˙r·˙w=q·˙w+˙r·˙wq×˙r·˙w=q·˙r·˙w1˙·˙w=wO·˙w=0˙
13 oveq1 q=Qq˙r=Q˙r
14 13 oveq1d q=Qq˙r·˙w=Q˙r·˙w
15 oveq1 q=Qq·˙w=Q·˙w
16 15 oveq1d q=Qq·˙w+˙r·˙w=Q·˙w+˙r·˙w
17 14 16 eqeq12d q=Qq˙r·˙w=q·˙w+˙r·˙wQ˙r·˙w=Q·˙w+˙r·˙w
18 17 3anbi3d q=Qr·˙wVr·˙w+˙x=r·˙w+˙r·˙xq˙r·˙w=q·˙w+˙r·˙wr·˙wVr·˙w+˙x=r·˙w+˙r·˙xQ˙r·˙w=Q·˙w+˙r·˙w
19 oveq1 q=Qq×˙r=Q×˙r
20 19 oveq1d q=Qq×˙r·˙w=Q×˙r·˙w
21 oveq1 q=Qq·˙r·˙w=Q·˙r·˙w
22 20 21 eqeq12d q=Qq×˙r·˙w=q·˙r·˙wQ×˙r·˙w=Q·˙r·˙w
23 22 3anbi1d q=Qq×˙r·˙w=q·˙r·˙w1˙·˙w=wO·˙w=0˙Q×˙r·˙w=Q·˙r·˙w1˙·˙w=wO·˙w=0˙
24 18 23 anbi12d q=Qr·˙wVr·˙w+˙x=r·˙w+˙r·˙xq˙r·˙w=q·˙w+˙r·˙wq×˙r·˙w=q·˙r·˙w1˙·˙w=wO·˙w=0˙r·˙wVr·˙w+˙x=r·˙w+˙r·˙xQ˙r·˙w=Q·˙w+˙r·˙wQ×˙r·˙w=Q·˙r·˙w1˙·˙w=wO·˙w=0˙
25 24 2ralbidv q=QxVwVr·˙wVr·˙w+˙x=r·˙w+˙r·˙xq˙r·˙w=q·˙w+˙r·˙wq×˙r·˙w=q·˙r·˙w1˙·˙w=wO·˙w=0˙xVwVr·˙wVr·˙w+˙x=r·˙w+˙r·˙xQ˙r·˙w=Q·˙w+˙r·˙wQ×˙r·˙w=Q·˙r·˙w1˙·˙w=wO·˙w=0˙
26 oveq1 r=Rr·˙w=R·˙w
27 26 eleq1d r=Rr·˙wVR·˙wV
28 oveq1 r=Rr·˙w+˙x=R·˙w+˙x
29 oveq1 r=Rr·˙x=R·˙x
30 26 29 oveq12d r=Rr·˙w+˙r·˙x=R·˙w+˙R·˙x
31 28 30 eqeq12d r=Rr·˙w+˙x=r·˙w+˙r·˙xR·˙w+˙x=R·˙w+˙R·˙x
32 oveq2 r=RQ˙r=Q˙R
33 32 oveq1d r=RQ˙r·˙w=Q˙R·˙w
34 26 oveq2d r=RQ·˙w+˙r·˙w=Q·˙w+˙R·˙w
35 33 34 eqeq12d r=RQ˙r·˙w=Q·˙w+˙r·˙wQ˙R·˙w=Q·˙w+˙R·˙w
36 27 31 35 3anbi123d r=Rr·˙wVr·˙w+˙x=r·˙w+˙r·˙xQ˙r·˙w=Q·˙w+˙r·˙wR·˙wVR·˙w+˙x=R·˙w+˙R·˙xQ˙R·˙w=Q·˙w+˙R·˙w
37 oveq2 r=RQ×˙r=Q×˙R
38 37 oveq1d r=RQ×˙r·˙w=Q×˙R·˙w
39 26 oveq2d r=RQ·˙r·˙w=Q·˙R·˙w
40 38 39 eqeq12d r=RQ×˙r·˙w=Q·˙r·˙wQ×˙R·˙w=Q·˙R·˙w
41 40 3anbi1d r=RQ×˙r·˙w=Q·˙r·˙w1˙·˙w=wO·˙w=0˙Q×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙
42 36 41 anbi12d r=Rr·˙wVr·˙w+˙x=r·˙w+˙r·˙xQ˙r·˙w=Q·˙w+˙r·˙wQ×˙r·˙w=Q·˙r·˙w1˙·˙w=wO·˙w=0˙R·˙wVR·˙w+˙x=R·˙w+˙R·˙xQ˙R·˙w=Q·˙w+˙R·˙wQ×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙
43 42 2ralbidv r=RxVwVr·˙wVr·˙w+˙x=r·˙w+˙r·˙xQ˙r·˙w=Q·˙w+˙r·˙wQ×˙r·˙w=Q·˙r·˙w1˙·˙w=wO·˙w=0˙xVwVR·˙wVR·˙w+˙x=R·˙w+˙R·˙xQ˙R·˙w=Q·˙w+˙R·˙wQ×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙
44 25 43 rspc2v QKRKqKrKxVwVr·˙wVr·˙w+˙x=r·˙w+˙r·˙xq˙r·˙w=q·˙w+˙r·˙wq×˙r·˙w=q·˙r·˙w1˙·˙w=wO·˙w=0˙xVwVR·˙wVR·˙w+˙x=R·˙w+˙R·˙xQ˙R·˙w=Q·˙w+˙R·˙wQ×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙
45 12 44 mpan9 WSLModQKRKxVwVR·˙wVR·˙w+˙x=R·˙w+˙R·˙xQ˙R·˙w=Q·˙w+˙R·˙wQ×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙
46 oveq2 x=Xw+˙x=w+˙X
47 46 oveq2d x=XR·˙w+˙x=R·˙w+˙X
48 oveq2 x=XR·˙x=R·˙X
49 48 oveq2d x=XR·˙w+˙R·˙x=R·˙w+˙R·˙X
50 47 49 eqeq12d x=XR·˙w+˙x=R·˙w+˙R·˙xR·˙w+˙X=R·˙w+˙R·˙X
51 50 3anbi2d x=XR·˙wVR·˙w+˙x=R·˙w+˙R·˙xQ˙R·˙w=Q·˙w+˙R·˙wR·˙wVR·˙w+˙X=R·˙w+˙R·˙XQ˙R·˙w=Q·˙w+˙R·˙w
52 51 anbi1d x=XR·˙wVR·˙w+˙x=R·˙w+˙R·˙xQ˙R·˙w=Q·˙w+˙R·˙wQ×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙R·˙wVR·˙w+˙X=R·˙w+˙R·˙XQ˙R·˙w=Q·˙w+˙R·˙wQ×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙
53 oveq2 w=YR·˙w=R·˙Y
54 53 eleq1d w=YR·˙wVR·˙YV
55 oveq1 w=Yw+˙X=Y+˙X
56 55 oveq2d w=YR·˙w+˙X=R·˙Y+˙X
57 53 oveq1d w=YR·˙w+˙R·˙X=R·˙Y+˙R·˙X
58 56 57 eqeq12d w=YR·˙w+˙X=R·˙w+˙R·˙XR·˙Y+˙X=R·˙Y+˙R·˙X
59 oveq2 w=YQ˙R·˙w=Q˙R·˙Y
60 oveq2 w=YQ·˙w=Q·˙Y
61 60 53 oveq12d w=YQ·˙w+˙R·˙w=Q·˙Y+˙R·˙Y
62 59 61 eqeq12d w=YQ˙R·˙w=Q·˙w+˙R·˙wQ˙R·˙Y=Q·˙Y+˙R·˙Y
63 54 58 62 3anbi123d w=YR·˙wVR·˙w+˙X=R·˙w+˙R·˙XQ˙R·˙w=Q·˙w+˙R·˙wR·˙YVR·˙Y+˙X=R·˙Y+˙R·˙XQ˙R·˙Y=Q·˙Y+˙R·˙Y
64 oveq2 w=YQ×˙R·˙w=Q×˙R·˙Y
65 53 oveq2d w=YQ·˙R·˙w=Q·˙R·˙Y
66 64 65 eqeq12d w=YQ×˙R·˙w=Q·˙R·˙wQ×˙R·˙Y=Q·˙R·˙Y
67 oveq2 w=Y1˙·˙w=1˙·˙Y
68 id w=Yw=Y
69 67 68 eqeq12d w=Y1˙·˙w=w1˙·˙Y=Y
70 oveq2 w=YO·˙w=O·˙Y
71 70 eqeq1d w=YO·˙w=0˙O·˙Y=0˙
72 66 69 71 3anbi123d w=YQ×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙Q×˙R·˙Y=Q·˙R·˙Y1˙·˙Y=YO·˙Y=0˙
73 63 72 anbi12d w=YR·˙wVR·˙w+˙X=R·˙w+˙R·˙XQ˙R·˙w=Q·˙w+˙R·˙wQ×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙R·˙YVR·˙Y+˙X=R·˙Y+˙R·˙XQ˙R·˙Y=Q·˙Y+˙R·˙YQ×˙R·˙Y=Q·˙R·˙Y1˙·˙Y=YO·˙Y=0˙
74 52 73 rspc2v XVYVxVwVR·˙wVR·˙w+˙x=R·˙w+˙R·˙xQ˙R·˙w=Q·˙w+˙R·˙wQ×˙R·˙w=Q·˙R·˙w1˙·˙w=wO·˙w=0˙R·˙YVR·˙Y+˙X=R·˙Y+˙R·˙XQ˙R·˙Y=Q·˙Y+˙R·˙YQ×˙R·˙Y=Q·˙R·˙Y1˙·˙Y=YO·˙Y=0˙
75 45 74 syl5com WSLModQKRKXVYVR·˙YVR·˙Y+˙X=R·˙Y+˙R·˙XQ˙R·˙Y=Q·˙Y+˙R·˙YQ×˙R·˙Y=Q·˙R·˙Y1˙·˙Y=YO·˙Y=0˙
76 75 3impia WSLModQKRKXVYVR·˙YVR·˙Y+˙X=R·˙Y+˙R·˙XQ˙R·˙Y=Q·˙Y+˙R·˙YQ×˙R·˙Y=Q·˙R·˙Y1˙·˙Y=YO·˙Y=0˙