Theorem mapdpglem28

Description: Lemma for mapdpg . Baer p. 45 line 18: "vx'-vy'' = x'-uy''". (Contributed by NM, 22-Mar-2015)

	Ref	Expression
Hypotheses	mapdpg.h	$$⊢H=\mathrm{LHyp}\left(K\right)$$
	mapdpg.m	$$⊢M=\mathrm{mapd}\left(K\right)\left(W\right)$$
	mapdpg.u	$$⊢U=\mathrm{DVecH}\left(K\right)\left(W\right)$$
	mapdpg.v	$$⊢V={\mathrm{Base}}_U$$
	mapdpg.s	$$⊢\underset{\dot{}}{-}={-}_U$$
	mapdpg.z	$$⊢\underset{\dot{}}{0}=0_U$$
	mapdpg.n	$$⊢N=\mathrm{LSpan}\left(U\right)$$
	mapdpg.c	$$⊢C=\mathrm{LCDual}\left(K\right)\left(W\right)$$
	mapdpg.f	$$⊢F={\mathrm{Base}}_C$$
	mapdpg.r	$$⊢R={-}_C$$
	mapdpg.j	$$⊢J=\mathrm{LSpan}\left(C\right)$$
	mapdpg.k	$$⊢\phi \to \left(K\in \mathrm{HL}\wedge W\in H\right)$$
	mapdpg.x	$$⊢\phi \to X\in \left(V\setminus \left\{\underset{\dot{}}{0}\right\}\right)$$
	mapdpg.y	$$⊢\phi \to Y\in \left(V\setminus \left\{\underset{\dot{}}{0}\right\}\right)$$
	mapdpg.g	$$⊢\phi \to G\in F$$
	mapdpg.ne	$$⊢\phi \to N\left(\left\{X\right\}\right)\ne N\left(\left\{Y\right\}\right)$$
	mapdpg.e	$$⊢\phi \to M\left(N\left(\left\{X\right\}\right)\right)=J\left(\left\{G\right\}\right)$$
	mapdpgem25.h1	$$⊢\phi \to \left(h\in F\wedge \left(M\left(N\left(\left\{Y\right\}\right)\right)=J\left(\left\{h\right\}\right)\wedge M\left(N\left(\left\{X\underset{\dot{}}{-}Y\right\}\right)\right)=J\left(\left\{GRh\right\}\right)\right)\right)$$
	mapdpgem25.i1	$$⊢\phi \to \left(i\in F\wedge \left(M\left(N\left(\left\{Y\right\}\right)\right)=J\left(\left\{i\right\}\right)\wedge M\left(N\left(\left\{X\underset{\dot{}}{-}Y\right\}\right)\right)=J\left(\left\{GRi\right\}\right)\right)\right)$$
	mapdpglem26.a	$$⊢A=\mathrm{Scalar}\left(U\right)$$
	mapdpglem26.b	$$⊢B={\mathrm{Base}}_A$$
	mapdpglem26.t	$$⊢\underset{\dot{}}{·}={\cdot }_C$$
	mapdpglem26.o	$$⊢O=0_A$$
	mapdpglem28.ve	$$⊢\phi \to v\in B$$
	mapdpglem28.u1	$$⊢\phi \to h=u\underset{\dot{}}{·}i$$
	mapdpglem28.u2	$$⊢\phi \to GRh=v\underset{\dot{}}{·}\left(GRi\right)$$
Assertion	mapdpglem28	$$⊢\phi \to \left(v\underset{\dot{}}{·}G\right)R\left(v\underset{\dot{}}{·}i\right)=GR\left(u\underset{\dot{}}{·}i\right)$$

Proof

