lcfrlem33 - Mathbox for Norm Megill

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

Theorem lcfrlem33 42021

Description: Lemma for lcfr 42031. (Contributed by NM, 10-Mar-2015.)

**Hypotheses**
Ref	Expression
lcfrlem17.h	⊢ 𝐻 = (LHyp‘𝐾)
lcfrlem17.o	⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
lcfrlem17.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
lcfrlem17.v	⊢ 𝑉 = (Base‘𝑈)
lcfrlem17.p	⊢ + = (+_g‘𝑈)
lcfrlem17.z	⊢ 0 = (0_g‘𝑈)
lcfrlem17.n	⊢ 𝑁 = (LSpan‘𝑈)
lcfrlem17.a	⊢ 𝐴 = (LSAtoms‘𝑈)
lcfrlem17.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
lcfrlem17.x	⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 }))
lcfrlem17.y	⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 }))
lcfrlem17.ne	⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑌}))
lcfrlem22.b	⊢ 𝐵 = ((𝑁‘{𝑋, 𝑌}) ∩ ( ⊥ ‘{(𝑋 + 𝑌)}))
lcfrlem24.t	⊢ · = ( ·_𝑠 ‘𝑈)
lcfrlem24.s	⊢ 𝑆 = (Scalar‘𝑈)
lcfrlem24.q	⊢ 𝑄 = (0_g‘𝑆)
lcfrlem24.r	⊢ 𝑅 = (Base‘𝑆)
lcfrlem24.j	⊢ 𝐽 = (𝑥 ∈ (𝑉 ∖ { 0 }) ↦ (𝑣 ∈ 𝑉 ↦ (℩𝑘 ∈ 𝑅 ∃𝑤 ∈ ( ⊥ ‘{𝑥})𝑣 = (𝑤 + (𝑘 · 𝑥)))))
lcfrlem24.ib	⊢ (𝜑 → 𝐼 ∈ 𝐵)
lcfrlem24.l	⊢ 𝐿 = (LKer‘𝑈)
lcfrlem25.d	⊢ 𝐷 = (LDual‘𝑈)
lcfrlem28.jn	⊢ (𝜑 → ((𝐽‘𝑌)‘𝐼) ≠ 𝑄)
lcfrlem29.i	⊢ 𝐹 = (inv_r‘𝑆)
lcfrlem30.m	⊢ − = (-_g‘𝐷)
lcfrlem30.c	⊢ 𝐶 = ((𝐽‘𝑋) − (((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)((𝐽‘𝑋)‘𝐼))( ·_𝑠 ‘𝐷)(𝐽‘𝑌)))
lcfrlem33.xi	⊢ (𝜑 → ((𝐽‘𝑋)‘𝐼) = 𝑄)

**Assertion**
Ref	Expression
lcfrlem33	⊢ (𝜑 → 𝐶 ≠ (0_g‘𝐷))

Distinct variable groups: 𝑣,𝑘,𝑤,𝑥, ⊥ + ,𝑘,𝑣,𝑤,𝑥 𝑅,𝑘,𝑣,𝑥 𝑆,𝑘 · ,𝑘,𝑣,𝑤,𝑥 𝑣,𝑉,𝑥 𝑘,𝑋,𝑣,𝑤,𝑥 𝑘,𝑌,𝑣,𝑤,𝑥 𝑥, 0 Allowed substitution hints: 𝜑(𝑥,𝑤,𝑣,𝑘) 𝐴(𝑥,𝑤,𝑣,𝑘) 𝐵(𝑥,𝑤,𝑣,𝑘) 𝐶(𝑥,𝑤,𝑣,𝑘) 𝐷(𝑥,𝑤,𝑣,𝑘) 𝑄(𝑥,𝑤,𝑣,𝑘) 𝑅(𝑤) 𝑆(𝑥,𝑤,𝑣) 𝑈(𝑥,𝑤,𝑣,𝑘) 𝐹(𝑥,𝑤,𝑣,𝑘) 𝐻(𝑥,𝑤,𝑣,𝑘) 𝐼(𝑥,𝑤,𝑣,𝑘) 𝐽(𝑥,𝑤,𝑣,𝑘) 𝐾(𝑥,𝑤,𝑣,𝑘) 𝐿(𝑥,𝑤,𝑣,𝑘) − (𝑥,𝑤,𝑣,𝑘) 𝑁(𝑥,𝑤,𝑣,𝑘) 𝑉(𝑤,𝑘) 𝑊(𝑥,𝑤,𝑣,𝑘) 0 (𝑤,𝑣,𝑘)

