lcfrlem16 - Mathbox for Norm Megill

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

Theorem lcfrlem16 42018

Description: Lemma for lcfr 42045. (Contributed by NM, 8-Mar-2015.)

**Hypotheses**
Ref	Expression
lcf1o.h	⊢ 𝐻 = (LHyp‘𝐾)
lcf1o.o	⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
lcf1o.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
lcf1o.v	⊢ 𝑉 = (Base‘𝑈)
lcf1o.a	⊢ + = (+_g‘𝑈)
lcf1o.t	⊢ · = ( ·_𝑠 ‘𝑈)
lcf1o.s	⊢ 𝑆 = (Scalar‘𝑈)
lcf1o.r	⊢ 𝑅 = (Base‘𝑆)
lcf1o.z	⊢ 0 = (0_g‘𝑈)
lcf1o.f	⊢ 𝐹 = (LFnl‘𝑈)
lcf1o.l	⊢ 𝐿 = (LKer‘𝑈)
lcf1o.d	⊢ 𝐷 = (LDual‘𝑈)
lcf1o.q	⊢ 𝑄 = (0_g‘𝐷)
lcf1o.c	⊢ 𝐶 = {𝑓 ∈ 𝐹 ∣ ( ⊥ ‘( ⊥ ‘(𝐿‘𝑓))) = (𝐿‘𝑓)}
lcf1o.j	⊢ 𝐽 = (𝑥 ∈ (𝑉 ∖ { 0 }) ↦ (𝑣 ∈ 𝑉 ↦ (℩𝑘 ∈ 𝑅 ∃𝑤 ∈ ( ⊥ ‘{𝑥})𝑣 = (𝑤 + (𝑘 · 𝑥)))))
lcflo.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
lcfrlem16.p	⊢ 𝑃 = (LSubSp‘𝐷)
lcfrlem16.g	⊢ (𝜑 → 𝐺 ∈ 𝑃)
lcfrlem16.gs	⊢ (𝜑 → 𝐺 ⊆ 𝐶)
lcfrlem16.m	⊢ 𝐸 = ∪ 𝑔 ∈ 𝐺 ( ⊥ ‘(𝐿‘𝑔))
lcfrlem16.x	⊢ (𝜑 → 𝑋 ∈ (𝐸 ∖ { 0 }))

**Assertion**
Ref	Expression
lcfrlem16	⊢ (𝜑 → (𝐽‘𝑋) ∈ 𝐺)

Distinct variable groups: 𝑥,𝑤, ⊥ 𝑥, 0 𝑥,𝑣,𝑉 𝑥, · 𝑣,𝑘,𝑤,𝑥,𝑋 𝑥, + 𝑥,𝑅 𝑓,𝑘,𝑣,𝑤, + 𝑓,𝐹,𝑘 𝑔,𝑘,𝐺 𝑓,𝑔,𝐽,𝑘 𝑓,𝐿,𝑘 ⊥ ,𝑓,𝑘,𝑣 𝑅,𝑓,𝑘,𝑣 𝑆,𝑘 · ,𝑓,𝑘,𝑣,𝑤 𝑈,𝑘 𝑓,𝑉,𝑔,𝑥 𝑓,𝑋 𝑣,𝑔,𝑤,𝑥,𝑋 𝜑,𝑔,𝑘 Allowed substitution hints: 𝜑(𝑥,𝑤,𝑣,𝑓) 𝐶(𝑥,𝑤,𝑣,𝑓,𝑔,𝑘) 𝐷(𝑥,𝑤,𝑣,𝑓,𝑔,𝑘) 𝑃(𝑥,𝑤,𝑣,𝑓,𝑔,𝑘) + (𝑔) 𝑄(𝑥,𝑤,𝑣,𝑓,𝑔,𝑘) 𝑅(𝑤,𝑔) 𝑆(𝑥,𝑤,𝑣,𝑓,𝑔) · (𝑔) 𝑈(𝑥,𝑤,𝑣,𝑓,𝑔) 𝐸(𝑥,𝑤,𝑣,𝑓,𝑔,𝑘) 𝐹(𝑥,𝑤,𝑣,𝑔) 𝐺(𝑥,𝑤,𝑣,𝑓) 𝐻(𝑥,𝑤,𝑣,𝑓,𝑔,𝑘) 𝐽(𝑥,𝑤,𝑣) 𝐾(𝑥,𝑤,𝑣,𝑓,𝑔,𝑘) 𝐿(𝑥,𝑤,𝑣,𝑔) ⊥ (𝑔) 𝑉(𝑤,𝑘) 𝑊(𝑥,𝑤,𝑣,𝑓,𝑔,𝑘) 0 (𝑤,𝑣,𝑓,𝑔,𝑘)

