Theorem lspsolvlem 20319

Description: Lemma for lspsolv 20320. (Contributed by Mario Carneiro, 25-Jun-2014.)

Hypotheses

Ref	Expression
lspsolv.v	⊢ 𝑉 = (Base‘𝑊)
lspsolv.s	⊢ 𝑆 = (LSubSp‘𝑊)
lspsolv.n	⊢ 𝑁 = (LSpan‘𝑊)
lspsolv.f	⊢ 𝐹 = (Scalar‘𝑊)
lspsolv.b	⊢ 𝐵 = (Base‘𝐹)
lspsolv.p	⊢ + = (+g‘𝑊)
lspsolv.t	⊢ · = ( ·𝑠 ‘𝑊)
lspsolv.q	⊢ 𝑄 = {𝑧 ∈ 𝑉 ∣ ∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)}
lspsolv.w	⊢ (𝜑 → 𝑊 ∈ LMod)
lspsolv.ss	⊢ (𝜑 → 𝐴 ⊆ 𝑉)
lspsolv.y	⊢ (𝜑 → 𝑌 ∈ 𝑉)
lspsolv.x	⊢ (𝜑 → 𝑋 ∈ (𝑁‘(𝐴 ∪ {𝑌})))

Assertion

Ref	Expression
lspsolvlem	⊢ (𝜑 → ∃𝑟 ∈ 𝐵 (𝑋 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴))

Distinct variable groups:   𝑧,𝑟,𝐴   𝐵,𝑟,𝑧   𝑁,𝑟,𝑧   𝜑,𝑧   𝐹,𝑟   𝑆,𝑟   𝑉,𝑟,𝑧   𝑊,𝑟,𝑧   + ,𝑟,𝑧   · ,𝑟,𝑧   𝑋,𝑟,𝑧   𝑌,𝑟,𝑧

Allowed substitution hints:   𝜑(𝑟)   𝑄(𝑧,𝑟)   𝑆(𝑧)   𝐹(𝑧)

Proof of Theorem lspsolvlem