Proof of Theorem lcfrlem33 Dummy variable 𝑓 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		lcfrlem30.c	. . 3 ⊢ 𝐶 = ((𝐽‘𝑋) − (((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)((𝐽‘𝑋)‘𝐼))( ·_𝑠 ‘𝐷)(𝐽‘𝑌)))
2		lcfrlem33.xi	. . . . . . . . 9 ⊢ (𝜑 → ((𝐽‘𝑋)‘𝐼) = 𝑄)
3	2	oveq2d 7383	. . . . . . . 8 ⊢ (𝜑 → ((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)((𝐽‘𝑋)‘𝐼)) = ((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)𝑄))
4		lcfrlem17.h	. . . . . . . . . . 11 ⊢ 𝐻 = (LHyp‘𝐾)
5		lcfrlem17.u	. . . . . . . . . . 11 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
6		lcfrlem17.k	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
7	4, 5, 6	dvhlmod 41556	. . . . . . . . . 10 ⊢ (𝜑 → 𝑈 ∈ LMod)
8		lcfrlem24.s	. . . . . . . . . . 11 ⊢ 𝑆 = (Scalar‘𝑈)
9	8	lmodring 20863	. . . . . . . . . 10 ⊢ (𝑈 ∈ LMod → 𝑆 ∈ Ring)
10	7, 9	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ Ring)
11	4, 5, 6	dvhlvec 41555	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑈 ∈ LVec)
12	8	lvecdrng 21100	. . . . . . . . . . 11 ⊢ (𝑈 ∈ LVec → 𝑆 ∈ DivRing)
13	11, 12	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ∈ DivRing)
14		lcfrlem17.o	. . . . . . . . . . . 12 ⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
15		lcfrlem17.v	. . . . . . . . . . . 12 ⊢ 𝑉 = (Base‘𝑈)
16		lcfrlem17.p	. . . . . . . . . . . 12 ⊢ + = (+_g‘𝑈)
17		lcfrlem24.t	. . . . . . . . . . . 12 ⊢ · = ( ·_𝑠 ‘𝑈)
18		lcfrlem24.r	. . . . . . . . . . . 12 ⊢ 𝑅 = (Base‘𝑆)
19		lcfrlem17.z	. . . . . . . . . . . 12 ⊢ 0 = (0_g‘𝑈)
20		eqid 2736	. . . . . . . . . . . 12 ⊢ (LFnl‘𝑈) = (LFnl‘𝑈)
21		lcfrlem24.l	. . . . . . . . . . . 12 ⊢ 𝐿 = (LKer‘𝑈)
22		lcfrlem25.d	. . . . . . . . . . . 12 ⊢ 𝐷 = (LDual‘𝑈)
23		eqid 2736	. . . . . . . . . . . 12 ⊢ (0_g‘𝐷) = (0_g‘𝐷)
24		eqid 2736	. . . . . . . . . . . 12 ⊢ {𝑓 ∈ (LFnl‘𝑈) ∣ ( ⊥ ‘( ⊥ ‘(𝐿‘𝑓))) = (𝐿‘𝑓)} = {𝑓 ∈ (LFnl‘𝑈) ∣ ( ⊥ ‘( ⊥ ‘(𝐿‘𝑓))) = (𝐿‘𝑓)}
25		lcfrlem24.j	. . . . . . . . . . . 12 ⊢ 𝐽 = (𝑥 ∈ (𝑉 ∖ { 0 }) ↦ (𝑣 ∈ 𝑉 ↦ (℩𝑘 ∈ 𝑅 ∃𝑤 ∈ ( ⊥ ‘{𝑥})𝑣 = (𝑤 + (𝑘 · 𝑥)))))
26		lcfrlem17.y	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 }))
27	4, 14, 5, 15, 16, 17, 8, 18, 19, 20, 21, 22, 23, 24, 25, 6, 26	lcfrlem10 41998	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐽‘𝑌) ∈ (LFnl‘𝑈))
28		lcfrlem17.a	. . . . . . . . . . . . 13 ⊢ 𝐴 = (LSAtoms‘𝑈)
29		lcfrlem17.n	. . . . . . . . . . . . . 14 ⊢ 𝑁 = (LSpan‘𝑈)
30		lcfrlem17.x	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 }))
31		lcfrlem17.ne	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑌}))
32		lcfrlem22.b	. . . . . . . . . . . . . 14 ⊢ 𝐵 = ((𝑁‘{𝑋, 𝑌}) ∩ ( ⊥ ‘{(𝑋 + 𝑌)}))
33	4, 14, 5, 15, 16, 19, 29, 28, 6, 30, 26, 31, 32	lcfrlem22 42010	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐵 ∈ 𝐴)
34	15, 28, 7, 33	lsatssv 39444	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐵 ⊆ 𝑉)
35		lcfrlem24.ib	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐼 ∈ 𝐵)
36	34, 35	sseldd 3922	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐼 ∈ 𝑉)
37	8, 18, 15, 20	lflcl 39510	. . . . . . . . . . 11 ⊢ ((𝑈 ∈ LMod ∧ (𝐽‘𝑌) ∈ (LFnl‘𝑈) ∧ 𝐼 ∈ 𝑉) → ((𝐽‘𝑌)‘𝐼) ∈ 𝑅)
38	7, 27, 36, 37	syl3anc 1374	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐽‘𝑌)‘𝐼) ∈ 𝑅)
39		lcfrlem28.jn	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐽‘𝑌)‘𝐼) ≠ 𝑄)
40		lcfrlem24.q	. . . . . . . . . . 11 ⊢ 𝑄 = (0_g‘𝑆)
41		lcfrlem29.i	. . . . . . . . . . 11 ⊢ 𝐹 = (inv_r‘𝑆)
42	18, 40, 41	drnginvrcl 20730	. . . . . . . . . 10 ⊢ ((𝑆 ∈ DivRing ∧ ((𝐽‘𝑌)‘𝐼) ∈ 𝑅 ∧ ((𝐽‘𝑌)‘𝐼) ≠ 𝑄) → (𝐹‘((𝐽‘𝑌)‘𝐼)) ∈ 𝑅)
43	13, 38, 39, 42	syl3anc 1374	. . . . . . . . 9 ⊢ (𝜑 → (𝐹‘((𝐽‘𝑌)‘𝐼)) ∈ 𝑅)
44		eqid 2736	. . . . . . . . . 10 ⊢ (._r‘𝑆) = (._r‘𝑆)
45	18, 44, 40	ringrz 20275	. . . . . . . . 9 ⊢ ((𝑆 ∈ Ring ∧ (𝐹‘((𝐽‘𝑌)‘𝐼)) ∈ 𝑅) → ((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)𝑄) = 𝑄)
46	10, 43, 45	syl2anc 585	. . . . . . . 8 ⊢ (𝜑 → ((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)𝑄) = 𝑄)
47	3, 46	eqtrd 2771	. . . . . . 7 ⊢ (𝜑 → ((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)((𝐽‘𝑋)‘𝐼)) = 𝑄)
48	47	oveq1d 7382	. . . . . 6 ⊢ (𝜑 → (((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)((𝐽‘𝑋)‘𝐼))( ·_𝑠 ‘𝐷)(𝐽‘𝑌)) = (𝑄( ·_𝑠 ‘𝐷)(𝐽‘𝑌)))
49		eqid 2736	. . . . . . 7 ⊢ ( ·_𝑠 ‘𝐷) = ( ·_𝑠 ‘𝐷)
50	20, 8, 40, 22, 49, 23, 7, 27	ldual0vs 39606	. . . . . 6 ⊢ (𝜑 → (𝑄( ·_𝑠 ‘𝐷)(𝐽‘𝑌)) = (0_g‘𝐷))
51	48, 50	eqtrd 2771	. . . . 5 ⊢ (𝜑 → (((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)((𝐽‘𝑋)‘𝐼))( ·_𝑠 ‘𝐷)(𝐽‘𝑌)) = (0_g‘𝐷))
52	51	oveq2d 7383	. . . 4 ⊢ (𝜑 → ((𝐽‘𝑋) − (((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)((𝐽‘𝑋)‘𝐼))( ·_𝑠 ‘𝐷)(𝐽‘𝑌))) = ((𝐽‘𝑋) − (0_g‘𝐷)))
53	22, 7	ldualgrp 39592	. . . . 5 ⊢ (𝜑 → 𝐷 ∈ Grp)
54		eqid 2736	. . . . . 6 ⊢ (Base‘𝐷) = (Base‘𝐷)
55	4, 14, 5, 15, 16, 17, 8, 18, 19, 20, 21, 22, 23, 24, 25, 6, 30	lcfrlem10 41998	. . . . . 6 ⊢ (𝜑 → (𝐽‘𝑋) ∈ (LFnl‘𝑈))
56	20, 22, 54, 7, 55	ldualelvbase 39573	. . . . 5 ⊢ (𝜑 → (𝐽‘𝑋) ∈ (Base‘𝐷))
57		lcfrlem30.m	. . . . . 6 ⊢ − = (-_g‘𝐷)
58	54, 23, 57	grpsubid1 19001	. . . . 5 ⊢ ((𝐷 ∈ Grp ∧ (𝐽‘𝑋) ∈ (Base‘𝐷)) → ((𝐽‘𝑋) − (0_g‘𝐷)) = (𝐽‘𝑋))
59	53, 56, 58	syl2anc 585	. . . 4 ⊢ (𝜑 → ((𝐽‘𝑋) − (0_g‘𝐷)) = (𝐽‘𝑋))
60	52, 59	eqtrd 2771	. . 3 ⊢ (𝜑 → ((𝐽‘𝑋) − (((𝐹‘((𝐽‘𝑌)‘𝐼))(._r‘𝑆)((𝐽‘𝑋)‘𝐼))( ·_𝑠 ‘𝐷)(𝐽‘𝑌))) = (𝐽‘𝑋))
61	1, 60	eqtrid 2783	. 2 ⊢ (𝜑 → 𝐶 = (𝐽‘𝑋))
62	4, 14, 5, 15, 16, 17, 8, 18, 19, 20, 21, 22, 23, 24, 25, 6, 30	lcfrlem13 42001	. . 3 ⊢ (𝜑 → (𝐽‘𝑋) ∈ ({𝑓 ∈ (LFnl‘𝑈) ∣ ( ⊥ ‘( ⊥ ‘(𝐿‘𝑓))) = (𝐿‘𝑓)} ∖ {(0_g‘𝐷)}))
63		eldifsni 4735	. . 3 ⊢ ((𝐽‘𝑋) ∈ ({𝑓 ∈ (LFnl‘𝑈) ∣ ( ⊥ ‘( ⊥ ‘(𝐿‘𝑓))) = (𝐿‘𝑓)} ∖ {(0_g‘𝐷)}) → (𝐽‘𝑋) ≠ (0_g‘𝐷))
64	62, 63	syl 17	. 2 ⊢ (𝜑 → (𝐽‘𝑋) ≠ (0_g‘𝐷))
65	61, 64	eqnetrd 2999	1 ⊢ (𝜑 → 𝐶 ≠ (0_g‘𝐷))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1542 ∈ wcel 2114 ≠ wne 2932 ∃wrex 3061 {crab 3389 ∖ cdif 3886 ∩ cin 3888 {csn 4567 {cpr 4569 ↦ cmpt 5166 ‘cfv 6498 ℩crio 7323 (class class class)co 7367 Basecbs 17179 +_gcplusg 17220 ._rcmulr 17221 Scalarcsca 17223 ·_𝑠 cvsca 17224 0_gc0g 17402 Grpcgrp 18909 -_gcsg 18911 Ringcrg 20214 inv_rcinvr 20367 DivRingcdr 20706 LModclmod 20855 LSpanclspn 20966 LVecclvec 21097 LSAtomsclsa 39420 LFnlclfn 39503 LKerclk 39531 LDualcld 39569 HLchlt 39796 LHypclh 40430 DVecHcdvh 41524 ocHcoch 41793

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 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2708 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5307 ax-pr 5375 ax-un 7689 ax-cnex 11094 ax-resscn 11095 ax-1cn 11096 ax-icn 11097 ax-addcl 11098 ax-addrcl 11099 ax-mulcl 11100 ax-mulrcl 11101 ax-mulcom 11102 ax-addass 11103 ax-mulass 11104 ax-distr 11105 ax-i2m1 11106 ax-1ne0 11107 ax-1rid 11108 ax-rnegex 11109 ax-rrecex 11110 ax-cnre 11111 ax-pre-lttri 11112 ax-pre-lttrn 11113 ax-pre-ltadd 11114 ax-pre-mulgt0 11115 ax-riotaBAD 39399

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2539 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2811 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3062 df-rmo 3342 df-reu 3343 df-rab 3390 df-v 3431 df-sbc 3729 df-csb 3838 df-dif 3892 df-un 3894 df-in 3896 df-ss 3906 df-pss 3909 df-nul 4274 df-if 4467 df-pw 4543 df-sn 4568 df-pr 4570 df-tp 4572 df-op 4574 df-uni 4851 df-int 4890 df-iun 4935 df-iin 4936 df-br 5086 df-opab 5148 df-mpt 5167 df-tr 5193 df-id 5526 df-eprel 5531 df-po 5539 df-so 5540 df-fr 5584 df-we 5586 df-xp 5637 df-rel 5638 df-cnv 5639 df-co 5640 df-dm 5641 df-rn 5642 df-res 5643 df-ima 5644 df-pred 6265 df-ord 6326 df-on 6327 df-lim 6328 df-suc 6329 df-iota 6454 df-fun 6500 df-fn 6501 df-f 6502 df-f1 6503 df-fo 6504 df-f1o 6505 df-fv 6506 df-riota 7324 df-ov 7370 df-oprab 7371 df-mpo 7372 df-of 7631 df-om 7818 df-1st 7942 df-2nd 7943 df-tpos 8176 df-undef 8223 df-frecs 8231 df-wrecs 8262 df-recs 8311 df-rdg 8349 df-1o 8405 df-2o 8406 df-er 8643 df-map 8775 df-en 8894 df-dom 8895 df-sdom 8896 df-fin 8897 df-pnf 11181 df-mnf 11182 df-xr 11183 df-ltxr 11184 df-le 11185 df-sub 11379 df-neg 11380 df-nn 12175 df-2 12244 df-3 12245 df-4 12246 df-5 12247 df-6 12248 df-n0 12438 df-z 12525 df-uz 12789 df-fz 13462 df-struct 17117 df-sets 17134 df-slot 17152 df-ndx 17164 df-base 17180 df-ress 17201 df-plusg 17233 df-mulr 17234 df-sca 17236 df-vsca 17237 df-0g 17404 df-mre 17548 df-mrc 17549 df-acs 17551 df-proset 18260 df-poset 18279 df-plt 18294 df-lub 18310 df-glb 18311 df-join 18312 df-meet 18313 df-p0 18389 df-p1 18390 df-lat 18398 df-clat 18465 df-mgm 18608 df-sgrp 18687 df-mnd 18703 df-submnd 18752 df-grp 18912 df-minusg 18913 df-sbg 18914 df-subg 19099 df-cntz 19292 df-oppg 19321 df-lsm 19611 df-cmn 19757 df-abl 19758 df-mgp 20122 df-rng 20134 df-ur 20163 df-ring 20216 df-oppr 20317 df-dvdsr 20337 df-unit 20338 df-invr 20368 df-dvr 20381 df-drng 20708 df-lmod 20857 df-lss 20927 df-lsp 20967 df-lvec 21098 df-lsatoms 39422 df-lshyp 39423 df-lcv 39465 df-lfl 39504 df-lkr 39532 df-ldual 39570 df-oposet 39622 df-ol 39624 df-oml 39625 df-covers 39712 df-ats 39713 df-atl 39744 df-cvlat 39768 df-hlat 39797 df-llines 39944 df-lplanes 39945 df-lvols 39946 df-lines 39947 df-psubsp 39949 df-pmap 39950 df-padd 40242 df-lhyp 40434 df-laut 40435 df-ldil 40550 df-ltrn 40551 df-trl 40605 df-tgrp 41189 df-tendo 41201 df-edring 41203 df-dveca 41449 df-disoa 41475 df-dvech 41525 df-dib 41585 df-dic 41619 df-dih 41675 df-doch 41794 df-djh 41841

This theorem is referenced by: lcfrlem34 42022

W3C validator