**Proof of Theorem lcfrlem16**
Step	Hyp	Ref	Expression
1		lcfrlem16.x	. . . . 5 ⊢ (𝜑 → 𝑋 ∈ (𝐸 ∖ { 0 }))
2	1	eldifad 3902	. . . 4 ⊢ (𝜑 → 𝑋 ∈ 𝐸)
3		lcfrlem16.m	. . . 4 ⊢ 𝐸 = ∪ 𝑔 ∈ 𝐺 ( ⊥ ‘(𝐿‘𝑔))
4	2, 3	eleqtrdi 2847	. . 3 ⊢ (𝜑 → 𝑋 ∈ ∪ 𝑔 ∈ 𝐺 ( ⊥ ‘(𝐿‘𝑔)))
5		eliun 4938	. . 3 ⊢ (𝑋 ∈ ∪ 𝑔 ∈ 𝐺 ( ⊥ ‘(𝐿‘𝑔)) ↔ ∃𝑔 ∈ 𝐺 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔)))
6	4, 5	sylib 218	. 2 ⊢ (𝜑 → ∃𝑔 ∈ 𝐺 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔)))
7		lcf1o.s	. . . . 5 ⊢ 𝑆 = (Scalar‘𝑈)
8		lcf1o.r	. . . . 5 ⊢ 𝑅 = (Base‘𝑆)
9		lcf1o.f	. . . . 5 ⊢ 𝐹 = (LFnl‘𝑈)
10		lcf1o.l	. . . . 5 ⊢ 𝐿 = (LKer‘𝑈)
11		lcf1o.d	. . . . 5 ⊢ 𝐷 = (LDual‘𝑈)
12		eqid 2737	. . . . 5 ⊢ ( ·_𝑠 ‘𝐷) = ( ·_𝑠 ‘𝐷)
13		lcf1o.h	. . . . . . 7 ⊢ 𝐻 = (LHyp‘𝐾)
14		lcf1o.u	. . . . . . 7 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
15		lcflo.k	. . . . . . 7 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
16	13, 14, 15	dvhlvec 41569	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ LVec)
17	16	3ad2ant1 1134	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝑈 ∈ LVec)
18		lcfrlem16.g	. . . . . . . 8 ⊢ (𝜑 → 𝐺 ∈ 𝑃)
19		eqid 2737	. . . . . . . . 9 ⊢ (Base‘𝐷) = (Base‘𝐷)
20		lcfrlem16.p	. . . . . . . . 9 ⊢ 𝑃 = (LSubSp‘𝐷)
21	19, 20	lssel 20923	. . . . . . . 8 ⊢ ((𝐺 ∈ 𝑃 ∧ 𝑔 ∈ 𝐺) → 𝑔 ∈ (Base‘𝐷))
22	18, 21	sylan 581	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺) → 𝑔 ∈ (Base‘𝐷))
23	13, 14, 15	dvhlmod 41570	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 ∈ LMod)
24	9, 11, 19, 23	ldualvbase 39586	. . . . . . . 8 ⊢ (𝜑 → (Base‘𝐷) = 𝐹)
25	24	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺) → (Base‘𝐷) = 𝐹)
26	22, 25	eleqtrd 2839	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺) → 𝑔 ∈ 𝐹)
27	26	3adant3 1133	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝑔 ∈ 𝐹)
28		lcf1o.o	. . . . . . 7 ⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
29		lcf1o.v	. . . . . . 7 ⊢ 𝑉 = (Base‘𝑈)
30		lcf1o.a	. . . . . . 7 ⊢ + = (+_g‘𝑈)
31		lcf1o.t	. . . . . . 7 ⊢ · = ( ·_𝑠 ‘𝑈)
32		lcf1o.z	. . . . . . 7 ⊢ 0 = (0_g‘𝑈)
33		lcf1o.q	. . . . . . 7 ⊢ 𝑄 = (0_g‘𝐷)
34		lcf1o.c	. . . . . . 7 ⊢ 𝐶 = {𝑓 ∈ 𝐹 ∣ ( ⊥ ‘( ⊥ ‘(𝐿‘𝑓))) = (𝐿‘𝑓)}
35		lcf1o.j	. . . . . . 7 ⊢ 𝐽 = (𝑥 ∈ (𝑉 ∖ { 0 }) ↦ (𝑣 ∈ 𝑉 ↦ (℩𝑘 ∈ 𝑅 ∃𝑤 ∈ ( ⊥ ‘{𝑥})𝑣 = (𝑤 + (𝑘 · 𝑥)))))
36	15	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
37	23	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺) → 𝑈 ∈ LMod)
38	29, 9, 10, 37, 26	lkrssv 39556	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺) → (𝐿‘𝑔) ⊆ 𝑉)
39	13, 14, 29, 28	dochssv 41815	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐿‘𝑔) ⊆ 𝑉) → ( ⊥ ‘(𝐿‘𝑔)) ⊆ 𝑉)
40	36, 38, 39	syl2anc 585	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺) → ( ⊥ ‘(𝐿‘𝑔)) ⊆ 𝑉)
41	40	ralrimiva 3130	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑔 ∈ 𝐺 ( ⊥ ‘(𝐿‘𝑔)) ⊆ 𝑉)
42		iunss 4988	. . . . . . . . . . 11 ⊢ (∪ 𝑔 ∈ 𝐺 ( ⊥ ‘(𝐿‘𝑔)) ⊆ 𝑉 ↔ ∀𝑔 ∈ 𝐺 ( ⊥ ‘(𝐿‘𝑔)) ⊆ 𝑉)
43	41, 42	sylibr 234	. . . . . . . . . 10 ⊢ (𝜑 → ∪ 𝑔 ∈ 𝐺 ( ⊥ ‘(𝐿‘𝑔)) ⊆ 𝑉)
44	3, 43	eqsstrid 3961	. . . . . . . . 9 ⊢ (𝜑 → 𝐸 ⊆ 𝑉)
45	44	ssdifd 4086	. . . . . . . 8 ⊢ (𝜑 → (𝐸 ∖ { 0 }) ⊆ (𝑉 ∖ { 0 }))
46	45, 1	sseldd 3923	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 }))
47	13, 28, 14, 29, 30, 31, 7, 8, 32, 9, 10, 11, 33, 34, 35, 15, 46	lcfrlem10 42012	. . . . . 6 ⊢ (𝜑 → (𝐽‘𝑋) ∈ 𝐹)
48	47	3ad2ant1 1134	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → (𝐽‘𝑋) ∈ 𝐹)
49		eqid 2737	. . . . . . 7 ⊢ (LSAtoms‘𝑈) = (LSAtoms‘𝑈)
50	15	3ad2ant1 1134	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
51		simp3 1139	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔)))
52		eldifsni 4734	. . . . . . . . . . 11 ⊢ (𝑋 ∈ (𝐸 ∖ { 0 }) → 𝑋 ≠ 0 )
53	1, 52	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ≠ 0 )
54	53	3ad2ant1 1134	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝑋 ≠ 0 )
55		eldifsn 4730	. . . . . . . . 9 ⊢ (𝑋 ∈ (( ⊥ ‘(𝐿‘𝑔)) ∖ { 0 }) ↔ (𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔)) ∧ 𝑋 ≠ 0 ))
56	51, 54, 55	sylanbrc 584	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝑋 ∈ (( ⊥ ‘(𝐿‘𝑔)) ∖ { 0 }))
57	13, 28, 14, 29, 32, 9, 10, 50, 27, 56, 49	dochsnkrlem2 41930	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → ( ⊥ ‘(𝐿‘𝑔)) ∈ (LSAtoms‘𝑈))
58	13, 28, 14, 29, 30, 31, 7, 8, 32, 9, 10, 11, 33, 34, 35, 15, 46	lcfrlem15 42017	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ ( ⊥ ‘(𝐿‘(𝐽‘𝑋))))
59		eldifsn 4730	. . . . . . . . . 10 ⊢ (𝑋 ∈ (( ⊥ ‘(𝐿‘(𝐽‘𝑋))) ∖ { 0 }) ↔ (𝑋 ∈ ( ⊥ ‘(𝐿‘(𝐽‘𝑋))) ∧ 𝑋 ≠ 0 ))
60	58, 53, 59	sylanbrc 584	. . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ (( ⊥ ‘(𝐿‘(𝐽‘𝑋))) ∖ { 0 }))
61	13, 28, 14, 29, 32, 9, 10, 15, 47, 60, 49	dochsnkrlem2 41930	. . . . . . . 8 ⊢ (𝜑 → ( ⊥ ‘(𝐿‘(𝐽‘𝑋))) ∈ (LSAtoms‘𝑈))
62	61	3ad2ant1 1134	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → ( ⊥ ‘(𝐿‘(𝐽‘𝑋))) ∈ (LSAtoms‘𝑈))
63	58	3ad2ant1 1134	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝑋 ∈ ( ⊥ ‘(𝐿‘(𝐽‘𝑋))))
64	32, 49, 17, 57, 62, 54, 51, 63	lsat2el 39467	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → ( ⊥ ‘(𝐿‘𝑔)) = ( ⊥ ‘(𝐿‘(𝐽‘𝑋))))
65		eqid 2737	. . . . . . 7 ⊢ ((DIsoH‘𝐾)‘𝑊) = ((DIsoH‘𝐾)‘𝑊)
66		lcfrlem16.gs	. . . . . . . . . 10 ⊢ (𝜑 → 𝐺 ⊆ 𝐶)
67	66	3ad2ant1 1134	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝐺 ⊆ 𝐶)
68		simp2 1138	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝑔 ∈ 𝐺)
69	67, 68	sseldd 3923	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝑔 ∈ 𝐶)
70	13, 65, 28, 14, 9, 10, 34, 50, 27	lcfl5 41956	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → (𝑔 ∈ 𝐶 ↔ (𝐿‘𝑔) ∈ ran ((DIsoH‘𝐾)‘𝑊)))
71	69, 70	mpbid 232	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → (𝐿‘𝑔) ∈ ran ((DIsoH‘𝐾)‘𝑊))
72	13, 28, 14, 29, 30, 31, 7, 8, 32, 9, 10, 11, 33, 34, 35, 15, 46	lcfrlem13 42015	. . . . . . . . . 10 ⊢ (𝜑 → (𝐽‘𝑋) ∈ (𝐶 ∖ {𝑄}))
73	72	eldifad 3902	. . . . . . . . 9 ⊢ (𝜑 → (𝐽‘𝑋) ∈ 𝐶)
74	13, 65, 28, 14, 9, 10, 34, 15, 47	lcfl5 41956	. . . . . . . . 9 ⊢ (𝜑 → ((𝐽‘𝑋) ∈ 𝐶 ↔ (𝐿‘(𝐽‘𝑋)) ∈ ran ((DIsoH‘𝐾)‘𝑊)))
75	73, 74	mpbid 232	. . . . . . . 8 ⊢ (𝜑 → (𝐿‘(𝐽‘𝑋)) ∈ ran ((DIsoH‘𝐾)‘𝑊))
76	75	3ad2ant1 1134	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → (𝐿‘(𝐽‘𝑋)) ∈ ran ((DIsoH‘𝐾)‘𝑊))
77	13, 65, 28, 50, 71, 76	doch11 41833	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → (( ⊥ ‘(𝐿‘𝑔)) = ( ⊥ ‘(𝐿‘(𝐽‘𝑋))) ↔ (𝐿‘𝑔) = (𝐿‘(𝐽‘𝑋))))
78	64, 77	mpbid 232	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → (𝐿‘𝑔) = (𝐿‘(𝐽‘𝑋)))
79	7, 8, 9, 10, 11, 12, 17, 27, 48, 78	eqlkr4 39625	. . . 4 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → ∃𝑘 ∈ 𝑅 (𝐽‘𝑋) = (𝑘( ·_𝑠 ‘𝐷)𝑔))
80	23	3ad2ant1 1134	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝑈 ∈ LMod)
81	80	adantr 480	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) ∧ 𝑘 ∈ 𝑅) → 𝑈 ∈ LMod)
82	18	3ad2ant1 1134	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → 𝐺 ∈ 𝑃)
83	82	adantr 480	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) ∧ 𝑘 ∈ 𝑅) → 𝐺 ∈ 𝑃)
84		simpr 484	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) ∧ 𝑘 ∈ 𝑅) → 𝑘 ∈ 𝑅)
85		simpl2 1194	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) ∧ 𝑘 ∈ 𝑅) → 𝑔 ∈ 𝐺)
86	7, 8, 11, 12, 20, 81, 83, 84, 85	ldualssvscl 39618	. . . . . 6 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) ∧ 𝑘 ∈ 𝑅) → (𝑘( ·_𝑠 ‘𝐷)𝑔) ∈ 𝐺)
87		eleq1 2825	. . . . . 6 ⊢ ((𝐽‘𝑋) = (𝑘( ·_𝑠 ‘𝐷)𝑔) → ((𝐽‘𝑋) ∈ 𝐺 ↔ (𝑘( ·_𝑠 ‘𝐷)𝑔) ∈ 𝐺))
88	86, 87	syl5ibrcom 247	. . . . 5 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) ∧ 𝑘 ∈ 𝑅) → ((𝐽‘𝑋) = (𝑘( ·_𝑠 ‘𝐷)𝑔) → (𝐽‘𝑋) ∈ 𝐺))
89	88	rexlimdva 3139	. . . 4 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → (∃𝑘 ∈ 𝑅 (𝐽‘𝑋) = (𝑘( ·_𝑠 ‘𝐷)𝑔) → (𝐽‘𝑋) ∈ 𝐺))
90	79, 89	mpd 15	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝐺 ∧ 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔))) → (𝐽‘𝑋) ∈ 𝐺)
91	90	rexlimdv3a 3143	. 2 ⊢ (𝜑 → (∃𝑔 ∈ 𝐺 𝑋 ∈ ( ⊥ ‘(𝐿‘𝑔)) → (𝐽‘𝑋) ∈ 𝐺))
92	6, 91	mpd 15	1 ⊢ (𝜑 → (𝐽‘𝑋) ∈ 𝐺)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 ≠ wne 2933 ∀wral 3052 ∃wrex 3062 {crab 3390 ∖ cdif 3887 ⊆ wss 3890 {csn 4568 ∪ ciun 4934 ↦ cmpt 5167 ran crn 5625 ‘cfv 6492 ℩crio 7316 (class class class)co 7360 Basecbs 17170 +_gcplusg 17211 Scalarcsca 17214 ·_𝑠 cvsca 17215 0_gc0g 17393 LModclmod 20846 LSubSpclss 20917 LVecclvec 21089 LSAtomsclsa 39434 LFnlclfn 39517 LKerclk 39545 LDualcld 39583 HLchlt 39810 LHypclh 40444 DVecHcdvh 41538 DIsoHcdih 41688 ocHcoch 41807

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 2709 ax-rep 5212 ax-sep 5231 ax-nul 5241 ax-pow 5302 ax-pr 5370 ax-un 7682 ax-cnex 11085 ax-resscn 11086 ax-1cn 11087 ax-icn 11088 ax-addcl 11089 ax-addrcl 11090 ax-mulcl 11091 ax-mulrcl 11092 ax-mulcom 11093 ax-addass 11094 ax-mulass 11095 ax-distr 11096 ax-i2m1 11097 ax-1ne0 11098 ax-1rid 11099 ax-rnegex 11100 ax-rrecex 11101 ax-cnre 11102 ax-pre-lttri 11103 ax-pre-lttrn 11104 ax-pre-ltadd 11105 ax-pre-mulgt0 11106 ax-riotaBAD 39413

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 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3343 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-tp 4573 df-op 4575 df-uni 4852 df-int 4891 df-iun 4936 df-iin 4937 df-br 5087 df-opab 5149 df-mpt 5168 df-tr 5194 df-id 5519 df-eprel 5524 df-po 5532 df-so 5533 df-fr 5577 df-we 5579 df-xp 5630 df-rel 5631 df-cnv 5632 df-co 5633 df-dm 5634 df-rn 5635 df-res 5636 df-ima 5637 df-pred 6259 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-f1 6497 df-fo 6498 df-f1o 6499 df-fv 6500 df-riota 7317 df-ov 7363 df-oprab 7364 df-mpo 7365 df-of 7624 df-om 7811 df-1st 7935 df-2nd 7936 df-tpos 8169 df-undef 8216 df-frecs 8224 df-wrecs 8255 df-recs 8304 df-rdg 8342 df-1o 8398 df-er 8636 df-map 8768 df-en 8887 df-dom 8888 df-sdom 8889 df-fin 8890 df-pnf 11172 df-mnf 11173 df-xr 11174 df-ltxr 11175 df-le 11176 df-sub 11370 df-neg 11371 df-nn 12166 df-2 12235 df-3 12236 df-4 12237 df-5 12238 df-6 12239 df-n0 12429 df-z 12516 df-uz 12780 df-fz 13453 df-struct 17108 df-sets 17125 df-slot 17143 df-ndx 17155 df-base 17171 df-ress 17192 df-plusg 17224 df-mulr 17225 df-sca 17227 df-vsca 17228 df-0g 17395 df-proset 18251 df-poset 18270 df-plt 18285 df-lub 18301 df-glb 18302 df-join 18303 df-meet 18304 df-p0 18380 df-p1 18381 df-lat 18389 df-clat 18456 df-mgm 18599 df-sgrp 18678 df-mnd 18694 df-submnd 18743 df-grp 18903 df-minusg 18904 df-sbg 18905 df-subg 19090 df-cntz 19283 df-lsm 19602 df-cmn 19748 df-abl 19749 df-mgp 20113 df-rng 20125 df-ur 20154 df-ring 20207 df-oppr 20308 df-dvdsr 20328 df-unit 20329 df-invr 20359 df-dvr 20372 df-drng 20699 df-lmod 20848 df-lss 20918 df-lsp 20958 df-lvec 21090 df-lsatoms 39436 df-lshyp 39437 df-lfl 39518 df-lkr 39546 df-ldual 39584 df-oposet 39636 df-ol 39638 df-oml 39639 df-covers 39726 df-ats 39727 df-atl 39758 df-cvlat 39782 df-hlat 39811 df-llines 39958 df-lplanes 39959 df-lvols 39960 df-lines 39961 df-psubsp 39963 df-pmap 39964 df-padd 40256 df-lhyp 40448 df-laut 40449 df-ldil 40564 df-ltrn 40565 df-trl 40619 df-tgrp 41203 df-tendo 41215 df-edring 41217 df-dveca 41463 df-disoa 41489 df-dvech 41539 df-dib 41599 df-dic 41633 df-dih 41689 df-doch 41808 df-djh 41855

This theorem is referenced by: lcfrlem27 42029 lcfrlem37 42039

W3C validator