hdmap1l6a - Mathbox for Norm Megill

	Mathbox for Norm Megill		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > hdmap1l6a		Structured version Visualization version GIF version

Theorem hdmap1l6a 39105

Description: Lemma for hdmap1l6 39117. Part (6) in [Baer] p. 47, case 1. (Contributed by NM, 23-Apr-2015.)

**Hypotheses**
Ref	Expression
hdmap1l6.h	⊢ 𝐻 = (LHyp‘𝐾)
hdmap1l6.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
hdmap1l6.v	⊢ 𝑉 = (Base‘𝑈)
hdmap1l6.p	⊢ + = (+_g‘𝑈)
hdmap1l6.s	⊢ − = (-_g‘𝑈)
hdmap1l6c.o	⊢ 0 = (0_g‘𝑈)
hdmap1l6.n	⊢ 𝑁 = (LSpan‘𝑈)
hdmap1l6.c	⊢ 𝐶 = ((LCDual‘𝐾)‘𝑊)
hdmap1l6.d	⊢ 𝐷 = (Base‘𝐶)
hdmap1l6.a	⊢ ✚ = (+_g‘𝐶)
hdmap1l6.r	⊢ 𝑅 = (-_g‘𝐶)
hdmap1l6.q	⊢ 𝑄 = (0_g‘𝐶)
hdmap1l6.l	⊢ 𝐿 = (LSpan‘𝐶)
hdmap1l6.m	⊢ 𝑀 = ((mapd‘𝐾)‘𝑊)
hdmap1l6.i	⊢ 𝐼 = ((HDMap1‘𝐾)‘𝑊)
hdmap1l6.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
hdmap1l6.f	⊢ (𝜑 → 𝐹 ∈ 𝐷)
hdmap1l6cl.x	⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 }))
hdmap1l6.mn	⊢ (𝜑 → (𝑀‘(𝑁‘{𝑋})) = (𝐿‘{𝐹}))
hdmap1l6e.y	⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 }))
hdmap1l6e.z	⊢ (𝜑 → 𝑍 ∈ (𝑉 ∖ { 0 }))
hdmap1l6e.xn	⊢ (𝜑 → ¬ 𝑋 ∈ (𝑁‘{𝑌, 𝑍}))
hdmap1l6.yz	⊢ (𝜑 → (𝑁‘{𝑌}) ≠ (𝑁‘{𝑍}))
hdmap1l6.fg	⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑌⟩) = 𝐺)
hdmap1l6.fe	⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑍⟩) = 𝐸)

**Assertion**
Ref	Expression
hdmap1l6a	⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, (𝑌 + 𝑍)⟩) = ((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)))

