MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  islindf4 Structured version   Visualization version   GIF version

Theorem islindf4 20391
Description: A family is independent iff it has no nontrivial representations of zero. (Contributed by Stefan O'Rear, 28-Feb-2015.)
Hypotheses
Ref Expression
islindf4.b 𝐵 = (Base‘𝑊)
islindf4.r 𝑅 = (Scalar‘𝑊)
islindf4.t · = ( ·𝑠𝑊)
islindf4.z 0 = (0g𝑊)
islindf4.y 𝑌 = (0g𝑅)
islindf4.l 𝐿 = (Base‘(𝑅 freeLMod 𝐼))
Assertion
Ref Expression
islindf4 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (𝐹 LIndF 𝑊 ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0𝑥 = (𝐼 × {𝑌}))))
Distinct variable groups:   𝑥,𝐵   𝑥,𝐹   𝑥,𝐼   𝑥,𝐿   𝑥,𝑅   𝑥, ·   𝑥,𝑊   𝑥,𝑋   𝑥,𝑌   𝑥, 0

Proof of Theorem islindf4
Dummy variables 𝑗 𝑘 𝑙 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 raldifsni 4523 . . . . 5 (∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑙 ∈ (Base‘𝑅)((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌))
2 simpll1 1262 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑊 ∈ LMod)
3 simprll 788 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑙 ∈ (Base‘𝑅))
4 ffvelrn 6582 . . . . . . . . . . . . . . . . . 18 ((𝐹:𝐼𝐵𝑗𝐼) → (𝐹𝑗) ∈ 𝐵)
543ad2antl3 1231 . . . . . . . . . . . . . . . . 17 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (𝐹𝑗) ∈ 𝐵)
65adantr 468 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝐹𝑗) ∈ 𝐵)
7 islindf4.b . . . . . . . . . . . . . . . . 17 𝐵 = (Base‘𝑊)
8 islindf4.r . . . . . . . . . . . . . . . . 17 𝑅 = (Scalar‘𝑊)
9 islindf4.t . . . . . . . . . . . . . . . . 17 · = ( ·𝑠𝑊)
10 eqid 2813 . . . . . . . . . . . . . . . . 17 (invg𝑊) = (invg𝑊)
11 eqid 2813 . . . . . . . . . . . . . . . . 17 (invg𝑅) = (invg𝑅)
12 eqid 2813 . . . . . . . . . . . . . . . . 17 (Base‘𝑅) = (Base‘𝑅)
137, 8, 9, 10, 11, 12lmodvsinv 19246 . . . . . . . . . . . . . . . 16 ((𝑊 ∈ LMod ∧ 𝑙 ∈ (Base‘𝑅) ∧ (𝐹𝑗) ∈ 𝐵) → (((invg𝑅)‘𝑙) · (𝐹𝑗)) = ((invg𝑊)‘(𝑙 · (𝐹𝑗))))
142, 3, 6, 13syl3anc 1483 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((invg𝑅)‘𝑙) · (𝐹𝑗)) = ((invg𝑊)‘(𝑙 · (𝐹𝑗))))
1514eqeq1d 2815 . . . . . . . . . . . . . 14 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ↔ ((invg𝑊)‘(𝑙 · (𝐹𝑗))) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))))
16 lmodgrp 19077 . . . . . . . . . . . . . . . 16 (𝑊 ∈ LMod → 𝑊 ∈ Grp)
172, 16syl 17 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑊 ∈ Grp)
187, 8, 9, 12lmodvscl 19087 . . . . . . . . . . . . . . . 16 ((𝑊 ∈ LMod ∧ 𝑙 ∈ (Base‘𝑅) ∧ (𝐹𝑗) ∈ 𝐵) → (𝑙 · (𝐹𝑗)) ∈ 𝐵)
192, 3, 6, 18syl3anc 1483 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑙 · (𝐹𝑗)) ∈ 𝐵)
20 islindf4.z . . . . . . . . . . . . . . . 16 0 = (0g𝑊)
21 lmodcmn 19118 . . . . . . . . . . . . . . . . 17 (𝑊 ∈ LMod → 𝑊 ∈ CMnd)
222, 21syl 17 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑊 ∈ CMnd)
23 simpll2 1264 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐼𝑋)
24 difexg 5010 . . . . . . . . . . . . . . . . 17 (𝐼𝑋 → (𝐼 ∖ {𝑗}) ∈ V)
2523, 24syl 17 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝐼 ∖ {𝑗}) ∈ V)
26 simprlr 789 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))
27 elmapi 8117 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})) → 𝑦:(𝐼 ∖ {𝑗})⟶(Base‘𝑅))
2826, 27syl 17 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑦:(𝐼 ∖ {𝑗})⟶(Base‘𝑅))
29 simpll3 1266 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐹:𝐼𝐵)
30 difss 3943 . . . . . . . . . . . . . . . . . 18 (𝐼 ∖ {𝑗}) ⊆ 𝐼
31 fssres 6288 . . . . . . . . . . . . . . . . . 18 ((𝐹:𝐼𝐵 ∧ (𝐼 ∖ {𝑗}) ⊆ 𝐼) → (𝐹 ↾ (𝐼 ∖ {𝑗})):(𝐼 ∖ {𝑗})⟶𝐵)
3229, 30, 31sylancl 576 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝐹 ↾ (𝐼 ∖ {𝑗})):(𝐼 ∖ {𝑗})⟶𝐵)
338, 12, 9, 7, 2, 28, 32, 25lcomf 19109 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))):(𝐼 ∖ {𝑗})⟶𝐵)
34 islindf4.y . . . . . . . . . . . . . . . . 17 𝑌 = (0g𝑅)
35 simprr 780 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑦 finSupp 𝑌)
368, 12, 9, 7, 2, 28, 32, 25, 20, 34, 35lcomfsupp 19110 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))) finSupp 0 )
377, 20, 22, 25, 33, 36gsumcl 18520 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ∈ 𝐵)
38 eqid 2813 . . . . . . . . . . . . . . . 16 (+g𝑊) = (+g𝑊)
397, 38, 20, 10grpinvid2 17679 . . . . . . . . . . . . . . 15 ((𝑊 ∈ Grp ∧ (𝑙 · (𝐹𝑗)) ∈ 𝐵 ∧ (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ∈ 𝐵) → (((invg𝑊)‘(𝑙 · (𝐹𝑗))) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ↔ ((𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))) = 0 ))
4017, 19, 37, 39syl3anc 1483 . . . . . . . . . . . . . 14 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((invg𝑊)‘(𝑙 · (𝐹𝑗))) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ↔ ((𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))) = 0 ))
41 simplr 776 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑗𝐼)
42 fsnunf2 6680 . . . . . . . . . . . . . . . . . . 19 ((𝑦:(𝐼 ∖ {𝑗})⟶(Base‘𝑅) ∧ 𝑗𝐼𝑙 ∈ (Base‘𝑅)) → (𝑦 ∪ {⟨𝑗, 𝑙⟩}):𝐼⟶(Base‘𝑅))
4328, 41, 3, 42syl3anc 1483 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦 ∪ {⟨𝑗, 𝑙⟩}):𝐼⟶(Base‘𝑅))
448, 12, 9, 7, 2, 43, 29, 23lcomf 19109 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹):𝐼𝐵)
45 simpr 473 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝑗𝐼)
46 simpl 470 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) → 𝑙 ∈ (Base‘𝑅))
4745, 46anim12i 602 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → (𝑗𝐼𝑙 ∈ (Base‘𝑅)))
48 elmapfun 8119 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})) → Fun 𝑦)
49 fdm 6267 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑦:(𝐼 ∖ {𝑗})⟶(Base‘𝑅) → dom 𝑦 = (𝐼 ∖ {𝑗}))
50 neldifsnd 4521 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (dom 𝑦 = (𝐼 ∖ {𝑗}) → ¬ 𝑗 ∈ (𝐼 ∖ {𝑗}))
51 df-nel 3089 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 ∉ dom 𝑦 ↔ ¬ 𝑗 ∈ dom 𝑦)
52 eleq2 2881 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (dom 𝑦 = (𝐼 ∖ {𝑗}) → (𝑗 ∈ dom 𝑦𝑗 ∈ (𝐼 ∖ {𝑗})))
5352notbid 309 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (dom 𝑦 = (𝐼 ∖ {𝑗}) → (¬ 𝑗 ∈ dom 𝑦 ↔ ¬ 𝑗 ∈ (𝐼 ∖ {𝑗})))
5451, 53syl5bb 274 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (dom 𝑦 = (𝐼 ∖ {𝑗}) → (𝑗 ∉ dom 𝑦 ↔ ¬ 𝑗 ∈ (𝐼 ∖ {𝑗})))
5550, 54mpbird 248 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (dom 𝑦 = (𝐼 ∖ {𝑗}) → 𝑗 ∉ dom 𝑦)
5649, 55syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦:(𝐼 ∖ {𝑗})⟶(Base‘𝑅) → 𝑗 ∉ dom 𝑦)
5727, 56syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})) → 𝑗 ∉ dom 𝑦)
5848, 57jca 503 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})) → (Fun 𝑦𝑗 ∉ dom 𝑦))
5958adantl 469 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) → (Fun 𝑦𝑗 ∉ dom 𝑦))
6059adantl 469 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → (Fun 𝑦𝑗 ∉ dom 𝑦))
6147, 60jca 503 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → ((𝑗𝐼𝑙 ∈ (Base‘𝑅)) ∧ (Fun 𝑦𝑗 ∉ dom 𝑦)))
62 funsnfsupp 8541 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑗𝐼𝑙 ∈ (Base‘𝑅)) ∧ (Fun 𝑦𝑗 ∉ dom 𝑦)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌𝑦 finSupp 𝑌))
6362bicomd 214 . . . . . . . . . . . . . . . . . . . . 21 (((𝑗𝐼𝑙 ∈ (Base‘𝑅)) ∧ (Fun 𝑦𝑗 ∉ dom 𝑦)) → (𝑦 finSupp 𝑌 ↔ (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌))
6461, 63syl 17 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → (𝑦 finSupp 𝑌 ↔ (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌))
6564biimpd 220 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → (𝑦 finSupp 𝑌 → (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌))
6665impr 444 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌)
678, 12, 9, 7, 2, 43, 29, 23, 20, 34, 66lcomfsupp 19110 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) finSupp 0 )
68 incom 4011 . . . . . . . . . . . . . . . . . . 19 ((𝐼 ∖ {𝑗}) ∩ {𝑗}) = ({𝑗} ∩ (𝐼 ∖ {𝑗}))
69 disjdif 4243 . . . . . . . . . . . . . . . . . . 19 ({𝑗} ∩ (𝐼 ∖ {𝑗})) = ∅
7068, 69eqtri 2835 . . . . . . . . . . . . . . . . . 18 ((𝐼 ∖ {𝑗}) ∩ {𝑗}) = ∅
7170a1i 11 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝐼 ∖ {𝑗}) ∩ {𝑗}) = ∅)
72 difsnid 4538 . . . . . . . . . . . . . . . . . . 19 (𝑗𝐼 → ((𝐼 ∖ {𝑗}) ∪ {𝑗}) = 𝐼)
7372eqcomd 2819 . . . . . . . . . . . . . . . . . 18 (𝑗𝐼𝐼 = ((𝐼 ∖ {𝑗}) ∪ {𝑗}))
7441, 73syl 17 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐼 = ((𝐼 ∖ {𝑗}) ∪ {𝑗}))
757, 20, 38, 22, 23, 44, 67, 71, 74gsumsplit 18532 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = ((𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ (𝐼 ∖ {𝑗})))(+g𝑊)(𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ {𝑗}))))
76 vex 3401 . . . . . . . . . . . . . . . . . . . . 21 𝑦 ∈ V
77 snex 5105 . . . . . . . . . . . . . . . . . . . . 21 {⟨𝑗, 𝑙⟩} ∈ V
7876, 77unex 7189 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∈ V
79 simpl3 1239 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝐹:𝐼𝐵)
80 simpl2 1237 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝐼𝑋)
81 fex 6717 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐹:𝐼𝐵𝐼𝑋) → 𝐹 ∈ V)
8279, 80, 81syl2anc 575 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝐹 ∈ V)
8382adantr 468 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐹 ∈ V)
84 offres 7396 . . . . . . . . . . . . . . . . . . . 20 (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∈ V ∧ 𝐹 ∈ V) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ (𝐼 ∖ {𝑗})) = (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) ∘𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))
8578, 83, 84sylancr 577 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ (𝐼 ∖ {𝑗})) = (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) ∘𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))
8628ffnd 6260 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑦 Fn (𝐼 ∖ {𝑗}))
87 neldifsn 4520 . . . . . . . . . . . . . . . . . . . . 21 ¬ 𝑗 ∈ (𝐼 ∖ {𝑗})
88 fsnunres 6682 . . . . . . . . . . . . . . . . . . . . 21 ((𝑦 Fn (𝐼 ∖ {𝑗}) ∧ ¬ 𝑗 ∈ (𝐼 ∖ {𝑗})) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) = 𝑦)
8986, 87, 88sylancl 576 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) = 𝑦)
9089oveq1d 6892 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) ∘𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))) = (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))
9185, 90eqtrd 2847 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ (𝐼 ∖ {𝑗})) = (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))
9291oveq2d 6893 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ (𝐼 ∖ {𝑗}))) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))))
9344ffnd 6260 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) Fn 𝐼)
94 fnressn 6652 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) Fn 𝐼𝑗𝐼) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ {𝑗}) = {⟨𝑗, (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)‘𝑗)⟩})
9593, 41, 94syl2anc 575 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ {𝑗}) = {⟨𝑗, (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)‘𝑗)⟩})
9643ffnd 6260 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦 ∪ {⟨𝑗, 𝑙⟩}) Fn 𝐼)
9729ffnd 6260 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐹 Fn 𝐼)
98 fnfvof 7144 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑦 ∪ {⟨𝑗, 𝑙⟩}) Fn 𝐼𝐹 Fn 𝐼) ∧ (𝐼𝑋𝑗𝐼)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)‘𝑗) = (((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) · (𝐹𝑗)))
9996, 97, 23, 41, 98syl22anc 858 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)‘𝑗) = (((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) · (𝐹𝑗)))
100 fndm 6204 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑦 Fn (𝐼 ∖ {𝑗}) → dom 𝑦 = (𝐼 ∖ {𝑗}))
101100eleq2d 2878 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 Fn (𝐼 ∖ {𝑗}) → (𝑗 ∈ dom 𝑦𝑗 ∈ (𝐼 ∖ {𝑗})))
10287, 101mtbiri 318 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 Fn (𝐼 ∖ {𝑗}) → ¬ 𝑗 ∈ dom 𝑦)
103 vex 3401 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑗 ∈ V
104 vex 3401 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑙 ∈ V
105 fsnunfv 6681 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ V ∧ 𝑙 ∈ V ∧ ¬ 𝑗 ∈ dom 𝑦) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑙)
106103, 104, 105mp3an12 1568 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑗 ∈ dom 𝑦 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑙)
10786, 102, 1063syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑙)
108107oveq1d 6892 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) · (𝐹𝑗)) = (𝑙 · (𝐹𝑗)))
10999, 108eqtrd 2847 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)‘𝑗) = (𝑙 · (𝐹𝑗)))
110109opeq2d 4609 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ⟨𝑗, (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)‘𝑗)⟩ = ⟨𝑗, (𝑙 · (𝐹𝑗))⟩)
111110sneqd 4389 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → {⟨𝑗, (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)‘𝑗)⟩} = {⟨𝑗, (𝑙 · (𝐹𝑗))⟩})
112 ovex 6909 . . . . . . . . . . . . . . . . . . . . . 22 (𝑙 · (𝐹𝑗)) ∈ V
113 fmptsn 6661 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ V ∧ (𝑙 · (𝐹𝑗)) ∈ V) → {⟨𝑗, (𝑙 · (𝐹𝑗))⟩} = (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗))))
114103, 112, 113mp2an 675 . . . . . . . . . . . . . . . . . . . . 21 {⟨𝑗, (𝑙 · (𝐹𝑗))⟩} = (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗)))
115114a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → {⟨𝑗, (𝑙 · (𝐹𝑗))⟩} = (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗))))
11695, 111, 1153eqtrd 2851 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ {𝑗}) = (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗))))
117116oveq2d 6893 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ {𝑗})) = (𝑊 Σg (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗)))))
118 cmnmnd 18412 . . . . . . . . . . . . . . . . . . . 20 (𝑊 ∈ CMnd → 𝑊 ∈ Mnd)
11922, 118syl 17 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑊 ∈ Mnd)
120103a1i 11 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑗 ∈ V)
121 eqidd 2814 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑗 → (𝑙 · (𝐹𝑗)) = (𝑙 · (𝐹𝑗)))
1227, 121gsumsn 18558 . . . . . . . . . . . . . . . . . . 19 ((𝑊 ∈ Mnd ∧ 𝑗 ∈ V ∧ (𝑙 · (𝐹𝑗)) ∈ 𝐵) → (𝑊 Σg (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗)))) = (𝑙 · (𝐹𝑗)))
123119, 120, 19, 122syl3anc 1483 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗)))) = (𝑙 · (𝐹𝑗)))
124117, 123eqtrd 2847 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ {𝑗})) = (𝑙 · (𝐹𝑗)))
12592, 124oveq12d 6895 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ (𝐼 ∖ {𝑗})))(+g𝑊)(𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹) ↾ {𝑗}))) = ((𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))))
12675, 125eqtr2d 2848 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))) = (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)))
127126eqeq1d 2815 . . . . . . . . . . . . . 14 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))) = 0 ↔ (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 ))
12815, 40, 1273bitrd 296 . . . . . . . . . . . . 13 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ↔ (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 ))
129107eqcomd 2819 . . . . . . . . . . . . . 14 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑙 = ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗))
130129eqeq1d 2815 . . . . . . . . . . . . 13 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑙 = 𝑌 ↔ ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))
131128, 130imbi12d 335 . . . . . . . . . . . 12 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌) ↔ ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌)))
132131anassrs 455 . . . . . . . . . . 11 (((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) ∧ 𝑦 finSupp 𝑌) → (((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌) ↔ ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌)))
133132pm5.74da 829 . . . . . . . . . 10 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → ((𝑦 finSupp 𝑌 → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌)) ↔ (𝑦 finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
134 impexp 439 . . . . . . . . . . 11 (((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ (𝑦 finSupp 𝑌 → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌)))
135134a1i 11 . . . . . . . . . 10 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → (((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ (𝑦 finSupp 𝑌 → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌))))
13664bicomd 214 . . . . . . . . . . 11 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌𝑦 finSupp 𝑌))
137136imbi1d 332 . . . . . . . . . 10 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌)) ↔ (𝑦 finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
138133, 135, 1373bitr4d 302 . . . . . . . . 9 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗})))) → (((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
1391382ralbidva 3183 . . . . . . . 8 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ ∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
140 breq1 4854 . . . . . . . . . . 11 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (𝑥 finSupp 𝑌 ↔ (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌))
141 oveq1 6884 . . . . . . . . . . . . . 14 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (𝑥𝑓 · 𝐹) = ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹))
142141oveq2d 6893 . . . . . . . . . . . . 13 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (𝑊 Σg (𝑥𝑓 · 𝐹)) = (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)))
143142eqeq1d 2815 . . . . . . . . . . . 12 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 ↔ (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 ))
144 fveq1 6410 . . . . . . . . . . . . 13 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (𝑥𝑗) = ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗))
145144eqeq1d 2815 . . . . . . . . . . . 12 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → ((𝑥𝑗) = 𝑌 ↔ ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))
146143, 145imbi12d 335 . . . . . . . . . . 11 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌) ↔ ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌)))
147140, 146imbi12d 335 . . . . . . . . . 10 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → ((𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)) ↔ ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
148147ralxpmap 8147 . . . . . . . . 9 (𝑗𝐼 → (∀𝑥 ∈ ((Base‘𝑅) ↑𝑚 𝐼)(𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)) ↔ ∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
149148adantl 469 . . . . . . . 8 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑥 ∈ ((Base‘𝑅) ↑𝑚 𝐼)(𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)) ↔ ∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘𝑓 · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
150139, 149bitr4d 273 . . . . . . 7 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ ∀𝑥 ∈ ((Base‘𝑅) ↑𝑚 𝐼)(𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌))))
151 breq1 4854 . . . . . . . 8 (𝑧 = 𝑥 → (𝑧 finSupp 𝑌𝑥 finSupp 𝑌))
152151ralrab 3571 . . . . . . 7 (∀𝑥 ∈ {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌} ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌) ↔ ∀𝑥 ∈ ((Base‘𝑅) ↑𝑚 𝐼)(𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
153150, 152syl6bbr 280 . . . . . 6 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ ∀𝑥 ∈ {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌} ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
154 resima 5641 . . . . . . . . . . . . 13 ((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗})) = (𝐹 “ (𝐼 ∖ {𝑗}))
155154eqcomi 2822 . . . . . . . . . . . 12 (𝐹 “ (𝐼 ∖ {𝑗})) = ((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗}))
156155fveq2i 6414 . . . . . . . . . . 11 ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) = ((LSpan‘𝑊)‘((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗})))
157156eleq2i 2884 . . . . . . . . . 10 ((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗}))))
158 eqid 2813 . . . . . . . . . . 11 (LSpan‘𝑊) = (LSpan‘𝑊)
15979, 30, 31sylancl 576 . . . . . . . . . . 11 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (𝐹 ↾ (𝐼 ∖ {𝑗})):(𝐼 ∖ {𝑗})⟶𝐵)
160 simpl1 1235 . . . . . . . . . . 11 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝑊 ∈ LMod)
161243ad2ant2 1157 . . . . . . . . . . . 12 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (𝐼 ∖ {𝑗}) ∈ V)
162161adantr 468 . . . . . . . . . . 11 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (𝐼 ∖ {𝑗}) ∈ V)
163158, 7, 12, 8, 34, 9, 159, 160, 162ellspd 20355 . . . . . . . . . 10 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗}))) ↔ ∃𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))(𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))))))
164157, 163syl5bb 274 . . . . . . . . 9 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∃𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))(𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗})))))))
165164imbi1d 332 . . . . . . . 8 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌) ↔ (∃𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))(𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌)))
166 r19.23v 3218 . . . . . . . 8 (∀𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ (∃𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))(𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌))
167165, 166syl6bbr 280 . . . . . . 7 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌) ↔ ∀𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌)))
168167ralbidv 3181 . . . . . 6 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌) ↔ ∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑𝑚 (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦𝑓 · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌)))
1698fvexi 6425 . . . . . . . . . . 11 𝑅 ∈ V
170 eqid 2813 . . . . . . . . . . . 12 (𝑅 freeLMod 𝐼) = (𝑅 freeLMod 𝐼)
171 eqid 2813 . . . . . . . . . . . 12 {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌} = {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌}
172170, 12, 34, 171frlmbas 20313 . . . . . . . . . . 11 ((𝑅 ∈ V ∧ 𝐼𝑋) → {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌} = (Base‘(𝑅 freeLMod 𝐼)))
173169, 172mpan 673 . . . . . . . . . 10 (𝐼𝑋 → {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌} = (Base‘(𝑅 freeLMod 𝐼)))
1741733ad2ant2 1157 . . . . . . . . 9 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌} = (Base‘(𝑅 freeLMod 𝐼)))
175174adantr 468 . . . . . . . 8 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌} = (Base‘(𝑅 freeLMod 𝐼)))
176 islindf4.l . . . . . . . 8 𝐿 = (Base‘(𝑅 freeLMod 𝐼))
177175, 176syl6reqr 2866 . . . . . . 7 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝐿 = {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌})
178177raleqdv 3340 . . . . . 6 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌) ↔ ∀𝑥 ∈ {𝑧 ∈ ((Base‘𝑅) ↑𝑚 𝐼) ∣ 𝑧 finSupp 𝑌} ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
179153, 168, 1783bitr4d 302 . . . . 5 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
1801, 179syl5bb 274 . . . 4 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
1818lmodfgrp 19079 . . . . . . . 8 (𝑊 ∈ LMod → 𝑅 ∈ Grp)
18212, 34, 11grpinvnzcl 17695 . . . . . . . 8 ((𝑅 ∈ Grp ∧ 𝑙 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘𝑙) ∈ ((Base‘𝑅) ∖ {𝑌}))
183181, 182sylan 571 . . . . . . 7 ((𝑊 ∈ LMod ∧ 𝑙 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘𝑙) ∈ ((Base‘𝑅) ∖ {𝑌}))
18412, 34, 11grpinvnzcl 17695 . . . . . . . . 9 ((𝑅 ∈ Grp ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘𝑘) ∈ ((Base‘𝑅) ∖ {𝑌}))
185181, 184sylan 571 . . . . . . . 8 ((𝑊 ∈ LMod ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘𝑘) ∈ ((Base‘𝑅) ∖ {𝑌}))
186 eldifi 3938 . . . . . . . . . 10 (𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) → 𝑘 ∈ (Base‘𝑅))
18712, 11grpinvinv 17690 . . . . . . . . . 10 ((𝑅 ∈ Grp ∧ 𝑘 ∈ (Base‘𝑅)) → ((invg𝑅)‘((invg𝑅)‘𝑘)) = 𝑘)
188181, 186, 187syl2an 585 . . . . . . . . 9 ((𝑊 ∈ LMod ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘((invg𝑅)‘𝑘)) = 𝑘)
189188eqcomd 2819 . . . . . . . 8 ((𝑊 ∈ LMod ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → 𝑘 = ((invg𝑅)‘((invg𝑅)‘𝑘)))
190 fveq2 6411 . . . . . . . . 9 (𝑙 = ((invg𝑅)‘𝑘) → ((invg𝑅)‘𝑙) = ((invg𝑅)‘((invg𝑅)‘𝑘)))
191190rspceeqv 3527 . . . . . . . 8 ((((invg𝑅)‘𝑘) ∈ ((Base‘𝑅) ∖ {𝑌}) ∧ 𝑘 = ((invg𝑅)‘((invg𝑅)‘𝑘))) → ∃𝑙 ∈ ((Base‘𝑅) ∖ {𝑌})𝑘 = ((invg𝑅)‘𝑙))
192185, 189, 191syl2anc 575 . . . . . . 7 ((𝑊 ∈ LMod ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → ∃𝑙 ∈ ((Base‘𝑅) ∖ {𝑌})𝑘 = ((invg𝑅)‘𝑙))
193 oveq1 6884 . . . . . . . . . 10 (𝑘 = ((invg𝑅)‘𝑙) → (𝑘 · (𝐹𝑗)) = (((invg𝑅)‘𝑙) · (𝐹𝑗)))
194193eleq1d 2877 . . . . . . . . 9 (𝑘 = ((invg𝑅)‘𝑙) → ((𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
195194notbid 309 . . . . . . . 8 (𝑘 = ((invg𝑅)‘𝑙) → (¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
196195adantl 469 . . . . . . 7 ((𝑊 ∈ LMod ∧ 𝑘 = ((invg𝑅)‘𝑙)) → (¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
197183, 192, 196ralxfrd 5084 . . . . . 6 (𝑊 ∈ LMod → (∀𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
1981973ad2ant1 1156 . . . . 5 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (∀𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
199198adantr 468 . . . 4 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
200 simplr 776 . . . . . . . 8 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ 𝑥𝐿) → 𝑗𝐼)
20134fvexi 6425 . . . . . . . . 9 𝑌 ∈ V
202201fvconst2 6697 . . . . . . . 8 (𝑗𝐼 → ((𝐼 × {𝑌})‘𝑗) = 𝑌)
203200, 202syl 17 . . . . . . 7 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ 𝑥𝐿) → ((𝐼 × {𝑌})‘𝑗) = 𝑌)
204203eqeq2d 2823 . . . . . 6 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ 𝑥𝐿) → ((𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗) ↔ (𝑥𝑗) = 𝑌))
205204imbi2d 331 . . . . 5 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ 𝑥𝐿) → (((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
206205ralbidva 3180 . . . 4 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
207180, 199, 2063bitr4d 302 . . 3 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
208207ralbidva 3180 . 2 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (∀𝑗𝐼𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑗𝐼𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
2097, 9, 158, 8, 12, 34islindf2 20367 . 2 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (𝐹 LIndF 𝑊 ↔ ∀𝑗𝐼𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
210170, 12, 176frlmbasf 20318 . . . . . . . 8 ((𝐼𝑋𝑥𝐿) → 𝑥:𝐼⟶(Base‘𝑅))
2112103ad2antl2 1230 . . . . . . 7 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑥𝐿) → 𝑥:𝐼⟶(Base‘𝑅))
212211ffnd 6260 . . . . . 6 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑥𝐿) → 𝑥 Fn 𝐼)
213 fnconstg 6311 . . . . . . 7 (𝑌 ∈ V → (𝐼 × {𝑌}) Fn 𝐼)
214201, 213ax-mp 5 . . . . . 6 (𝐼 × {𝑌}) Fn 𝐼
215 eqfnfv 6536 . . . . . 6 ((𝑥 Fn 𝐼 ∧ (𝐼 × {𝑌}) Fn 𝐼) → (𝑥 = (𝐼 × {𝑌}) ↔ ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
216212, 214, 215sylancl 576 . . . . 5 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑥𝐿) → (𝑥 = (𝐼 × {𝑌}) ↔ ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
217216imbi2d 331 . . . 4 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑥𝐿) → (((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0𝑥 = (𝐼 × {𝑌})) ↔ ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
218217ralbidva 3180 . . 3 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0𝑥 = (𝐼 × {𝑌})) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
219 r19.21v 3155 . . . . 5 (∀𝑗𝐼 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
220219ralbii 3175 . . . 4 (∀𝑥𝐿𝑗𝐼 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
221 ralcom 3293 . . . 4 (∀𝑥𝐿𝑗𝐼 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ∀𝑗𝐼𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
222220, 221bitr3i 268 . . 3 (∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ∀𝑗𝐼𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
223218, 222syl6bb 278 . 2 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0𝑥 = (𝐼 × {𝑌})) ↔ ∀𝑗𝐼𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
224208, 209, 2233bitr4d 302 1 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (𝐹 LIndF 𝑊 ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥𝑓 · 𝐹)) = 0𝑥 = (𝐼 × {𝑌}))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 197  wa 384  w3a 1100   = wceq 1637  wcel 2157  wnel 3088  wral 3103  wrex 3104  {crab 3107  Vcvv 3398  cdif 3773  cun 3774  cin 3775  wss 3776  c0 4123  {csn 4377  cop 4383   class class class wbr 4851  cmpt 4930   × cxp 5316  dom cdm 5318  cres 5320  cima 5321  Fun wfun 6098   Fn wfn 6099  wf 6100  cfv 6104  (class class class)co 6877  𝑓 cof 7128  𝑚 cmap 8095   finSupp cfsupp 8517  Basecbs 16071  +gcplusg 16156  Scalarcsca 16159   ·𝑠 cvsca 16160  0gc0g 16308   Σg cgsu 16309  Mndcmnd 17502  Grpcgrp 17630  invgcminusg 17631  CMndccmn 18397  LModclmod 19070  LSpanclspn 19181   freeLMod cfrlm 20304   LIndF clindf 20357
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1877  ax-4 1894  ax-5 2001  ax-6 2069  ax-7 2105  ax-8 2159  ax-9 2166  ax-10 2186  ax-11 2202  ax-12 2215  ax-13 2422  ax-ext 2791  ax-rep 4971  ax-sep 4982  ax-nul 4990  ax-pow 5042  ax-pr 5103  ax-un 7182  ax-inf2 8788  ax-cnex 10280  ax-resscn 10281  ax-1cn 10282  ax-icn 10283  ax-addcl 10284  ax-addrcl 10285  ax-mulcl 10286  ax-mulrcl 10287  ax-mulcom 10288  ax-addass 10289  ax-mulass 10290  ax-distr 10291  ax-i2m1 10292  ax-1ne0 10293  ax-1rid 10294  ax-rnegex 10295  ax-rrecex 10296  ax-cnre 10297  ax-pre-lttri 10298  ax-pre-lttrn 10299  ax-pre-ltadd 10300  ax-pre-mulgt0 10301
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 866  df-3or 1101  df-3an 1102  df-tru 1641  df-ex 1860  df-nf 1864  df-sb 2062  df-mo 2635  df-eu 2638  df-clab 2800  df-cleq 2806  df-clel 2809  df-nfc 2944  df-ne 2986  df-nel 3089  df-ral 3108  df-rex 3109  df-reu 3110  df-rmo 3111  df-rab 3112  df-v 3400  df-sbc 3641  df-csb 3736  df-dif 3779  df-un 3781  df-in 3783  df-ss 3790  df-pss 3792  df-nul 4124  df-if 4287  df-pw 4360  df-sn 4378  df-pr 4380  df-tp 4382  df-op 4384  df-uni 4638  df-int 4677  df-iun 4721  df-iin 4722  df-br 4852  df-opab 4914  df-mpt 4931  df-tr 4954  df-id 5226  df-eprel 5231  df-po 5239  df-so 5240  df-fr 5277  df-se 5278  df-we 5279  df-xp 5324  df-rel 5325  df-cnv 5326  df-co 5327  df-dm 5328  df-rn 5329  df-res 5330  df-ima 5331  df-pred 5900  df-ord 5946  df-on 5947  df-lim 5948  df-suc 5949  df-iota 6067  df-fun 6106  df-fn 6107  df-f 6108  df-f1 6109  df-fo 6110  df-f1o 6111  df-fv 6112  df-isom 6113  df-riota 6838  df-ov 6880  df-oprab 6881  df-mpt2 6882  df-of 7130  df-om 7299  df-1st 7401  df-2nd 7402  df-supp 7533  df-wrecs 7645  df-recs 7707  df-rdg 7745  df-1o 7799  df-oadd 7803  df-er 7982  df-map 8097  df-ixp 8149  df-en 8196  df-dom 8197  df-sdom 8198  df-fin 8199  df-fsupp 8518  df-sup 8590  df-oi 8657  df-card 9051  df-pnf 10364  df-mnf 10365  df-xr 10366  df-ltxr 10367  df-le 10368  df-sub 10556  df-neg 10557  df-nn 11309  df-2 11367  df-3 11368  df-4 11369  df-5 11370  df-6 11371  df-7 11372  df-8 11373  df-9 11374  df-n0 11563  df-z 11647  df-dec 11763  df-uz 11908  df-fz 12553  df-fzo 12693  df-seq 13028  df-hash 13341  df-struct 16073  df-ndx 16074  df-slot 16075  df-base 16077  df-sets 16078  df-ress 16079  df-plusg 16169  df-mulr 16170  df-sca 16172  df-vsca 16173  df-ip 16174  df-tset 16175  df-ple 16176  df-ds 16178  df-hom 16180  df-cco 16181  df-0g 16310  df-gsum 16311  df-prds 16316  df-pws 16318  df-mre 16454  df-mrc 16455  df-acs 16457  df-mgm 17450  df-sgrp 17492  df-mnd 17503  df-mhm 17543  df-submnd 17544  df-grp 17633  df-minusg 17634  df-sbg 17635  df-mulg 17749  df-subg 17796  df-ghm 17863  df-cntz 17954  df-cmn 18399  df-abl 18400  df-mgp 18695  df-ur 18707  df-ring 18754  df-subrg 18985  df-lmod 19072  df-lss 19140  df-lsp 19182  df-lmhm 19232  df-lbs 19285  df-sra 19384  df-rgmod 19385  df-nzr 19470  df-dsmm 20290  df-frlm 20305  df-uvc 20336  df-lindf 20359
This theorem is referenced by:  islindf5  20392  matunitlindflem1  33720  aacllem  43119
  Copyright terms: Public domain W3C validator