lclkrlem2j - Mathbox for Norm Megill

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

Theorem lclkrlem2j 42574

Description: Lemma for lclkr 42591. Kernel closure when 𝑌 is zero. (Contributed by NM, 18-Jan-2015.)

**Hypotheses**
Ref	Expression
lclkrlem2f.h	⊢ 𝐻 = (LHyp‘𝐾)
lclkrlem2f.o	⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
lclkrlem2f.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
lclkrlem2f.v	⊢ 𝑉 = (Base‘𝑈)
lclkrlem2f.s	⊢ 𝑆 = (Scalar‘𝑈)
lclkrlem2f.q	⊢ 𝑄 = (0_g‘𝑆)
lclkrlem2f.z	⊢ 0 = (0_g‘𝑈)
lclkrlem2f.a	⊢ ⊕ = (LSSum‘𝑈)
lclkrlem2f.n	⊢ 𝑁 = (LSpan‘𝑈)
lclkrlem2f.f	⊢ 𝐹 = (LFnl‘𝑈)
lclkrlem2f.j	⊢ 𝐽 = (LSHyp‘𝑈)
lclkrlem2f.l	⊢ 𝐿 = (LKer‘𝑈)
lclkrlem2f.d	⊢ 𝐷 = (LDual‘𝑈)
lclkrlem2f.p	⊢ + = (+_g‘𝐷)
lclkrlem2f.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
lclkrlem2f.b	⊢ (𝜑 → 𝐵 ∈ (𝑉 ∖ { 0 }))
lclkrlem2f.e	⊢ (𝜑 → 𝐸 ∈ 𝐹)
lclkrlem2f.g	⊢ (𝜑 → 𝐺 ∈ 𝐹)
lclkrlem2f.le	⊢ (𝜑 → (𝐿‘𝐸) = ( ⊥ ‘{𝑋}))
lclkrlem2f.lg	⊢ (𝜑 → (𝐿‘𝐺) = ( ⊥ ‘{𝑌}))
lclkrlem2f.kb	⊢ (𝜑 → ((𝐸 + 𝐺)‘𝐵) = 𝑄)
lclkrlem2f.nx	⊢ (𝜑 → (¬ 𝑋 ∈ ( ⊥ ‘{𝐵}) ∨ ¬ 𝑌 ∈ ( ⊥ ‘{𝐵})))
lclkrlem2j.x	⊢ (𝜑 → 𝑋 ∈ 𝑉)
lclkrlem2j.y	⊢ (𝜑 → 𝑌 = 0 )

**Assertion**
Ref	Expression
lclkrlem2j	⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘(𝐿‘(𝐸 + 𝐺)))) = (𝐿‘(𝐸 + 𝐺)))

