Metamath Proof Explorer


Theorem mapdh6eN

Description: Lemmma for mapdh6N . Part (6) in Baer p. 47 line 38. (Contributed by NM, 1-May-2015) (New usage is discouraged.)

Ref Expression
Hypotheses mapdh.q Q = 0 C
mapdh.i I = x V if 2 nd x = 0 ˙ Q ι h D | M N 2 nd x = J h M N 1 st 1 st x - ˙ 2 nd x = J 2 nd 1 st x R h
mapdh.h H = LHyp K
mapdh.m M = mapd K W
mapdh.u U = DVecH K W
mapdh.v V = Base U
mapdh.s - ˙ = - U
mapdhc.o 0 ˙ = 0 U
mapdh.n N = LSpan U
mapdh.c C = LCDual K W
mapdh.d D = Base C
mapdh.r R = - C
mapdh.j J = LSpan C
mapdh.k φ K HL W H
mapdhc.f φ F D
mapdh.mn φ M N X = J F
mapdhcl.x φ X V 0 ˙
mapdh.p + ˙ = + U
mapdh.a ˙ = + C
mapdh6d.xn φ ¬ X N Y Z
mapdh6d.yz φ N Y = N Z
mapdh6d.y φ Y V 0 ˙
mapdh6d.z φ Z V 0 ˙
mapdh6d.w φ w V 0 ˙
mapdh6d.wn φ ¬ w N X Y
Assertion mapdh6eN φ I X F w + ˙ Y + ˙ Z = I X F w + ˙ Y ˙ I X F Z

Proof

Step Hyp Ref Expression
1 mapdh.q Q = 0 C
2 mapdh.i I = x V if 2 nd x = 0 ˙ Q ι h D | M N 2 nd x = J h M N 1 st 1 st x - ˙ 2 nd x = J 2 nd 1 st x R h
3 mapdh.h H = LHyp K
4 mapdh.m M = mapd K W
5 mapdh.u U = DVecH K W
6 mapdh.v V = Base U
7 mapdh.s - ˙ = - U
8 mapdhc.o 0 ˙ = 0 U
9 mapdh.n N = LSpan U
10 mapdh.c C = LCDual K W
11 mapdh.d D = Base C
12 mapdh.r R = - C
13 mapdh.j J = LSpan C
14 mapdh.k φ K HL W H
15 mapdhc.f φ F D
16 mapdh.mn φ M N X = J F
17 mapdhcl.x φ X V 0 ˙
18 mapdh.p + ˙ = + U
19 mapdh.a ˙ = + C
20 mapdh6d.xn φ ¬ X N Y Z
21 mapdh6d.yz φ N Y = N Z
22 mapdh6d.y φ Y V 0 ˙
23 mapdh6d.z φ Z V 0 ˙
24 mapdh6d.w φ w V 0 ˙
25 mapdh6d.wn φ ¬ w N X Y
26 3 5 14 dvhlmod φ U LMod
27 24 eldifad φ w V
28 22 eldifad φ Y V
29 6 18 lmodvacl U LMod w V Y V w + ˙ Y V
30 26 27 28 29 syl3anc φ w + ˙ Y V
31 3 5 14 dvhlvec φ U LVec
32 17 eldifad φ X V
33 6 9 31 27 32 28 25 lspindpi φ N w N X N w N Y
34 33 simprd φ N w N Y
35 6 18 8 9 26 27 28 34 lmodindp1 φ w + ˙ Y 0 ˙
36 eldifsn w + ˙ Y V 0 ˙ w + ˙ Y V w + ˙ Y 0 ˙
37 30 35 36 sylanbrc φ w + ˙ Y V 0 ˙
38 23 eldifad φ Z V
39 6 9 31 32 28 38 20 lspindpi φ N X N Y N X N Z
40 39 simpld φ N X N Y
41 6 18 8 9 31 17 22 23 24 21 40 25 mapdindp3 φ N X N w + ˙ Y
42 6 18 8 9 31 17 22 23 24 21 40 25 mapdindp4 φ ¬ Z N X w + ˙ Y
43 6 8 9 31 17 30 38 41 42 lspindp1 φ N Z N w + ˙ Y ¬ X N Z w + ˙ Y
44 43 simprd φ ¬ X N Z w + ˙ Y
45 prcom w + ˙ Y Z = Z w + ˙ Y
46 45 fveq2i N w + ˙ Y Z = N Z w + ˙ Y
47 46 eleq2i X N w + ˙ Y Z X N Z w + ˙ Y
48 44 47 sylnibr φ ¬ X N w + ˙ Y Z
49 6 9 31 38 32 30 42 lspindpi φ N Z N X N Z N w + ˙ Y
50 49 simprd φ N Z N w + ˙ Y
51 50 necomd φ N w + ˙ Y N Z
52 eqidd φ I X F w + ˙ Y = I X F w + ˙ Y
53 eqidd φ I X F Z = I X F Z
54 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 37 23 48 51 52 53 mapdh6aN φ I X F w + ˙ Y + ˙ Z = I X F w + ˙ Y ˙ I X F Z