mapdpglem14 - Mathbox for Norm Megill

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

Theorem mapdpglem14 39946

Description: Lemma for mapdpg 39967. (Contributed by NM, 20-Mar-2015.)

**Hypotheses**
Ref	Expression
mapdpglem.h	⊢ 𝐻 = (LHyp‘𝐾)
mapdpglem.m	⊢ 𝑀 = ((mapd‘𝐾)‘𝑊)
mapdpglem.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
mapdpglem.v	⊢ 𝑉 = (Base‘𝑈)
mapdpglem.s	⊢ − = (-_g‘𝑈)
mapdpglem.n	⊢ 𝑁 = (LSpan‘𝑈)
mapdpglem.c	⊢ 𝐶 = ((LCDual‘𝐾)‘𝑊)
mapdpglem.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
mapdpglem.x	⊢ (𝜑 → 𝑋 ∈ 𝑉)
mapdpglem.y	⊢ (𝜑 → 𝑌 ∈ 𝑉)
mapdpglem1.p	⊢ ⊕ = (LSSum‘𝐶)
mapdpglem2.j	⊢ 𝐽 = (LSpan‘𝐶)
mapdpglem3.f	⊢ 𝐹 = (Base‘𝐶)
mapdpglem3.te	⊢ (𝜑 → 𝑡 ∈ ((𝑀‘(𝑁‘{𝑋})) ⊕ (𝑀‘(𝑁‘{𝑌}))))
mapdpglem3.a	⊢ 𝐴 = (Scalar‘𝑈)
mapdpglem3.b	⊢ 𝐵 = (Base‘𝐴)
mapdpglem3.t	⊢ · = ( ·_𝑠 ‘𝐶)
mapdpglem3.r	⊢ 𝑅 = (-_g‘𝐶)
mapdpglem3.g	⊢ (𝜑 → 𝐺 ∈ 𝐹)
mapdpglem3.e	⊢ (𝜑 → (𝑀‘(𝑁‘{𝑋})) = (𝐽‘{𝐺}))
mapdpglem4.q	⊢ 𝑄 = (0_g‘𝑈)
mapdpglem.ne	⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑌}))
mapdpglem4.jt	⊢ (𝜑 → (𝑀‘(𝑁‘{(𝑋 − 𝑌)})) = (𝐽‘{𝑡}))
mapdpglem4.z	⊢ 0 = (0_g‘𝐴)
mapdpglem4.g4	⊢ (𝜑 → 𝑔 ∈ 𝐵)
mapdpglem4.z4	⊢ (𝜑 → 𝑧 ∈ (𝑀‘(𝑁‘{𝑌})))
mapdpglem4.t4	⊢ (𝜑 → 𝑡 = ((𝑔 · 𝐺)𝑅𝑧))
mapdpglem4.xn	⊢ (𝜑 → 𝑋 ≠ 𝑄)
mapdpglem12.yn	⊢ (𝜑 → 𝑌 ≠ 𝑄)
mapdpglem12.g0	⊢ (𝜑 → 𝑧 = (0_g‘𝐶))

**Assertion**
Ref	Expression
mapdpglem14	⊢ (𝜑 → 𝑌 ∈ (𝑁‘{𝑋}))

Distinct variable groups: 𝑡, − 𝑡,𝐶 𝑡,𝐽 𝑡,𝑀 𝑡,𝑁 𝑡,𝑋 𝑡,𝑌 𝐵,𝑔 𝑧,𝑔,𝐶 𝑔,𝐹 𝑔,𝐺,𝑧 𝑔,𝐽,𝑧 𝑔,𝑀,𝑧 𝑔,𝑁,𝑧 𝑅,𝑔,𝑧 · ,𝑔,𝑧 𝑔,𝑌,𝑧,𝑡 Allowed substitution hints: 𝜑(𝑧,𝑡,𝑔) 𝐴(𝑧,𝑡,𝑔) 𝐵(𝑧,𝑡) ⊕ (𝑧,𝑡,𝑔) 𝑄(𝑧,𝑡,𝑔) 𝑅(𝑡) · (𝑡) 𝑈(𝑧,𝑡,𝑔) 𝐹(𝑧,𝑡) 𝐺(𝑡) 𝐻(𝑧,𝑡,𝑔) 𝐾(𝑧,𝑡,𝑔) − (𝑧,𝑔) 𝑉(𝑧,𝑡,𝑔) 𝑊(𝑧,𝑡,𝑔) 𝑋(𝑧,𝑔) 0 (𝑧,𝑡,𝑔)