**Proof of Theorem hdmap1l6a**
Step	Hyp	Ref	Expression
1		hdmap1l6.h	. . . 4 ⊢ 𝐻 = (LHyp‘𝐾)
2		hdmap1l6.u	. . . 4 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
3		hdmap1l6.v	. . . 4 ⊢ 𝑉 = (Base‘𝑈)
4		hdmap1l6.p	. . . 4 ⊢ + = (+_g‘𝑈)
5		hdmap1l6.s	. . . 4 ⊢ − = (-_g‘𝑈)
6		hdmap1l6c.o	. . . 4 ⊢ 0 = (0_g‘𝑈)
7		hdmap1l6.n	. . . 4 ⊢ 𝑁 = (LSpan‘𝑈)
8		hdmap1l6.c	. . . 4 ⊢ 𝐶 = ((LCDual‘𝐾)‘𝑊)
9		hdmap1l6.d	. . . 4 ⊢ 𝐷 = (Base‘𝐶)
10		hdmap1l6.a	. . . 4 ⊢ ✚ = (+_g‘𝐶)
11		hdmap1l6.r	. . . 4 ⊢ 𝑅 = (-_g‘𝐶)
12		hdmap1l6.q	. . . 4 ⊢ 𝑄 = (0_g‘𝐶)
13		hdmap1l6.l	. . . 4 ⊢ 𝐿 = (LSpan‘𝐶)
14		hdmap1l6.m	. . . 4 ⊢ 𝑀 = ((mapd‘𝐾)‘𝑊)
15		hdmap1l6.i	. . . 4 ⊢ 𝐼 = ((HDMap1‘𝐾)‘𝑊)
16		hdmap1l6.k	. . . 4 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
17		hdmap1l6.f	. . . 4 ⊢ (𝜑 → 𝐹 ∈ 𝐷)
18		hdmap1l6cl.x	. . . 4 ⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 }))
19		hdmap1l6.mn	. . . 4 ⊢ (𝜑 → (𝑀‘(𝑁‘{𝑋})) = (𝐿‘{𝐹}))
20		hdmap1l6e.y	. . . 4 ⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 }))
21		hdmap1l6e.z	. . . 4 ⊢ (𝜑 → 𝑍 ∈ (𝑉 ∖ { 0 }))
22		hdmap1l6e.xn	. . . 4 ⊢ (𝜑 → ¬ 𝑋 ∈ (𝑁‘{𝑌, 𝑍}))
23		hdmap1l6.yz	. . . 4 ⊢ (𝜑 → (𝑁‘{𝑌}) ≠ (𝑁‘{𝑍}))
24		hdmap1l6.fg	. . . 4 ⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑌⟩) = 𝐺)
25		hdmap1l6.fe	. . . 4 ⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑍⟩) = 𝐸)
26	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25	hdmap1l6lem2 39104	. . 3 ⊢ (𝜑 → (𝑀‘(𝑁‘{(𝑌 + 𝑍)})) = (𝐿‘{(𝐺 ✚ 𝐸)}))
27	24, 25	oveq12d 7153	. . . . 5 ⊢ (𝜑 → ((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)) = (𝐺 ✚ 𝐸))
28	27	sneqd 4537	. . . 4 ⊢ (𝜑 → {((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩))} = {(𝐺 ✚ 𝐸)})
29	28	fveq2d 6649	. . 3 ⊢ (𝜑 → (𝐿‘{((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩))}) = (𝐿‘{(𝐺 ✚ 𝐸)}))
30	26, 29	eqtr4d 2836	. 2 ⊢ (𝜑 → (𝑀‘(𝑁‘{(𝑌 + 𝑍)})) = (𝐿‘{((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩))}))
31	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25	hdmap1l6lem1 39103	. . 3 ⊢ (𝜑 → (𝑀‘(𝑁‘{(𝑋 − (𝑌 + 𝑍))})) = (𝐿‘{(𝐹𝑅(𝐺 ✚ 𝐸))}))
32	27	oveq2d 7151	. . . . 5 ⊢ (𝜑 → (𝐹𝑅((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩))) = (𝐹𝑅(𝐺 ✚ 𝐸)))
33	32	sneqd 4537	. . . 4 ⊢ (𝜑 → {(𝐹𝑅((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)))} = {(𝐹𝑅(𝐺 ✚ 𝐸))})
34	33	fveq2d 6649	. . 3 ⊢ (𝜑 → (𝐿‘{(𝐹𝑅((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)))}) = (𝐿‘{(𝐹𝑅(𝐺 ✚ 𝐸))}))
35	31, 34	eqtr4d 2836	. 2 ⊢ (𝜑 → (𝑀‘(𝑁‘{(𝑋 − (𝑌 + 𝑍))})) = (𝐿‘{(𝐹𝑅((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)))}))
36	1, 2, 16	dvhlmod 38406	. . . . 5 ⊢ (𝜑 → 𝑈 ∈ LMod)
37	20	eldifad 3893	. . . . 5 ⊢ (𝜑 → 𝑌 ∈ 𝑉)
38	21	eldifad 3893	. . . . 5 ⊢ (𝜑 → 𝑍 ∈ 𝑉)
39	3, 4	lmodvacl 19641	. . . . 5 ⊢ ((𝑈 ∈ LMod ∧ 𝑌 ∈ 𝑉 ∧ 𝑍 ∈ 𝑉) → (𝑌 + 𝑍) ∈ 𝑉)
40	36, 37, 38, 39	syl3anc 1368	. . . 4 ⊢ (𝜑 → (𝑌 + 𝑍) ∈ 𝑉)
41	3, 4, 6, 7, 36, 37, 38, 23	lmodindp1 19779	. . . 4 ⊢ (𝜑 → (𝑌 + 𝑍) ≠ 0 )
42		eldifsn 4680	. . . 4 ⊢ ((𝑌 + 𝑍) ∈ (𝑉 ∖ { 0 }) ↔ ((𝑌 + 𝑍) ∈ 𝑉 ∧ (𝑌 + 𝑍) ≠ 0 ))
43	40, 41, 42	sylanbrc 586	. . 3 ⊢ (𝜑 → (𝑌 + 𝑍) ∈ (𝑉 ∖ { 0 }))
44	1, 8, 16	lcdlmod 38888	. . . 4 ⊢ (𝜑 → 𝐶 ∈ LMod)
45	1, 2, 16	dvhlvec 38405	. . . . . . 7 ⊢ (𝜑 → 𝑈 ∈ LVec)
46	18	eldifad 3893	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ 𝑉)
47	3, 6, 7, 45, 37, 21, 46, 23, 22	lspindp2 19900	. . . . . 6 ⊢ (𝜑 → ((𝑁‘{𝑋}) ≠ (𝑁‘{𝑌}) ∧ ¬ 𝑍 ∈ (𝑁‘{𝑋, 𝑌})))
48	47	simpld 498	. . . . 5 ⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑌}))
49	1, 2, 3, 6, 7, 8, 9, 13, 14, 15, 16, 17, 19, 48, 18, 37	hdmap1cl 39100	. . . 4 ⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ∈ 𝐷)
50	3, 6, 7, 45, 20, 38, 46, 23, 22	lspindp1 19898	. . . . . 6 ⊢ (𝜑 → ((𝑁‘{𝑋}) ≠ (𝑁‘{𝑍}) ∧ ¬ 𝑌 ∈ (𝑁‘{𝑋, 𝑍})))
51	50	simpld 498	. . . . 5 ⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑍}))
52	1, 2, 3, 6, 7, 8, 9, 13, 14, 15, 16, 17, 19, 51, 18, 38	hdmap1cl 39100	. . . 4 ⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, 𝑍⟩) ∈ 𝐷)
53	9, 10	lmodvacl 19641	. . . 4 ⊢ ((𝐶 ∈ LMod ∧ (𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ∈ 𝐷 ∧ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩) ∈ 𝐷) → ((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)) ∈ 𝐷)
54	44, 49, 52, 53	syl3anc 1368	. . 3 ⊢ (𝜑 → ((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)) ∈ 𝐷)
55		eqid 2798	. . . . . 6 ⊢ (LSubSp‘𝑈) = (LSubSp‘𝑈)
56	3, 55, 7, 36, 37, 38	lspprcl 19743	. . . . . 6 ⊢ (𝜑 → (𝑁‘{𝑌, 𝑍}) ∈ (LSubSp‘𝑈))
57	3, 4, 7, 36, 37, 38	lspprvacl 19764	. . . . . 6 ⊢ (𝜑 → (𝑌 + 𝑍) ∈ (𝑁‘{𝑌, 𝑍}))
58	55, 7, 36, 56, 57	lspsnel5a 19761	. . . . 5 ⊢ (𝜑 → (𝑁‘{(𝑌 + 𝑍)}) ⊆ (𝑁‘{𝑌, 𝑍}))
59	3, 55, 7, 36, 56, 46	lspsnel5 19760	. . . . . 6 ⊢ (𝜑 → (𝑋 ∈ (𝑁‘{𝑌, 𝑍}) ↔ (𝑁‘{𝑋}) ⊆ (𝑁‘{𝑌, 𝑍})))
60	22, 59	mtbid 327	. . . . 5 ⊢ (𝜑 → ¬ (𝑁‘{𝑋}) ⊆ (𝑁‘{𝑌, 𝑍}))
61		nssne2 3976	. . . . 5 ⊢ (((𝑁‘{(𝑌 + 𝑍)}) ⊆ (𝑁‘{𝑌, 𝑍}) ∧ ¬ (𝑁‘{𝑋}) ⊆ (𝑁‘{𝑌, 𝑍})) → (𝑁‘{(𝑌 + 𝑍)}) ≠ (𝑁‘{𝑋}))
62	58, 60, 61	syl2anc 587	. . . 4 ⊢ (𝜑 → (𝑁‘{(𝑌 + 𝑍)}) ≠ (𝑁‘{𝑋}))
63	62	necomd 3042	. . 3 ⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{(𝑌 + 𝑍)}))
64	1, 2, 3, 5, 6, 7, 8, 9, 11, 13, 14, 15, 16, 18, 17, 43, 54, 63, 19	hdmap1eq 39097	. 2 ⊢ (𝜑 → ((𝐼‘⟨𝑋, 𝐹, (𝑌 + 𝑍)⟩) = ((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)) ↔ ((𝑀‘(𝑁‘{(𝑌 + 𝑍)})) = (𝐿‘{((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩))}) ∧ (𝑀‘(𝑁‘{(𝑋 − (𝑌 + 𝑍))})) = (𝐿‘{(𝐹𝑅((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)))}))))
65	30, 35, 64	mpbir2and 712	1 ⊢ (𝜑 → (𝐼‘⟨𝑋, 𝐹, (𝑌 + 𝑍)⟩) = ((𝐼‘⟨𝑋, 𝐹, 𝑌⟩) ✚ (𝐼‘⟨𝑋, 𝐹, 𝑍⟩)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 399 = wceq 1538 ∈ wcel 2111 ≠ wne 2987 ∖ cdif 3878 ⊆ wss 3881 {csn 4525 {cpr 4527 ⟨cotp 4533 ‘cfv 6324 (class class class)co 7135 Basecbs 16475 +_gcplusg 16557 0_gc0g 16705 -_gcsg 18097 LModclmod 19627 LSubSpclss 19696 LSpanclspn 19736 HLchlt 36646 LHypclh 37280 DVecHcdvh 38374 LCDualclcd 38882 mapdcmpd 38920 HDMap1chdma1 39087

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2113 ax-9 2121 ax-10 2142 ax-11 2158 ax-12 2175 ax-ext 2770 ax-rep 5154 ax-sep 5167 ax-nul 5174 ax-pow 5231 ax-pr 5295 ax-un 7441 ax-cnex 10582 ax-resscn 10583 ax-1cn 10584 ax-icn 10585 ax-addcl 10586 ax-addrcl 10587 ax-mulcl 10588 ax-mulrcl 10589 ax-mulcom 10590 ax-addass 10591 ax-mulass 10592 ax-distr 10593 ax-i2m1 10594 ax-1ne0 10595 ax-1rid 10596 ax-rnegex 10597 ax-rrecex 10598 ax-cnre 10599 ax-pre-lttri 10600 ax-pre-lttrn 10601 ax-pre-ltadd 10602 ax-pre-mulgt0 10603 ax-riotaBAD 36249

This theorem depends on definitions: df-bi 210 df-an 400 df-or 845 df-3or 1085 df-3an 1086 df-tru 1541 df-fal 1551 df-ex 1782 df-nf 1786 df-sb 2070 df-mo 2598 df-eu 2629 df-clab 2777 df-cleq 2791 df-clel 2870 df-nfc 2938 df-ne 2988 df-nel 3092 df-ral 3111 df-rex 3112 df-reu 3113 df-rmo 3114 df-rab 3115 df-v 3443 df-sbc 3721 df-csb 3829 df-dif 3884 df-un 3886 df-in 3888 df-ss 3898 df-pss 3900 df-nul 4244 df-if 4426 df-pw 4499 df-sn 4526 df-pr 4528 df-tp 4530 df-op 4532 df-ot 4534 df-uni 4801 df-int 4839 df-iun 4883 df-iin 4884 df-br 5031 df-opab 5093 df-mpt 5111 df-tr 5137 df-id 5425 df-eprel 5430 df-po 5438 df-so 5439 df-fr 5478 df-we 5480 df-xp 5525 df-rel 5526 df-cnv 5527 df-co 5528 df-dm 5529 df-rn 5530 df-res 5531 df-ima 5532 df-pred 6116 df-ord 6162 df-on 6163 df-lim 6164 df-suc 6165 df-iota 6283 df-fun 6326 df-fn 6327 df-f 6328 df-f1 6329 df-fo 6330 df-f1o 6331 df-fv 6332 df-riota 7093 df-ov 7138 df-oprab 7139 df-mpo 7140 df-of 7389 df-om 7561 df-1st 7671 df-2nd 7672 df-tpos 7875 df-undef 7922 df-wrecs 7930 df-recs 7991 df-rdg 8029 df-1o 8085 df-oadd 8089 df-er 8272 df-map 8391 df-en 8493 df-dom 8494 df-sdom 8495 df-fin 8496 df-pnf 10666 df-mnf 10667 df-xr 10668 df-ltxr 10669 df-le 10670 df-sub 10861 df-neg 10862 df-nn 11626 df-2 11688 df-3 11689 df-4 11690 df-5 11691 df-6 11692 df-n0 11886 df-z 11970 df-uz 12232 df-fz 12886 df-struct 16477 df-ndx 16478 df-slot 16479 df-base 16481 df-sets 16482 df-ress 16483 df-plusg 16570 df-mulr 16571 df-sca 16573 df-vsca 16574 df-0g 16707 df-mre 16849 df-mrc 16850 df-acs 16852 df-proset 17530 df-poset 17548 df-plt 17560 df-lub 17576 df-glb 17577 df-join 17578 df-meet 17579 df-p0 17641 df-p1 17642 df-lat 17648 df-clat 17710 df-mgm 17844 df-sgrp 17893 df-mnd 17904 df-submnd 17949 df-grp 18098 df-minusg 18099 df-sbg 18100 df-subg 18268 df-cntz 18439 df-oppg 18466 df-lsm 18753 df-cmn 18900 df-abl 18901 df-mgp 19233 df-ur 19245 df-ring 19292 df-oppr 19369 df-dvdsr 19387 df-unit 19388 df-invr 19418 df-dvr 19429 df-drng 19497 df-lmod 19629 df-lss 19697 df-lsp 19737 df-lvec 19868 df-lsatoms 36272 df-lshyp 36273 df-lcv 36315 df-lfl 36354 df-lkr 36382 df-ldual 36420 df-oposet 36472 df-ol 36474 df-oml 36475 df-covers 36562 df-ats 36563 df-atl 36594 df-cvlat 36618 df-hlat 36647 df-llines 36794 df-lplanes 36795 df-lvols 36796 df-lines 36797 df-psubsp 36799 df-pmap 36800 df-padd 37092 df-lhyp 37284 df-laut 37285 df-ldil 37400 df-ltrn 37401 df-trl 37455 df-tgrp 38039 df-tendo 38051 df-edring 38053 df-dveca 38299 df-disoa 38325 df-dvech 38375 df-dib 38435 df-dic 38469 df-dih 38525 df-doch 38644 df-djh 38691 df-lcdual 38883 df-mapd 38921 df-hdmap1 39089

This theorem is referenced by: hdmap1l6d 39109 hdmap1l6e 39110 hdmap1l6f 39111 hdmap1l6j 39115

W3C validator