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 37324

Description: Lemma for lclkr 37341. 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 4476	. . . 4 ⊢ (𝜑 → {𝑋} ⊆ 𝑉)
4		lclkrlem2f.h	. . . . 5 ⊢ 𝐻 = (LHyp‘𝐾)
5		eqid 2771	. . . . 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 37161	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ {𝑋} ⊆ 𝑉) → ( ⊥ ‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
10	1, 3, 9	syl2anc 573	. . 3 ⊢ (𝜑 → ( ⊥ ‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
11	4, 5, 8	dochoc 37175	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ( ⊥ ‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊)) → ( ⊥ ‘( ⊥ ‘( ⊥ ‘{𝑋}))) = ( ⊥ ‘{𝑋}))
12	1, 10, 11	syl2anc 573	. 2 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘( ⊥ ‘{𝑋}))) = ( ⊥ ‘{𝑋}))
13		lclkrlem2f.lg	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐿‘𝐺) = ( ⊥ ‘{𝑌}))
14		lclkrlem2j.y	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑌 = 0 )
15	14	sneqd 4329	. . . . . . . . . . . 12 ⊢ (𝜑 → {𝑌} = { 0 })
16	15	fveq2d 6337	. . . . . . . . . . 11 ⊢ (𝜑 → ( ⊥ ‘{𝑌}) = ( ⊥ ‘{ 0 }))
17		eqid 2771	. . . . . . . . . . . . 13 ⊢ (Base‘𝑈) = (Base‘𝑈)
18		lclkrlem2f.z	. . . . . . . . . . . . 13 ⊢ 0 = (0_g‘𝑈)
19	4, 6, 8, 17, 18	doch0 37166	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → ( ⊥ ‘{ 0 }) = (Base‘𝑈))
20	1, 19	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ( ⊥ ‘{ 0 }) = (Base‘𝑈))
21	13, 16, 20	3eqtrd 2809	. . . . . . . . . 10 ⊢ (𝜑 → (𝐿‘𝐺) = (Base‘𝑈))
22	4, 6, 1	dvhlmod 36918	. . . . . . . . . . 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 34901	. . . . . . . . . . 11 ⊢ ((𝑈 ∈ LMod ∧ 𝐺 ∈ 𝐹) → ((𝐿‘𝐺) = (Base‘𝑈) ↔ 𝐺 = ((Base‘𝑈) × {𝑄})))
29	22, 23, 28	syl2anc 573	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐿‘𝐺) = (Base‘𝑈) ↔ 𝐺 = ((Base‘𝑈) × {𝑄})))
30	21, 29	mpbid 222	. . . . . . . . 9 ⊢ (𝜑 → 𝐺 = ((Base‘𝑈) × {𝑄}))
31		lclkrlem2f.d	. . . . . . . . . 10 ⊢ 𝐷 = (LDual‘𝑈)
32		eqid 2771	. . . . . . . . . 10 ⊢ (0_g‘𝐷) = (0_g‘𝐷)
33	17, 24, 25, 31, 32, 22	ldual0v 34957	. . . . . . . . 9 ⊢ (𝜑 → (0_g‘𝐷) = ((Base‘𝑈) × {𝑄}))
34	30, 33	eqtr4d 2808	. . . . . . . 8 ⊢ (𝜑 → 𝐺 = (0_g‘𝐷))
35	34	oveq2d 6812	. . . . . . 7 ⊢ (𝜑 → (𝐸 + 𝐺) = (𝐸 + (0_g‘𝐷)))
36	31, 22	lduallmod 34960	. . . . . . . 8 ⊢ (𝜑 → 𝐷 ∈ LMod)
37		eqid 2771	. . . . . . . . 9 ⊢ (Base‘𝐷) = (Base‘𝐷)
38		lclkrlem2f.e	. . . . . . . . 9 ⊢ (𝜑 → 𝐸 ∈ 𝐹)
39	26, 31, 37, 22, 38	ldualelvbase 34934	. . . . . . . 8 ⊢ (𝜑 → 𝐸 ∈ (Base‘𝐷))
40		lclkrlem2f.p	. . . . . . . . 9 ⊢ + = (+_g‘𝐷)
41	37, 40, 32	lmod0vrid 19104	. . . . . . . 8 ⊢ ((𝐷 ∈ LMod ∧ 𝐸 ∈ (Base‘𝐷)) → (𝐸 + (0_g‘𝐷)) = 𝐸)
42	36, 39, 41	syl2anc 573	. . . . . . 7 ⊢ (𝜑 → (𝐸 + (0_g‘𝐷)) = 𝐸)
43	35, 42	eqtrd 2805	. . . . . 6 ⊢ (𝜑 → (𝐸 + 𝐺) = 𝐸)
44	43	fveq2d 6337	. . . . 5 ⊢ (𝜑 → (𝐿‘(𝐸 + 𝐺)) = (𝐿‘𝐸))
45		lclkrlem2f.le	. . . . 5 ⊢ (𝜑 → (𝐿‘𝐸) = ( ⊥ ‘{𝑋}))
46	44, 45	eqtr2d 2806	. . . 4 ⊢ (𝜑 → ( ⊥ ‘{𝑋}) = (𝐿‘(𝐸 + 𝐺)))
47	46	fveq2d 6337	. . 3 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘{𝑋})) = ( ⊥ ‘(𝐿‘(𝐸 + 𝐺))))
48	47	fveq2d 6337	. 2 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘( ⊥ ‘{𝑋}))) = ( ⊥ ‘( ⊥ ‘(𝐿‘(𝐸 + 𝐺)))))
49	12, 48, 46	3eqtr3d 2813	1 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘(𝐿‘(𝐸 + 𝐺)))) = (𝐿‘(𝐸 + 𝐺)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 196 ∧ wa 382 ∨ wo 836 = wceq 1631 ∈ wcel 2145 ∖ cdif 3720 ⊆ wss 3723 {csn 4317 × cxp 5248 ran crn 5251 ‘cfv 6030 (class class class)co 6796 Basecbs 16064 +_gcplusg 16149 Scalarcsca 16152 0_gc0g 16308 LSSumclsm 18256 LModclmod 19073 LSpanclspn 19184 LSHypclsh 34782 LFnlclfn 34864 LKerclk 34892 LDualcld 34930 HLchlt 35157 LHypclh 35791 DVecHcdvh 36886 DIsoHcdih 37036 ocHcoch 37155

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1870 ax-4 1885 ax-5 1991 ax-6 2057 ax-7 2093 ax-8 2147 ax-9 2154 ax-10 2174 ax-11 2190 ax-12 2203 ax-13 2408 ax-ext 2751 ax-rep 4905 ax-sep 4916 ax-nul 4924 ax-pow 4975 ax-pr 5035 ax-un 7100 ax-cnex 10198 ax-resscn 10199 ax-1cn 10200 ax-icn 10201 ax-addcl 10202 ax-addrcl 10203 ax-mulcl 10204 ax-mulrcl 10205 ax-mulcom 10206 ax-addass 10207 ax-mulass 10208 ax-distr 10209 ax-i2m1 10210 ax-1ne0 10211 ax-1rid 10212 ax-rnegex 10213 ax-rrecex 10214 ax-cnre 10215 ax-pre-lttri 10216 ax-pre-lttrn 10217 ax-pre-ltadd 10218 ax-pre-mulgt0 10219 ax-riotaBAD 34759

This theorem depends on definitions: df-bi 197 df-an 383 df-or 837 df-3or 1072 df-3an 1073 df-tru 1634 df-fal 1637 df-ex 1853 df-nf 1858 df-sb 2050 df-eu 2622 df-mo 2623 df-clab 2758 df-cleq 2764 df-clel 2767 df-nfc 2902 df-ne 2944 df-nel 3047 df-ral 3066 df-rex 3067 df-reu 3068 df-rmo 3069 df-rab 3070 df-v 3353 df-sbc 3588 df-csb 3683 df-dif 3726 df-un 3728 df-in 3730 df-ss 3737 df-pss 3739 df-nul 4064 df-if 4227 df-pw 4300 df-sn 4318 df-pr 4320 df-tp 4322 df-op 4324 df-uni 4576 df-int 4613 df-iun 4657 df-iin 4658 df-br 4788 df-opab 4848 df-mpt 4865 df-tr 4888 df-id 5158 df-eprel 5163 df-po 5171 df-so 5172 df-fr 5209 df-we 5211 df-xp 5256 df-rel 5257 df-cnv 5258 df-co 5259 df-dm 5260 df-rn 5261 df-res 5262 df-ima 5263 df-pred 5822 df-ord 5868 df-on 5869 df-lim 5870 df-suc 5871 df-iota 5993 df-fun 6032 df-fn 6033 df-f 6034 df-f1 6035 df-fo 6036 df-f1o 6037 df-fv 6038 df-riota 6757 df-ov 6799 df-oprab 6800 df-mpt2 6801 df-of 7048 df-om 7217 df-1st 7319 df-2nd 7320 df-tpos 7508 df-undef 7555 df-wrecs 7563 df-recs 7625 df-rdg 7663 df-1o 7717 df-oadd 7721 df-er 7900 df-map 8015 df-en 8114 df-dom 8115 df-sdom 8116 df-fin 8117 df-pnf 10282 df-mnf 10283 df-xr 10284 df-ltxr 10285 df-le 10286 df-sub 10474 df-neg 10475 df-nn 11227 df-2 11285 df-3 11286 df-4 11287 df-5 11288 df-6 11289 df-n0 11500 df-z 11585 df-uz 11894 df-fz 12534 df-struct 16066 df-ndx 16067 df-slot 16068 df-base 16070 df-sets 16071 df-ress 16072 df-plusg 16162 df-mulr 16163 df-sca 16165 df-vsca 16166 df-0g 16310 df-preset 17136 df-poset 17154 df-plt 17166 df-lub 17182 df-glb 17183 df-join 17184 df-meet 17185 df-p0 17247 df-p1 17248 df-lat 17254 df-clat 17316 df-mgm 17450 df-sgrp 17492 df-mnd 17503 df-submnd 17544 df-grp 17633 df-minusg 17634 df-sbg 17635 df-subg 17799 df-cntz 17957 df-lsm 18258 df-cmn 18402 df-abl 18403 df-mgp 18698 df-ur 18710 df-ring 18757 df-oppr 18831 df-dvdsr 18849 df-unit 18850 df-invr 18880 df-dvr 18891 df-drng 18959 df-lmod 19075 df-lss 19143 df-lsp 19185 df-lvec 19316 df-lfl 34865 df-lkr 34893 df-ldual 34931 df-oposet 34983 df-ol 34985 df-oml 34986 df-covers 35073 df-ats 35074 df-atl 35105 df-cvlat 35129 df-hlat 35158 df-llines 35305 df-lplanes 35306 df-lvols 35307 df-lines 35308 df-psubsp 35310 df-pmap 35311 df-padd 35603 df-lhyp 35795 df-laut 35796 df-ldil 35911 df-ltrn 35912 df-trl 35967 df-tendo 36563 df-edring 36565 df-disoa 36837 df-dvech 36887 df-dib 36947 df-dic 36981 df-dih 37037 df-doch 37156

This theorem is referenced by: lclkrlem2k 37325 lclkrlem2l 37326

W3C validator