Step	Hyp	Ref	Expression
1		mapdpg.h	$$⊢H=\mathrm{LHyp}\left(K\right)$$
2		mapdpg.m	$$⊢M=\mathrm{mapd}\left(K\right)\left(W\right)$$
3		mapdpg.u	$$⊢U=\mathrm{DVecH}\left(K\right)\left(W\right)$$
4		mapdpg.v	$$⊢V={\mathrm{Base}}_U$$
5		mapdpg.s	$$⊢\underset{\dot{}}{-}={-}_U$$
6		mapdpg.z	$$⊢\underset{\dot{}}{0}=0_U$$
7		mapdpg.n	$$⊢N=\mathrm{LSpan}\left(U\right)$$
8		mapdpg.c	$$⊢C=\mathrm{LCDual}\left(K\right)\left(W\right)$$
9		mapdpg.f	$$⊢F={\mathrm{Base}}_C$$
10		mapdpg.r	$$⊢R={-}_C$$
11		mapdpg.j	$$⊢J=\mathrm{LSpan}\left(C\right)$$
12		mapdpg.k	$$⊢\phi \to \left(K\in \mathrm{HL}\wedge W\in H\right)$$
13		mapdpg.x	$$⊢\phi \to X\in \left(V\setminus \left\{\underset{\dot{}}{0}\right\}\right)$$
14		mapdpg.y	$$⊢\phi \to Y\in \left(V\setminus \left\{\underset{\dot{}}{0}\right\}\right)$$
15		mapdpg.g	$$⊢\phi \to G\in F$$
16		mapdpg.ne	$$⊢\phi \to N\left(\left\{X\right\}\right)\ne N\left(\left\{Y\right\}\right)$$
17		mapdpg.e	$$⊢\phi \to M\left(N\left(\left\{X\right\}\right)\right)=J\left(\left\{G\right\}\right)$$
18		mapdpgem25.h1	$$⊢\phi \to \left(h\in F\wedge \left(M\left(N\left(\left\{Y\right\}\right)\right)=J\left(\left\{h\right\}\right)\wedge M\left(N\left(\left\{X\underset{\dot{}}{-}Y\right\}\right)\right)=J\left(\left\{GRh\right\}\right)\right)\right)$$
19		mapdpgem25.i1	$$⊢\phi \to \left(i\in F\wedge \left(M\left(N\left(\left\{Y\right\}\right)\right)=J\left(\left\{i\right\}\right)\wedge M\left(N\left(\left\{X\underset{\dot{}}{-}Y\right\}\right)\right)=J\left(\left\{GRi\right\}\right)\right)\right)$$
20		mapdpglem26.a	$$⊢A=\mathrm{Scalar}\left(U\right)$$
21		mapdpglem26.b	$$⊢B={\mathrm{Base}}_A$$
22		mapdpglem26.t	$$⊢\underset{\dot{}}{·}={\cdot }_C$$
23		mapdpglem26.o	$$⊢O=0_A$$
24		mapdpglem28.ve	$$⊢\phi \to v\in B$$
25		mapdpglem28.u1	$$⊢\phi \to h=u\underset{\dot{}}{·}i$$
26		mapdpglem28.u2	$$⊢\phi \to GRh=v\underset{\dot{}}{·}\left(GRi\right)$$
27	25	oveq2d	$$⊢\phi \to GRh=GR\left(u\underset{\dot{}}{·}i\right)$$
28		eqid	$$⊢\mathrm{Scalar}\left(C\right)=\mathrm{Scalar}\left(C\right)$$
29		eqid	$$⊢{\mathrm{Base}}_{\mathrm{Scalar}\left(C\right)}={\mathrm{Base}}_{\mathrm{Scalar}\left(C\right)}$$
30	1 8 12	lcdlmod	$$⊢\phi \to C\in \mathrm{LMod}$$
31	1 3 20 21 8 28 29 12	lcdsbase	$$⊢\phi \to {\mathrm{Base}}_{\mathrm{Scalar}\left(C\right)}=B$$
32	24 31	eleqtrrd	$$⊢\phi \to v\in {\mathrm{Base}}_{\mathrm{Scalar}\left(C\right)}$$
33	19	simpld	$$⊢\phi \to i\in F$$
34	9 22 28 29 10 30 32 15 33	lmodsubdi	$$⊢\phi \to v\underset{\dot{}}{·}\left(GRi\right)=\left(v\underset{\dot{}}{·}G\right)R\left(v\underset{\dot{}}{·}i\right)$$
35	26 27 34	3eqtr3rd	$$⊢\phi \to \left(v\underset{\dot{}}{·}G\right)R\left(v\underset{\dot{}}{·}i\right)=GR\left(u\underset{\dot{}}{·}i\right)$$