Dummy variables 𝑠 𝑡 𝑥 𝑦 𝑎 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		lspsolv.w	. . . . 5 ⊢ (𝜑 → 𝑊 ∈ LMod)
2		lspsolv.q	. . . . . . 7 ⊢ 𝑄 = {𝑧 ∈ 𝑉 ∣ ∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)}
3	2	ssrab3 4011	. . . . . 6 ⊢ 𝑄 ⊆ 𝑉
4	3	a1i 11	. . . . 5 ⊢ (𝜑 → 𝑄 ⊆ 𝑉)
5		lspsolv.ss	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ⊆ 𝑉)
6	1	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → 𝑊 ∈ LMod)
7		lspsolv.f	. . . . . . . . . . 11 ⊢ 𝐹 = (Scalar‘𝑊)
8		lspsolv.b	. . . . . . . . . . 11 ⊢ 𝐵 = (Base‘𝐹)
9		eqid 2738	. . . . . . . . . . 11 ⊢ (0g‘𝐹) = (0g‘𝐹)
10	7, 8, 9	lmod0cl 20064	. . . . . . . . . 10 ⊢ (𝑊 ∈ LMod → (0g‘𝐹) ∈ 𝐵)
11	6, 10	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → (0g‘𝐹) ∈ 𝐵)
12		lspsolv.y	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑌 ∈ 𝑉)
13		lspsolv.v	. . . . . . . . . . . . . . 15 ⊢ 𝑉 = (Base‘𝑊)
14		lspsolv.t	. . . . . . . . . . . . . . 15 ⊢ · = ( ·𝑠 ‘𝑊)
15		eqid 2738	. . . . . . . . . . . . . . 15 ⊢ (0g‘𝑊) = (0g‘𝑊)
16	13, 7, 14, 9, 15	lmod0vs 20071	. . . . . . . . . . . . . 14 ⊢ ((𝑊 ∈ LMod ∧ 𝑌 ∈ 𝑉) → ((0g‘𝐹) · 𝑌) = (0g‘𝑊))
17	1, 12, 16	syl2anc 583	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((0g‘𝐹) · 𝑌) = (0g‘𝑊))
18	17	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → ((0g‘𝐹) · 𝑌) = (0g‘𝑊))
19	18	oveq2d 7271	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → (𝑧 + ((0g‘𝐹) · 𝑌)) = (𝑧 + (0g‘𝑊)))
20	5	sselda 3917	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → 𝑧 ∈ 𝑉)
21		lspsolv.p	. . . . . . . . . . . . 13 ⊢ + = (+g‘𝑊)
22	13, 21, 15	lmod0vrid 20069	. . . . . . . . . . . 12 ⊢ ((𝑊 ∈ LMod ∧ 𝑧 ∈ 𝑉) → (𝑧 + (0g‘𝑊)) = 𝑧)
23	6, 20, 22	syl2anc 583	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → (𝑧 + (0g‘𝑊)) = 𝑧)
24	19, 23	eqtrd 2778	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → (𝑧 + ((0g‘𝐹) · 𝑌)) = 𝑧)
25		lspsolv.n	. . . . . . . . . . . . 13 ⊢ 𝑁 = (LSpan‘𝑊)
26	13, 25	lspssid 20162	. . . . . . . . . . . 12 ⊢ ((𝑊 ∈ LMod ∧ 𝐴 ⊆ 𝑉) → 𝐴 ⊆ (𝑁‘𝐴))
27	1, 5, 26	syl2anc 583	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ⊆ (𝑁‘𝐴))
28	27	sselda 3917	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → 𝑧 ∈ (𝑁‘𝐴))
29	24, 28	eqeltrd 2839	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → (𝑧 + ((0g‘𝐹) · 𝑌)) ∈ (𝑁‘𝐴))
30		oveq1 7262	. . . . . . . . . . . 12 ⊢ (𝑟 = (0g‘𝐹) → (𝑟 · 𝑌) = ((0g‘𝐹) · 𝑌))
31	30	oveq2d 7271	. . . . . . . . . . 11 ⊢ (𝑟 = (0g‘𝐹) → (𝑧 + (𝑟 · 𝑌)) = (𝑧 + ((0g‘𝐹) · 𝑌)))
32	31	eleq1d 2823	. . . . . . . . . 10 ⊢ (𝑟 = (0g‘𝐹) → ((𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (𝑧 + ((0g‘𝐹) · 𝑌)) ∈ (𝑁‘𝐴)))
33	32	rspcev 3552	. . . . . . . . 9 ⊢ (((0g‘𝐹) ∈ 𝐵 ∧ (𝑧 + ((0g‘𝐹) · 𝑌)) ∈ (𝑁‘𝐴)) → ∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴))
34	11, 29, 33	syl2anc 583	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → ∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴))
35	5, 34	ssrabdv 4003	. . . . . . 7 ⊢ (𝜑 → 𝐴 ⊆ {𝑧 ∈ 𝑉 ∣ ∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)})
36	35, 2	sseqtrrdi 3968	. . . . . 6 ⊢ (𝜑 → 𝐴 ⊆ 𝑄)
37	7	lmodfgrp 20047	. . . . . . . . . . 11 ⊢ (𝑊 ∈ LMod → 𝐹 ∈ Grp)
38	1, 37	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹 ∈ Grp)
39		eqid 2738	. . . . . . . . . . . 12 ⊢ (1r‘𝐹) = (1r‘𝐹)
40	7, 8, 39	lmod1cl 20065	. . . . . . . . . . 11 ⊢ (𝑊 ∈ LMod → (1r‘𝐹) ∈ 𝐵)
41	1, 40	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (1r‘𝐹) ∈ 𝐵)
42		eqid 2738	. . . . . . . . . . 11 ⊢ (invg‘𝐹) = (invg‘𝐹)
43	8, 42	grpinvcl 18542	. . . . . . . . . 10 ⊢ ((𝐹 ∈ Grp ∧ (1r‘𝐹) ∈ 𝐵) → ((invg‘𝐹)‘(1r‘𝐹)) ∈ 𝐵)
44	38, 41, 43	syl2anc 583	. . . . . . . . 9 ⊢ (𝜑 → ((invg‘𝐹)‘(1r‘𝐹)) ∈ 𝐵)
45		eqid 2738	. . . . . . . . . . . . . 14 ⊢ (invg‘𝑊) = (invg‘𝑊)
46	13, 45, 7, 14, 39, 42	lmodvneg1 20081	. . . . . . . . . . . . 13 ⊢ ((𝑊 ∈ LMod ∧ 𝑌 ∈ 𝑉) → (((invg‘𝐹)‘(1r‘𝐹)) · 𝑌) = ((invg‘𝑊)‘𝑌))
47	1, 12, 46	syl2anc 583	. . . . . . . . . . . 12 ⊢ (𝜑 → (((invg‘𝐹)‘(1r‘𝐹)) · 𝑌) = ((invg‘𝑊)‘𝑌))
48	47	oveq2d 7271	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑌 + (((invg‘𝐹)‘(1r‘𝐹)) · 𝑌)) = (𝑌 + ((invg‘𝑊)‘𝑌)))
49		lmodgrp 20045	. . . . . . . . . . . . 13 ⊢ (𝑊 ∈ LMod → 𝑊 ∈ Grp)
50	1, 49	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑊 ∈ Grp)
51	13, 21, 15, 45	grprinv 18544	. . . . . . . . . . . 12 ⊢ ((𝑊 ∈ Grp ∧ 𝑌 ∈ 𝑉) → (𝑌 + ((invg‘𝑊)‘𝑌)) = (0g‘𝑊))
52	50, 12, 51	syl2anc 583	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑌 + ((invg‘𝑊)‘𝑌)) = (0g‘𝑊))
53	48, 52	eqtrd 2778	. . . . . . . . . 10 ⊢ (𝜑 → (𝑌 + (((invg‘𝐹)‘(1r‘𝐹)) · 𝑌)) = (0g‘𝑊))
54		lspsolv.s	. . . . . . . . . . . . 13 ⊢ 𝑆 = (LSubSp‘𝑊)
55	13, 54, 25	lspcl 20153	. . . . . . . . . . . 12 ⊢ ((𝑊 ∈ LMod ∧ 𝐴 ⊆ 𝑉) → (𝑁‘𝐴) ∈ 𝑆)
56	1, 5, 55	syl2anc 583	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑁‘𝐴) ∈ 𝑆)
57	15, 54	lss0cl 20123	. . . . . . . . . . 11 ⊢ ((𝑊 ∈ LMod ∧ (𝑁‘𝐴) ∈ 𝑆) → (0g‘𝑊) ∈ (𝑁‘𝐴))
58	1, 56, 57	syl2anc 583	. . . . . . . . . 10 ⊢ (𝜑 → (0g‘𝑊) ∈ (𝑁‘𝐴))
59	53, 58	eqeltrd 2839	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 + (((invg‘𝐹)‘(1r‘𝐹)) · 𝑌)) ∈ (𝑁‘𝐴))
60		oveq1 7262	. . . . . . . . . . . 12 ⊢ (𝑟 = ((invg‘𝐹)‘(1r‘𝐹)) → (𝑟 · 𝑌) = (((invg‘𝐹)‘(1r‘𝐹)) · 𝑌))
61	60	oveq2d 7271	. . . . . . . . . . 11 ⊢ (𝑟 = ((invg‘𝐹)‘(1r‘𝐹)) → (𝑌 + (𝑟 · 𝑌)) = (𝑌 + (((invg‘𝐹)‘(1r‘𝐹)) · 𝑌)))
62	61	eleq1d 2823	. . . . . . . . . 10 ⊢ (𝑟 = ((invg‘𝐹)‘(1r‘𝐹)) → ((𝑌 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (𝑌 + (((invg‘𝐹)‘(1r‘𝐹)) · 𝑌)) ∈ (𝑁‘𝐴)))
63	62	rspcev 3552	. . . . . . . . 9 ⊢ ((((invg‘𝐹)‘(1r‘𝐹)) ∈ 𝐵 ∧ (𝑌 + (((invg‘𝐹)‘(1r‘𝐹)) · 𝑌)) ∈ (𝑁‘𝐴)) → ∃𝑟 ∈ 𝐵 (𝑌 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴))
64	44, 59, 63	syl2anc 583	. . . . . . . 8 ⊢ (𝜑 → ∃𝑟 ∈ 𝐵 (𝑌 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴))
65		oveq1 7262	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑌 → (𝑧 + (𝑟 · 𝑌)) = (𝑌 + (𝑟 · 𝑌)))
66	65	eleq1d 2823	. . . . . . . . . 10 ⊢ (𝑧 = 𝑌 → ((𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (𝑌 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
67	66	rexbidv 3225	. . . . . . . . 9 ⊢ (𝑧 = 𝑌 → (∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ ∃𝑟 ∈ 𝐵 (𝑌 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
68	67, 2	elrab2 3620	. . . . . . . 8 ⊢ (𝑌 ∈ 𝑄 ↔ (𝑌 ∈ 𝑉 ∧ ∃𝑟 ∈ 𝐵 (𝑌 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
69	12, 64, 68	sylanbrc 582	. . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ 𝑄)
70	69	snssd 4739	. . . . . 6 ⊢ (𝜑 → {𝑌} ⊆ 𝑄)
71	36, 70	unssd 4116	. . . . 5 ⊢ (𝜑 → (𝐴 ∪ {𝑌}) ⊆ 𝑄)
72	13, 25	lspss 20161	. . . . 5 ⊢ ((𝑊 ∈ LMod ∧ 𝑄 ⊆ 𝑉 ∧ (𝐴 ∪ {𝑌}) ⊆ 𝑄) → (𝑁‘(𝐴 ∪ {𝑌})) ⊆ (𝑁‘𝑄))
73	1, 4, 71, 72	syl3anc 1369	. . . 4 ⊢ (𝜑 → (𝑁‘(𝐴 ∪ {𝑌})) ⊆ (𝑁‘𝑄))
74	7	a1i 11	. . . . . 6 ⊢ (𝜑 → 𝐹 = (Scalar‘𝑊))
75	8	a1i 11	. . . . . 6 ⊢ (𝜑 → 𝐵 = (Base‘𝐹))
76	13	a1i 11	. . . . . 6 ⊢ (𝜑 → 𝑉 = (Base‘𝑊))
77	21	a1i 11	. . . . . 6 ⊢ (𝜑 → + = (+g‘𝑊))
78	14	a1i 11	. . . . . 6 ⊢ (𝜑 → · = ( ·𝑠 ‘𝑊))
79	54	a1i 11	. . . . . 6 ⊢ (𝜑 → 𝑆 = (LSubSp‘𝑊))
80	69	ne0d 4266	. . . . . 6 ⊢ (𝜑 → 𝑄 ≠ ∅)
81		oveq1 7262	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑥 → (𝑧 + (𝑟 · 𝑌)) = (𝑥 + (𝑟 · 𝑌)))
82	81	eleq1d 2823	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑥 → ((𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (𝑥 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
83	82	rexbidv 3225	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑥 → (∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ ∃𝑟 ∈ 𝐵 (𝑥 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
84		oveq1 7262	. . . . . . . . . . . . . . . 16 ⊢ (𝑟 = 𝑠 → (𝑟 · 𝑌) = (𝑠 · 𝑌))
85	84	oveq2d 7271	. . . . . . . . . . . . . . 15 ⊢ (𝑟 = 𝑠 → (𝑥 + (𝑟 · 𝑌)) = (𝑥 + (𝑠 · 𝑌)))
86	85	eleq1d 2823	. . . . . . . . . . . . . 14 ⊢ (𝑟 = 𝑠 → ((𝑥 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴)))
87	86	cbvrexvw 3373	. . . . . . . . . . . . 13 ⊢ (∃𝑟 ∈ 𝐵 (𝑥 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ ∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴))
88	83, 87	bitrdi 286	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑥 → (∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ ∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴)))
89	88, 2	elrab2 3620	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝑄 ↔ (𝑥 ∈ 𝑉 ∧ ∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴)))
90		oveq1 7262	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑦 → (𝑧 + (𝑟 · 𝑌)) = (𝑦 + (𝑟 · 𝑌)))
91	90	eleq1d 2823	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑦 → ((𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (𝑦 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
92	91	rexbidv 3225	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑦 → (∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ ∃𝑟 ∈ 𝐵 (𝑦 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
93		oveq1 7262	. . . . . . . . . . . . . . . 16 ⊢ (𝑟 = 𝑡 → (𝑟 · 𝑌) = (𝑡 · 𝑌))
94	93	oveq2d 7271	. . . . . . . . . . . . . . 15 ⊢ (𝑟 = 𝑡 → (𝑦 + (𝑟 · 𝑌)) = (𝑦 + (𝑡 · 𝑌)))
95	94	eleq1d 2823	. . . . . . . . . . . . . 14 ⊢ (𝑟 = 𝑡 → ((𝑦 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴)))
96	95	cbvrexvw 3373	. . . . . . . . . . . . 13 ⊢ (∃𝑟 ∈ 𝐵 (𝑦 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))
97	92, 96	bitrdi 286	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑦 → (∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴)))
98	97, 2	elrab2 3620	. . . . . . . . . . 11 ⊢ (𝑦 ∈ 𝑄 ↔ (𝑦 ∈ 𝑉 ∧ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴)))
99	89, 98	anbi12i 626	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝑄 ∧ 𝑦 ∈ 𝑄) ↔ ((𝑥 ∈ 𝑉 ∧ ∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴)) ∧ (𝑦 ∈ 𝑉 ∧ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))))
100		an4 652	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝑉 ∧ ∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴)) ∧ (𝑦 ∈ 𝑉 ∧ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) ↔ ((𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉) ∧ (∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))))
101	99, 100	bitri 274	. . . . . . . . 9 ⊢ ((𝑥 ∈ 𝑄 ∧ 𝑦 ∈ 𝑄) ↔ ((𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉) ∧ (∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))))
102		reeanv 3292	. . . . . . . . . . 11 ⊢ (∃𝑠 ∈ 𝐵 ∃𝑡 ∈ 𝐵 ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴)) ↔ (∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴)))
103		simp1ll 1234	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → 𝜑)
104	103, 1	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → 𝑊 ∈ LMod)
105		simp1lr 1235	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → 𝑎 ∈ 𝐵)
106		simp1rl 1236	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → 𝑥 ∈ 𝑉)
107	13, 7, 14, 8	lmodvscl 20055	. . . . . . . . . . . . . . . 16 ⊢ ((𝑊 ∈ LMod ∧ 𝑎 ∈ 𝐵 ∧ 𝑥 ∈ 𝑉) → (𝑎 · 𝑥) ∈ 𝑉)
108	104, 105, 106, 107	syl3anc 1369	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (𝑎 · 𝑥) ∈ 𝑉)
109		simp1rr 1237	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → 𝑦 ∈ 𝑉)
110	13, 21	lmodvacl 20052	. . . . . . . . . . . . . . 15 ⊢ ((𝑊 ∈ LMod ∧ (𝑎 · 𝑥) ∈ 𝑉 ∧ 𝑦 ∈ 𝑉) → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑉)
111	104, 108, 109, 110	syl3anc 1369	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑉)
112		simp2l 1197	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → 𝑠 ∈ 𝐵)
113		eqid 2738	. . . . . . . . . . . . . . . . . 18 ⊢ (.r‘𝐹) = (.r‘𝐹)
114	7, 8, 113	lmodmcl 20050	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑊 ∈ LMod ∧ 𝑎 ∈ 𝐵 ∧ 𝑠 ∈ 𝐵) → (𝑎(.r‘𝐹)𝑠) ∈ 𝐵)
115	104, 105, 112, 114	syl3anc 1369	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (𝑎(.r‘𝐹)𝑠) ∈ 𝐵)
116		simp2r 1198	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → 𝑡 ∈ 𝐵)
117		eqid 2738	. . . . . . . . . . . . . . . . 17 ⊢ (+g‘𝐹) = (+g‘𝐹)
118	7, 8, 117	lmodacl 20049	. . . . . . . . . . . . . . . 16 ⊢ ((𝑊 ∈ LMod ∧ (𝑎(.r‘𝐹)𝑠) ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) → ((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) ∈ 𝐵)
119	104, 115, 116, 118	syl3anc 1369	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → ((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) ∈ 𝐵)
120	103, 12	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → 𝑌 ∈ 𝑉)
121	13, 7, 14, 8	lmodvscl 20055	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑊 ∈ LMod ∧ 𝑠 ∈ 𝐵 ∧ 𝑌 ∈ 𝑉) → (𝑠 · 𝑌) ∈ 𝑉)
122	104, 112, 120, 121	syl3anc 1369	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (𝑠 · 𝑌) ∈ 𝑉)
123	13, 7, 14, 8	lmodvscl 20055	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑊 ∈ LMod ∧ 𝑎 ∈ 𝐵 ∧ (𝑠 · 𝑌) ∈ 𝑉) → (𝑎 · (𝑠 · 𝑌)) ∈ 𝑉)
124	104, 105, 122, 123	syl3anc 1369	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (𝑎 · (𝑠 · 𝑌)) ∈ 𝑉)
125	13, 7, 14, 8	lmodvscl 20055	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑊 ∈ LMod ∧ 𝑡 ∈ 𝐵 ∧ 𝑌 ∈ 𝑉) → (𝑡 · 𝑌) ∈ 𝑉)
126	104, 116, 120, 125	syl3anc 1369	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (𝑡 · 𝑌) ∈ 𝑉)
127	13, 21	lmod4 20088	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑊 ∈ LMod ∧ ((𝑎 · 𝑥) ∈ 𝑉 ∧ 𝑦 ∈ 𝑉) ∧ ((𝑎 · (𝑠 · 𝑌)) ∈ 𝑉 ∧ (𝑡 · 𝑌) ∈ 𝑉)) → (((𝑎 · 𝑥) + 𝑦) + ((𝑎 · (𝑠 · 𝑌)) + (𝑡 · 𝑌))) = (((𝑎 · 𝑥) + (𝑎 · (𝑠 · 𝑌))) + (𝑦 + (𝑡 · 𝑌))))
128	104, 108, 109, 124, 126, 127	syl122anc 1377	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (((𝑎 · 𝑥) + 𝑦) + ((𝑎 · (𝑠 · 𝑌)) + (𝑡 · 𝑌))) = (((𝑎 · 𝑥) + (𝑎 · (𝑠 · 𝑌))) + (𝑦 + (𝑡 · 𝑌))))
129	13, 21, 7, 14, 8, 117	lmodvsdir 20062	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑊 ∈ LMod ∧ ((𝑎(.r‘𝐹)𝑠) ∈ 𝐵 ∧ 𝑡 ∈ 𝐵 ∧ 𝑌 ∈ 𝑉)) → (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌) = (((𝑎(.r‘𝐹)𝑠) · 𝑌) + (𝑡 · 𝑌)))
130	104, 115, 116, 120, 129	syl13anc 1370	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌) = (((𝑎(.r‘𝐹)𝑠) · 𝑌) + (𝑡 · 𝑌)))
131	13, 7, 14, 8, 113	lmodvsass 20063	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑊 ∈ LMod ∧ (𝑎 ∈ 𝐵 ∧ 𝑠 ∈ 𝐵 ∧ 𝑌 ∈ 𝑉)) → ((𝑎(.r‘𝐹)𝑠) · 𝑌) = (𝑎 · (𝑠 · 𝑌)))
132	104, 105, 112, 120, 131	syl13anc 1370	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → ((𝑎(.r‘𝐹)𝑠) · 𝑌) = (𝑎 · (𝑠 · 𝑌)))
133	132	oveq1d 7270	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (((𝑎(.r‘𝐹)𝑠) · 𝑌) + (𝑡 · 𝑌)) = ((𝑎 · (𝑠 · 𝑌)) + (𝑡 · 𝑌)))
134	130, 133	eqtrd 2778	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌) = ((𝑎 · (𝑠 · 𝑌)) + (𝑡 · 𝑌)))
135	134	oveq2d 7271	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (((𝑎 · 𝑥) + 𝑦) + (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌)) = (((𝑎 · 𝑥) + 𝑦) + ((𝑎 · (𝑠 · 𝑌)) + (𝑡 · 𝑌))))
136	13, 21, 7, 14, 8	lmodvsdi 20061	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑊 ∈ LMod ∧ (𝑎 ∈ 𝐵 ∧ 𝑥 ∈ 𝑉 ∧ (𝑠 · 𝑌) ∈ 𝑉)) → (𝑎 · (𝑥 + (𝑠 · 𝑌))) = ((𝑎 · 𝑥) + (𝑎 · (𝑠 · 𝑌))))
137	104, 105, 106, 122, 136	syl13anc 1370	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (𝑎 · (𝑥 + (𝑠 · 𝑌))) = ((𝑎 · 𝑥) + (𝑎 · (𝑠 · 𝑌))))
138	137	oveq1d 7270	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → ((𝑎 · (𝑥 + (𝑠 · 𝑌))) + (𝑦 + (𝑡 · 𝑌))) = (((𝑎 · 𝑥) + (𝑎 · (𝑠 · 𝑌))) + (𝑦 + (𝑡 · 𝑌))))
139	128, 135, 138	3eqtr4d 2788	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (((𝑎 · 𝑥) + 𝑦) + (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌)) = ((𝑎 · (𝑥 + (𝑠 · 𝑌))) + (𝑦 + (𝑡 · 𝑌))))
140	103, 56	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (𝑁‘𝐴) ∈ 𝑆)
141		simp3l 1199	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴))
142		simp3r 1200	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))
143	7, 8, 21, 14, 54	lsscl 20119	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑁‘𝐴) ∈ 𝑆 ∧ (𝑎 ∈ 𝐵 ∧ (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → ((𝑎 · (𝑥 + (𝑠 · 𝑌))) + (𝑦 + (𝑡 · 𝑌))) ∈ (𝑁‘𝐴))
144	140, 105, 141, 142, 143	syl13anc 1370	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → ((𝑎 · (𝑥 + (𝑠 · 𝑌))) + (𝑦 + (𝑡 · 𝑌))) ∈ (𝑁‘𝐴))
145	139, 144	eqeltrd 2839	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → (((𝑎 · 𝑥) + 𝑦) + (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌)) ∈ (𝑁‘𝐴))
146		oveq1 7262	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑟 = ((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) → (𝑟 · 𝑌) = (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌))
147	146	oveq2d 7271	. . . . . . . . . . . . . . . . 17 ⊢ (𝑟 = ((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) → (((𝑎 · 𝑥) + 𝑦) + (𝑟 · 𝑌)) = (((𝑎 · 𝑥) + 𝑦) + (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌)))
148	147	eleq1d 2823	. . . . . . . . . . . . . . . 16 ⊢ (𝑟 = ((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) → ((((𝑎 · 𝑥) + 𝑦) + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (((𝑎 · 𝑥) + 𝑦) + (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌)) ∈ (𝑁‘𝐴)))
149	148	rspcev 3552	. . . . . . . . . . . . . . 15 ⊢ ((((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) ∈ 𝐵 ∧ (((𝑎 · 𝑥) + 𝑦) + (((𝑎(.r‘𝐹)𝑠)(+g‘𝐹)𝑡) · 𝑌)) ∈ (𝑁‘𝐴)) → ∃𝑟 ∈ 𝐵 (((𝑎 · 𝑥) + 𝑦) + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴))
150	119, 145, 149	syl2anc 583	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → ∃𝑟 ∈ 𝐵 (((𝑎 · 𝑥) + 𝑦) + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴))
151		oveq1 7262	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = ((𝑎 · 𝑥) + 𝑦) → (𝑧 + (𝑟 · 𝑌)) = (((𝑎 · 𝑥) + 𝑦) + (𝑟 · 𝑌)))
152	151	eleq1d 2823	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = ((𝑎 · 𝑥) + 𝑦) → ((𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (((𝑎 · 𝑥) + 𝑦) + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
153	152	rexbidv 3225	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = ((𝑎 · 𝑥) + 𝑦) → (∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ ∃𝑟 ∈ 𝐵 (((𝑎 · 𝑥) + 𝑦) + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
154	153, 2	elrab2 3620	. . . . . . . . . . . . . 14 ⊢ (((𝑎 · 𝑥) + 𝑦) ∈ 𝑄 ↔ (((𝑎 · 𝑥) + 𝑦) ∈ 𝑉 ∧ ∃𝑟 ∈ 𝐵 (((𝑎 · 𝑥) + 𝑦) + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
155	111, 150, 154	sylanbrc 582	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) ∧ (𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) ∧ ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑄)
156	155	3exp 1117	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) → ((𝑠 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) → (((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴)) → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑄)))
157	156	rexlimdvv 3221	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) → (∃𝑠 ∈ 𝐵 ∃𝑡 ∈ 𝐵 ((𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴)) → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑄))
158	102, 157	syl5bir 242	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑎 ∈ 𝐵) ∧ (𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉)) → ((∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴)) → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑄))
159	158	expimpd 453	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝐵) → (((𝑥 ∈ 𝑉 ∧ 𝑦 ∈ 𝑉) ∧ (∃𝑠 ∈ 𝐵 (𝑥 + (𝑠 · 𝑌)) ∈ (𝑁‘𝐴) ∧ ∃𝑡 ∈ 𝐵 (𝑦 + (𝑡 · 𝑌)) ∈ (𝑁‘𝐴))) → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑄))
160	101, 159	syl5bi 241	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝐵) → ((𝑥 ∈ 𝑄 ∧ 𝑦 ∈ 𝑄) → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑄))
161	160	exp4b 430	. . . . . . 7 ⊢ (𝜑 → (𝑎 ∈ 𝐵 → (𝑥 ∈ 𝑄 → (𝑦 ∈ 𝑄 → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑄))))
162	161	3imp2 1347	. . . . . 6 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝐵 ∧ 𝑥 ∈ 𝑄 ∧ 𝑦 ∈ 𝑄)) → ((𝑎 · 𝑥) + 𝑦) ∈ 𝑄)
163	74, 75, 76, 77, 78, 79, 4, 80, 162	islssd 20112	. . . . 5 ⊢ (𝜑 → 𝑄 ∈ 𝑆)
164	54, 25	lspid 20159	. . . . 5 ⊢ ((𝑊 ∈ LMod ∧ 𝑄 ∈ 𝑆) → (𝑁‘𝑄) = 𝑄)
165	1, 163, 164	syl2anc 583	. . . 4 ⊢ (𝜑 → (𝑁‘𝑄) = 𝑄)
166	73, 165	sseqtrd 3957	. . 3 ⊢ (𝜑 → (𝑁‘(𝐴 ∪ {𝑌})) ⊆ 𝑄)
167		lspsolv.x	. . 3 ⊢ (𝜑 → 𝑋 ∈ (𝑁‘(𝐴 ∪ {𝑌})))
168	166, 167	sseldd 3918	. 2 ⊢ (𝜑 → 𝑋 ∈ 𝑄)
169		oveq1 7262	. . . . . 6 ⊢ (𝑧 = 𝑋 → (𝑧 + (𝑟 · 𝑌)) = (𝑋 + (𝑟 · 𝑌)))
170	169	eleq1d 2823	. . . . 5 ⊢ (𝑧 = 𝑋 → ((𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ (𝑋 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
171	170	rexbidv 3225	. . . 4 ⊢ (𝑧 = 𝑋 → (∃𝑟 ∈ 𝐵 (𝑧 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴) ↔ ∃𝑟 ∈ 𝐵 (𝑋 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
172	171, 2	elrab2 3620	. . 3 ⊢ (𝑋 ∈ 𝑄 ↔ (𝑋 ∈ 𝑉 ∧ ∃𝑟 ∈ 𝐵 (𝑋 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴)))
173	172	simprbi 496	. 2 ⊢ (𝑋 ∈ 𝑄 → ∃𝑟 ∈ 𝐵 (𝑋 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴))
174	168, 173	syl 17	1 ⊢ (𝜑 → ∃𝑟 ∈ 𝐵 (𝑋 + (𝑟 · 𝑌)) ∈ (𝑁‘𝐴))

Syntax hints:   → wi 4   ∧ wa 395   ∧ w3a 1085   = wceq 1539   ∈ wcel 2108  ∃wrex 3064  {crab 3067   ∪ cun 3881   ⊆ wss 3883  {csn 4558  ‘cfv 6418  (class class class)co 7255  Basecbs 16840  +_gcplusg 16888  ._rcmulr 16889  Scalarcsca 16891   ·_𝑠 cvsca 16892  0_gc0g 17067  Grpcgrp 18492  inv_gcminusg 18493  1_rcur 19652  LModclmod 20038  LSubSpclss 20108  LSpanclspn 20148

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-er 8456  df-en 8692  df-dom 8693  df-sdom 8694  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-nn 11904  df-2 11966  df-sets 16793  df-slot 16811  df-ndx 16823  df-base 16841  df-plusg 16901  df-0g 17069  df-mgm 18241  df-sgrp 18290  df-mnd 18301  df-grp 18495  df-minusg 18496  df-sbg 18497  df-cmn 19303  df-abl 19304  df-mgp 19636  df-ur 19653  df-ring 19700  df-lmod 20040  df-lss 20109  df-lsp 20149

This theorem is referenced by:  lspsolv  20320