**Proof of Theorem mapdpglem14**
Step	Hyp	Ref	Expression
1		mapdpglem.h	. . . 4 ⊢ 𝐻 = (LHyp‘𝐾)
2		mapdpglem.u	. . . 4 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
3		mapdpglem.k	. . . 4 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
4	1, 2, 3	dvhlmod 39371	. . 3 ⊢ (𝜑 → 𝑈 ∈ LMod)
5		mapdpglem.y	. . 3 ⊢ (𝜑 → 𝑌 ∈ 𝑉)
6		mapdpglem.x	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝑉)
7		mapdpglem.v	. . . 4 ⊢ 𝑉 = (Base‘𝑈)
8		eqid 2736	. . . 4 ⊢ (+_g‘𝑈) = (+_g‘𝑈)
9		mapdpglem.s	. . . 4 ⊢ − = (-_g‘𝑈)
10	7, 8, 9	lmodvnpcan 20275	. . 3 ⊢ ((𝑈 ∈ LMod ∧ 𝑌 ∈ 𝑉 ∧ 𝑋 ∈ 𝑉) → ((𝑌 − 𝑋)(+_g‘𝑈)𝑋) = 𝑌)
11	4, 5, 6, 10	syl3anc 1370	. 2 ⊢ (𝜑 → ((𝑌 − 𝑋)(+_g‘𝑈)𝑋) = 𝑌)
12		eqid 2736	. . . . 5 ⊢ (LSubSp‘𝑈) = (LSubSp‘𝑈)
13		mapdpglem.n	. . . . 5 ⊢ 𝑁 = (LSpan‘𝑈)
14	7, 12, 13	lspsncl 20337	. . . 4 ⊢ ((𝑈 ∈ LMod ∧ 𝑋 ∈ 𝑉) → (𝑁‘{𝑋}) ∈ (LSubSp‘𝑈))
15	4, 6, 14	syl2anc 584	. . 3 ⊢ (𝜑 → (𝑁‘{𝑋}) ∈ (LSubSp‘𝑈))
16		lmodgrp 20228	. . . . . 6 ⊢ (𝑈 ∈ LMod → 𝑈 ∈ Grp)
17	4, 16	syl 17	. . . . 5 ⊢ (𝜑 → 𝑈 ∈ Grp)
18		eqid 2736	. . . . . 6 ⊢ (inv_g‘𝑈) = (inv_g‘𝑈)
19	7, 9, 18	grpinvsub 18745	. . . . 5 ⊢ ((𝑈 ∈ Grp ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉) → ((inv_g‘𝑈)‘(𝑋 − 𝑌)) = (𝑌 − 𝑋))
20	17, 6, 5, 19	syl3anc 1370	. . . 4 ⊢ (𝜑 → ((inv_g‘𝑈)‘(𝑋 − 𝑌)) = (𝑌 − 𝑋))
21		mapdpglem.m	. . . . . . 7 ⊢ 𝑀 = ((mapd‘𝐾)‘𝑊)
22		mapdpglem.c	. . . . . . 7 ⊢ 𝐶 = ((LCDual‘𝐾)‘𝑊)
23		mapdpglem1.p	. . . . . . 7 ⊢ ⊕ = (LSSum‘𝐶)
24		mapdpglem2.j	. . . . . . 7 ⊢ 𝐽 = (LSpan‘𝐶)
25		mapdpglem3.f	. . . . . . 7 ⊢ 𝐹 = (Base‘𝐶)
26		mapdpglem3.te	. . . . . . 7 ⊢ (𝜑 → 𝑡 ∈ ((𝑀‘(𝑁‘{𝑋})) ⊕ (𝑀‘(𝑁‘{𝑌}))))
27		mapdpglem3.a	. . . . . . 7 ⊢ 𝐴 = (Scalar‘𝑈)
28		mapdpglem3.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐴)
29		mapdpglem3.t	. . . . . . 7 ⊢ · = ( ·_𝑠 ‘𝐶)
30		mapdpglem3.r	. . . . . . 7 ⊢ 𝑅 = (-_g‘𝐶)
31		mapdpglem3.g	. . . . . . 7 ⊢ (𝜑 → 𝐺 ∈ 𝐹)
32		mapdpglem3.e	. . . . . . 7 ⊢ (𝜑 → (𝑀‘(𝑁‘{𝑋})) = (𝐽‘{𝐺}))
33		mapdpglem4.q	. . . . . . 7 ⊢ 𝑄 = (0_g‘𝑈)
34		mapdpglem.ne	. . . . . . 7 ⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑌}))
35		mapdpglem4.jt	. . . . . . 7 ⊢ (𝜑 → (𝑀‘(𝑁‘{(𝑋 − 𝑌)})) = (𝐽‘{𝑡}))
36		mapdpglem4.z	. . . . . . 7 ⊢ 0 = (0_g‘𝐴)
37		mapdpglem4.g4	. . . . . . 7 ⊢ (𝜑 → 𝑔 ∈ 𝐵)
38		mapdpglem4.z4	. . . . . . 7 ⊢ (𝜑 → 𝑧 ∈ (𝑀‘(𝑁‘{𝑌})))
39		mapdpglem4.t4	. . . . . . 7 ⊢ (𝜑 → 𝑡 = ((𝑔 · 𝐺)𝑅𝑧))
40		mapdpglem4.xn	. . . . . . 7 ⊢ (𝜑 → 𝑋 ≠ 𝑄)
41		mapdpglem12.yn	. . . . . . 7 ⊢ (𝜑 → 𝑌 ≠ 𝑄)
42		mapdpglem12.g0	. . . . . . 7 ⊢ (𝜑 → 𝑧 = (0_g‘𝐶))
43	1, 21, 2, 7, 9, 13, 22, 3, 6, 5, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42	mapdpglem13 39945	. . . . . 6 ⊢ (𝜑 → (𝑁‘{(𝑋 − 𝑌)}) ⊆ (𝑁‘{𝑋}))
44	7, 9	lmodvsubcl 20266	. . . . . . . 8 ⊢ ((𝑈 ∈ LMod ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉) → (𝑋 − 𝑌) ∈ 𝑉)
45	4, 6, 5, 44	syl3anc 1370	. . . . . . 7 ⊢ (𝜑 → (𝑋 − 𝑌) ∈ 𝑉)
46	7, 13	lspsnid 20353	. . . . . . 7 ⊢ ((𝑈 ∈ LMod ∧ (𝑋 − 𝑌) ∈ 𝑉) → (𝑋 − 𝑌) ∈ (𝑁‘{(𝑋 − 𝑌)}))
47	4, 45, 46	syl2anc 584	. . . . . 6 ⊢ (𝜑 → (𝑋 − 𝑌) ∈ (𝑁‘{(𝑋 − 𝑌)}))
48	43, 47	sseldd 3932	. . . . 5 ⊢ (𝜑 → (𝑋 − 𝑌) ∈ (𝑁‘{𝑋}))
49	12, 18	lssvnegcl 20316	. . . . 5 ⊢ ((𝑈 ∈ LMod ∧ (𝑁‘{𝑋}) ∈ (LSubSp‘𝑈) ∧ (𝑋 − 𝑌) ∈ (𝑁‘{𝑋})) → ((inv_g‘𝑈)‘(𝑋 − 𝑌)) ∈ (𝑁‘{𝑋}))
50	4, 15, 48, 49	syl3anc 1370	. . . 4 ⊢ (𝜑 → ((inv_g‘𝑈)‘(𝑋 − 𝑌)) ∈ (𝑁‘{𝑋}))
51	20, 50	eqeltrrd 2838	. . 3 ⊢ (𝜑 → (𝑌 − 𝑋) ∈ (𝑁‘{𝑋}))
52	7, 13	lspsnid 20353	. . . 4 ⊢ ((𝑈 ∈ LMod ∧ 𝑋 ∈ 𝑉) → 𝑋 ∈ (𝑁‘{𝑋}))
53	4, 6, 52	syl2anc 584	. . 3 ⊢ (𝜑 → 𝑋 ∈ (𝑁‘{𝑋}))
54	8, 12	lssvacl 20314	. . 3 ⊢ (((𝑈 ∈ LMod ∧ (𝑁‘{𝑋}) ∈ (LSubSp‘𝑈)) ∧ ((𝑌 − 𝑋) ∈ (𝑁‘{𝑋}) ∧ 𝑋 ∈ (𝑁‘{𝑋}))) → ((𝑌 − 𝑋)(+_g‘𝑈)𝑋) ∈ (𝑁‘{𝑋}))
55	4, 15, 51, 53, 54	syl22anc 836	. 2 ⊢ (𝜑 → ((𝑌 − 𝑋)(+_g‘𝑈)𝑋) ∈ (𝑁‘{𝑋}))
56	11, 55	eqeltrrd 2838	1 ⊢ (𝜑 → 𝑌 ∈ (𝑁‘{𝑋}))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 396 = wceq 1540 ∈ wcel 2105 ≠ wne 2940 {csn 4572 ‘cfv 6473 (class class class)co 7329 Basecbs 17001 +_gcplusg 17051 Scalarcsca 17054 ·_𝑠 cvsca 17055 0_gc0g 17239 Grpcgrp 18665 inv_gcminusg 18666 -_gcsg 18667 LSSumclsm 19327 LModclmod 20221 LSubSpclss 20291 LSpanclspn 20331 HLchlt 37610 LHypclh 38245 DVecHcdvh 39339 LCDualclcd 39847 mapdcmpd 39885

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1912 ax-6 1970 ax-7 2010 ax-8 2107 ax-9 2115 ax-10 2136 ax-11 2153 ax-12 2170 ax-ext 2707 ax-rep 5226 ax-sep 5240 ax-nul 5247 ax-pow 5305 ax-pr 5369 ax-un 7642 ax-cnex 11020 ax-resscn 11021 ax-1cn 11022 ax-icn 11023 ax-addcl 11024 ax-addrcl 11025 ax-mulcl 11026 ax-mulrcl 11027 ax-mulcom 11028 ax-addass 11029 ax-mulass 11030 ax-distr 11031 ax-i2m1 11032 ax-1ne0 11033 ax-1rid 11034 ax-rnegex 11035 ax-rrecex 11036 ax-cnre 11037 ax-pre-lttri 11038 ax-pre-lttrn 11039 ax-pre-ltadd 11040 ax-pre-mulgt0 11041 ax-riotaBAD 37213

This theorem depends on definitions: df-bi 206 df-an 397 df-or 845 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1781 df-nf 1785 df-sb 2067 df-mo 2538 df-eu 2567 df-clab 2714 df-cleq 2728 df-clel 2814 df-nfc 2886 df-ne 2941 df-nel 3047 df-ral 3062 df-rex 3071 df-rmo 3349 df-reu 3350 df-rab 3404 df-v 3443 df-sbc 3727 df-csb 3843 df-dif 3900 df-un 3902 df-in 3904 df-ss 3914 df-pss 3916 df-nul 4269 df-if 4473 df-pw 4548 df-sn 4573 df-pr 4575 df-tp 4577 df-op 4579 df-uni 4852 df-int 4894 df-iun 4940 df-iin 4941 df-br 5090 df-opab 5152 df-mpt 5173 df-tr 5207 df-id 5512 df-eprel 5518 df-po 5526 df-so 5527 df-fr 5569 df-we 5571 df-xp 5620 df-rel 5621 df-cnv 5622 df-co 5623 df-dm 5624 df-rn 5625 df-res 5626 df-ima 5627 df-pred 6232 df-ord 6299 df-on 6300 df-lim 6301 df-suc 6302 df-iota 6425 df-fun 6475 df-fn 6476 df-f 6477 df-f1 6478 df-fo 6479 df-f1o 6480 df-fv 6481 df-riota 7286 df-ov 7332 df-oprab 7333 df-mpo 7334 df-of 7587 df-om 7773 df-1st 7891 df-2nd 7892 df-tpos 8104 df-undef 8151 df-frecs 8159 df-wrecs 8190 df-recs 8264 df-rdg 8303 df-1o 8359 df-er 8561 df-map 8680 df-en 8797 df-dom 8798 df-sdom 8799 df-fin 8800 df-pnf 11104 df-mnf 11105 df-xr 11106 df-ltxr 11107 df-le 11108 df-sub 11300 df-neg 11301 df-nn 12067 df-2 12129 df-3 12130 df-4 12131 df-5 12132 df-6 12133 df-n0 12327 df-z 12413 df-uz 12676 df-fz 13333 df-struct 16937 df-sets 16954 df-slot 16972 df-ndx 16984 df-base 17002 df-ress 17031 df-plusg 17064 df-mulr 17065 df-sca 17067 df-vsca 17068 df-0g 17241 df-mre 17384 df-mrc 17385 df-acs 17387 df-proset 18102 df-poset 18120 df-plt 18137 df-lub 18153 df-glb 18154 df-join 18155 df-meet 18156 df-p0 18232 df-p1 18233 df-lat 18239 df-clat 18306 df-mgm 18415 df-sgrp 18464 df-mnd 18475 df-submnd 18520 df-grp 18668 df-minusg 18669 df-sbg 18670 df-subg 18840 df-cntz 19011 df-oppg 19038 df-lsm 19329 df-cmn 19475 df-abl 19476 df-mgp 19808 df-ur 19825 df-ring 19872 df-oppr 19949 df-dvdsr 19970 df-unit 19971 df-invr 20001 df-dvr 20012 df-drng 20087 df-lmod 20223 df-lss 20292 df-lsp 20332 df-lvec 20463 df-lsatoms 37236 df-lshyp 37237 df-lcv 37279 df-lfl 37318 df-lkr 37346 df-ldual 37384 df-oposet 37436 df-ol 37438 df-oml 37439 df-covers 37526 df-ats 37527 df-atl 37558 df-cvlat 37582 df-hlat 37611 df-llines 37759 df-lplanes 37760 df-lvols 37761 df-lines 37762 df-psubsp 37764 df-pmap 37765 df-padd 38057 df-lhyp 38249 df-laut 38250 df-ldil 38365 df-ltrn 38366 df-trl 38420 df-tgrp 39004 df-tendo 39016 df-edring 39018 df-dveca 39264 df-disoa 39290 df-dvech 39340 df-dib 39400 df-dic 39434 df-dih 39490 df-doch 39609 df-djh 39656 df-lcdual 39848 df-mapd 39886

This theorem is referenced by: mapdpglem15 39947

W3C validator