**Proof of Theorem lclkrlem2j**
Step	Hyp	Ref	Expression
1		lclkrlem2f.k	. . 3 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
2		lclkrlem2j.x	. . . . 5 ⊢ (𝜑 → 𝑋 ∈ 𝑉)
3	2	snssd 4747	. . . 4 ⊢ (𝜑 → {𝑋} ⊆ 𝑉)
4		lclkrlem2f.h	. . . . 5 ⊢ 𝐻 = (LHyp‘𝐾)
5		eqid 2761	. . . . 5 ⊢ ((DIsoH‘𝐾)‘𝑊) = ((DIsoH‘𝐾)‘𝑊)
6		lclkrlem2f.u	. . . . 5 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
7		lclkrlem2f.v	. . . . 5 ⊢ 𝑉 = (Base‘𝑈)
8		lclkrlem2f.o	. . . . 5 ⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
9	4, 5, 6, 7, 8	dochcl 42411	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ {𝑋} ⊆ 𝑉) → ( ⊥ ‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
10	1, 3, 9	syl2anc 596	. . 3 ⊢ (𝜑 → ( ⊥ ‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
11	4, 5, 8	dochoc 42425	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ( ⊥ ‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊)) → ( ⊥ ‘( ⊥ ‘( ⊥ ‘{𝑋}))) = ( ⊥ ‘{𝑋}))
12	1, 10, 11	syl2anc 596	. 2 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘( ⊥ ‘{𝑋}))) = ( ⊥ ‘{𝑋}))
13		lclkrlem2f.lg	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐿‘𝐺) = ( ⊥ ‘{𝑌}))
14		lclkrlem2j.y	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑌 = 0 )
15	14	sneqd 4596	. . . . . . . . . . . 12 ⊢ (𝜑 → {𝑌} = { 0 })
16	15	fveq2d 6889	. . . . . . . . . . 11 ⊢ (𝜑 → ( ⊥ ‘{𝑌}) = ( ⊥ ‘{ 0 }))
17		eqid 2761	. . . . . . . . . . . . 13 ⊢ (Base‘𝑈) = (Base‘𝑈)
18		lclkrlem2f.z	. . . . . . . . . . . . 13 ⊢ 0 = (0_g‘𝑈)
19	4, 6, 8, 17, 18	doch0 42416	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → ( ⊥ ‘{ 0 }) = (Base‘𝑈))
20	1, 19	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → ( ⊥ ‘{ 0 }) = (Base‘𝑈))
21	13, 16, 20	3eqtrd 2800	. . . . . . . . . 10 ⊢ (𝜑 → (𝐿‘𝐺) = (Base‘𝑈))
22	4, 6, 1	dvhlmod 42168	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑈 ∈ LMod)
23		lclkrlem2f.g	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺 ∈ 𝐹)
24		lclkrlem2f.s	. . . . . . . . . . . 12 ⊢ 𝑆 = (Scalar‘𝑈)
25		lclkrlem2f.q	. . . . . . . . . . . 12 ⊢ 𝑄 = (0_g‘𝑆)
26		lclkrlem2f.f	. . . . . . . . . . . 12 ⊢ 𝐹 = (LFnl‘𝑈)
27		lclkrlem2f.l	. . . . . . . . . . . 12 ⊢ 𝐿 = (LKer‘𝑈)
28	24, 25, 17, 26, 27	lkr0f 40152	. . . . . . . . . . 11 ⊢ ((𝑈 ∈ LMod ∧ 𝐺 ∈ 𝐹) → ((𝐿‘𝐺) = (Base‘𝑈) ↔ 𝐺 = ((Base‘𝑈) × {𝑄})))
29	22, 23, 28	syl2anc 596	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐿‘𝐺) = (Base‘𝑈) ↔ 𝐺 = ((Base‘𝑈) × {𝑄})))
30	21, 29	mpbid 235	. . . . . . . . 9 ⊢ (𝜑 → 𝐺 = ((Base‘𝑈) × {𝑄}))
31		lclkrlem2f.d	. . . . . . . . . 10 ⊢ 𝐷 = (LDual‘𝑈)
32		eqid 2761	. . . . . . . . . 10 ⊢ (0_g‘𝐷) = (0_g‘𝐷)
33	17, 24, 25, 31, 32, 22	ldual0v 40208	. . . . . . . . 9 ⊢ (𝜑 → (0_g‘𝐷) = ((Base‘𝑈) × {𝑄}))
34	30, 33	eqtr4d 2799	. . . . . . . 8 ⊢ (𝜑 → 𝐺 = (0_g‘𝐷))
35	34	oveq2d 7436	. . . . . . 7 ⊢ (𝜑 → (𝐸 + 𝐺) = (𝐸 + (0_g‘𝐷)))
36	31, 22	lduallmod 40211	. . . . . . . 8 ⊢ (𝜑 → 𝐷 ∈ LMod)
37		eqid 2761	. . . . . . . . 9 ⊢ (Base‘𝐷) = (Base‘𝐷)
38		lclkrlem2f.e	. . . . . . . . 9 ⊢ (𝜑 → 𝐸 ∈ 𝐹)
39	26, 31, 37, 22, 38	ldualelvbase 40185	. . . . . . . 8 ⊢ (𝜑 → 𝐸 ∈ (Base‘𝐷))
40		lclkrlem2f.p	. . . . . . . . 9 ⊢ + = (+_g‘𝐷)
41	37, 40, 32	lmod0vrid 21168	. . . . . . . 8 ⊢ ((𝐷 ∈ LMod ∧ 𝐸 ∈ (Base‘𝐷)) → (𝐸 + (0_g‘𝐷)) = 𝐸)
42	36, 39, 41	syl2anc 596	. . . . . . 7 ⊢ (𝜑 → (𝐸 + (0_g‘𝐷)) = 𝐸)
43	35, 42	eqtrd 2796	. . . . . 6 ⊢ (𝜑 → (𝐸 + 𝐺) = 𝐸)
44	43	fveq2d 6889	. . . . 5 ⊢ (𝜑 → (𝐿‘(𝐸 + 𝐺)) = (𝐿‘𝐸))
45		lclkrlem2f.le	. . . . 5 ⊢ (𝜑 → (𝐿‘𝐸) = ( ⊥ ‘{𝑋}))
46	44, 45	eqtr2d 2797	. . . 4 ⊢ (𝜑 → ( ⊥ ‘{𝑋}) = (𝐿‘(𝐸 + 𝐺)))
47	46	fveq2d 6889	. . 3 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘{𝑋})) = ( ⊥ ‘(𝐿‘(𝐸 + 𝐺))))
48	47	fveq2d 6889	. 2 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘( ⊥ ‘{𝑋}))) = ( ⊥ ‘( ⊥ ‘(𝐿‘(𝐸 + 𝐺)))))
49	12, 48, 46	3eqtr3d 2804	1 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘(𝐿‘(𝐸 + 𝐺)))) = (𝐿‘(𝐸 + 𝐺)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 = wceq 1570 ∈ wcel 2145 ∖ cdif 3896 ⊆ wss 3899 {csn 4584 × cxp 5649 ran crn 5652 ‘cfv 6538 (class class class)co 7420 Basecbs 17387 +_gcplusg 17428 Scalarcsca 17431 0_gc0g 17610 LSSumclsm 19848 LModclmod 21135 LSpanclspn 21246 LSHypclsh 40033 LFnlclfn 40115 LKerclk 40143 LDualcld 40181 HLchlt 40408 LHypclh 41042 DVecHcdvh 42136 DIsoHcdih 42286 ocHcoch 42405

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2733 ax-rep 5232 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7751 ax-cnex 11256 ax-resscn 11257 ax-1cn 11258 ax-icn 11259 ax-addcl 11260 ax-addrcl 11261 ax-mulcl 11262 ax-mulrcl 11263 ax-mulcom 11264 ax-addass 11265 ax-mulass 11266 ax-distr 11267 ax-i2m1 11268 ax-1ne0 11269 ax-1rid 11270 ax-rnegex 11271 ax-rrecex 11272 ax-cnre 11273 ax-pre-lttri 11274 ax-pre-lttrn 11275 ax-pre-ltadd 11276 ax-pre-mulgt0 11277 ax-riotaBAD 40011

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2565 df-eu 2595 df-clab 2740 df-cleq 2753 df-clel 2836 df-nfc 2910 df-ne 2957 df-nel 3063 df-ral 3078 df-rex 3088 df-rmo 3366 df-reu 3367 df-rab 3414 df-v 3453 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-tp 4589 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-iin 4954 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6540 df-fn 6541 df-f 6542 df-f1 6543 df-fo 6544 df-f1o 6545 df-fv 6546 df-riota 7377 df-ov 7423 df-oprab 7424 df-mpo 7425 df-of 7693 df-om 7878 df-1st 8001 df-2nd 8002 df-tpos 8243 df-undef 8290 df-frecs 8299 df-wrecs 8330 df-recs 8379 df-rdg 8418 df-1o 8476 df-er 8717 df-map 8849 df-en 8974 df-dom 8975 df-sdom 8976 df-fin 8977 df-pnf 11345 df-mnf 11346 df-xr 11347 df-ltxr 11348 df-le 11349 df-sub 11543 df-neg 11544 df-nn 12336 df-2 12405 df-3 12406 df-4 12407 df-5 12408 df-6 12409 df-n0 12607 df-z 12694 df-uz 12966 df-fz 13640 df-struct 17325 df-sets 17342 df-slot 17360 df-ndx 17372 df-base 17388 df-ress 17409 df-plusg 17441 df-mulr 17442 df-sca 17444 df-vsca 17445 df-0g 17612 df-proset 18468 df-poset 18487 df-plt 18502 df-lub 18518 df-glb 18519 df-join 18520 df-meet 18521 df-p0 18597 df-p1 18598 df-lat 18606 df-clat 18673 df-mgm 18816 df-sgrp 18908 df-mnd 18924 df-submnd 18979 df-grp 19147 df-minusg 19148 df-sbg 19149 df-subg 19333 df-cntz 19531 df-lsm 19850 df-cmn 19996 df-abl 19997 df-mgp 20361 df-rng 20375 df-ur 20408 df-ring 20461 df-oppr 20567 df-dvdsr 20587 df-unit 20588 df-invr 20618 df-dvr 20631 df-drng 20982 df-lmod 21137 df-lss 21207 df-lsp 21247 df-lvec 21378 df-lfl 40116 df-lkr 40144 df-ldual 40182 df-oposet 40234 df-ol 40236 df-oml 40237 df-covers 40324 df-ats 40325 df-atl 40356 df-cvlat 40380 df-hlat 40409 df-llines 40556 df-lplanes 40557 df-lvols 40558 df-lines 40559 df-psubsp 40561 df-pmap 40562 df-padd 40854 df-lhyp 41046 df-laut 41047 df-ldil 41162 df-ltrn 41163 df-trl 41217 df-tendo 41813 df-edring 41815 df-disoa 42087 df-dvech 42137 df-dib 42197 df-dic 42231 df-dih 42287 df-doch 42406

This theorem is used by: lclkrlem2k 42575 lclkrlem2l 42576

W3C validator