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

Theorem islindf4 21054
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 (𝑥f · 𝐹)) = 0𝑥 = (𝐼 × {𝑌}))))
Distinct variable groups:   𝑥,𝐵   𝑥,𝐹   𝑥,𝐼   𝑥,𝐿   𝑥,𝑅   𝑥, ·   𝑥,𝑊   𝑥,𝑋   𝑥,𝑌   𝑥, 0

Proof of Theorem islindf4
Dummy variables 𝑗 𝑘 𝑙 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 raldifsni 4729 . . . . 5 (∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑙 ∈ (Base‘𝑅)((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌))
2 simpll1 1211 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑊 ∈ LMod)
3 simprll 776 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑙 ∈ (Base‘𝑅))
4 ffvelrn 6968 . . . . . . . . . . . . . . . . . 18 ((𝐹:𝐼𝐵𝑗𝐼) → (𝐹𝑗) ∈ 𝐵)
543ad2antl3 1186 . . . . . . . . . . . . . . . . 17 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (𝐹𝑗) ∈ 𝐵)
65adantr 481 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝐹𝑗) ∈ 𝐵)
7 islindf4.b . . . . . . . . . . . . . . . . 17 𝐵 = (Base‘𝑊)
8 islindf4.r . . . . . . . . . . . . . . . . 17 𝑅 = (Scalar‘𝑊)
9 islindf4.t . . . . . . . . . . . . . . . . 17 · = ( ·𝑠𝑊)
10 eqid 2739 . . . . . . . . . . . . . . . . 17 (invg𝑊) = (invg𝑊)
11 eqid 2739 . . . . . . . . . . . . . . . . 17 (invg𝑅) = (invg𝑅)
12 eqid 2739 . . . . . . . . . . . . . . . . 17 (Base‘𝑅) = (Base‘𝑅)
137, 8, 9, 10, 11, 12lmodvsinv 20307 . . . . . . . . . . . . . . . 16 ((𝑊 ∈ LMod ∧ 𝑙 ∈ (Base‘𝑅) ∧ (𝐹𝑗) ∈ 𝐵) → (((invg𝑅)‘𝑙) · (𝐹𝑗)) = ((invg𝑊)‘(𝑙 · (𝐹𝑗))))
142, 3, 6, 13syl3anc 1370 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((invg𝑅)‘𝑙) · (𝐹𝑗)) = ((invg𝑊)‘(𝑙 · (𝐹𝑗))))
1514eqeq1d 2741 . . . . . . . . . . . . . 14 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ↔ ((invg𝑊)‘(𝑙 · (𝐹𝑗))) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))))
16 lmodgrp 20139 . . . . . . . . . . . . . . . 16 (𝑊 ∈ LMod → 𝑊 ∈ Grp)
172, 16syl 17 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑊 ∈ Grp)
187, 8, 9, 12lmodvscl 20149 . . . . . . . . . . . . . . . 16 ((𝑊 ∈ LMod ∧ 𝑙 ∈ (Base‘𝑅) ∧ (𝐹𝑗) ∈ 𝐵) → (𝑙 · (𝐹𝑗)) ∈ 𝐵)
192, 3, 6, 18syl3anc 1370 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑙 · (𝐹𝑗)) ∈ 𝐵)
20 islindf4.z . . . . . . . . . . . . . . . 16 0 = (0g𝑊)
21 lmodcmn 20180 . . . . . . . . . . . . . . . . 17 (𝑊 ∈ LMod → 𝑊 ∈ CMnd)
222, 21syl 17 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑊 ∈ CMnd)
23 simpll2 1212 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐼𝑋)
24 difexg 5252 . . . . . . . . . . . . . . . . 17 (𝐼𝑋 → (𝐼 ∖ {𝑗}) ∈ V)
2523, 24syl 17 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝐼 ∖ {𝑗}) ∈ V)
26 simprlr 777 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))
27 elmapi 8646 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})) → 𝑦:(𝐼 ∖ {𝑗})⟶(Base‘𝑅))
2826, 27syl 17 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑦:(𝐼 ∖ {𝑗})⟶(Base‘𝑅))
29 simpll3 1213 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐹:𝐼𝐵)
30 difss 4067 . . . . . . . . . . . . . . . . . 18 (𝐼 ∖ {𝑗}) ⊆ 𝐼
31 fssres 6649 . . . . . . . . . . . . . . . . . 18 ((𝐹:𝐼𝐵 ∧ (𝐼 ∖ {𝑗}) ⊆ 𝐼) → (𝐹 ↾ (𝐼 ∖ {𝑗})):(𝐼 ∖ {𝑗})⟶𝐵)
3229, 30, 31sylancl 586 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝐹 ↾ (𝐼 ∖ {𝑗})):(𝐼 ∖ {𝑗})⟶𝐵)
338, 12, 9, 7, 2, 28, 32, 25lcomf 20171 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))):(𝐼 ∖ {𝑗})⟶𝐵)
34 islindf4.y . . . . . . . . . . . . . . . . 17 𝑌 = (0g𝑅)
35 simprr 770 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑦 finSupp 𝑌)
368, 12, 9, 7, 2, 28, 32, 25, 20, 34, 35lcomfsupp 20172 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))) finSupp 0 )
377, 20, 22, 25, 33, 36gsumcl 19525 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ∈ 𝐵)
38 eqid 2739 . . . . . . . . . . . . . . . 16 (+g𝑊) = (+g𝑊)
397, 38, 20, 10grpinvid2 18640 . . . . . . . . . . . . . . 15 ((𝑊 ∈ Grp ∧ (𝑙 · (𝐹𝑗)) ∈ 𝐵 ∧ (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ∈ 𝐵) → (((invg𝑊)‘(𝑙 · (𝐹𝑗))) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ↔ ((𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))) = 0 ))
4017, 19, 37, 39syl3anc 1370 . . . . . . . . . . . . . 14 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((invg𝑊)‘(𝑙 · (𝐹𝑗))) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ↔ ((𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))) = 0 ))
41 simplr 766 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑗𝐼)
42 fsnunf2 7067 . . . . . . . . . . . . . . . . . . 19 ((𝑦:(𝐼 ∖ {𝑗})⟶(Base‘𝑅) ∧ 𝑗𝐼𝑙 ∈ (Base‘𝑅)) → (𝑦 ∪ {⟨𝑗, 𝑙⟩}):𝐼⟶(Base‘𝑅))
4328, 41, 3, 42syl3anc 1370 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦 ∪ {⟨𝑗, 𝑙⟩}):𝐼⟶(Base‘𝑅))
448, 12, 9, 7, 2, 43, 29, 23lcomf 20171 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹):𝐼𝐵)
45 simpr 485 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝑗𝐼)
46 simpl 483 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) → 𝑙 ∈ (Base‘𝑅))
4745, 46anim12i 613 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → (𝑗𝐼𝑙 ∈ (Base‘𝑅)))
48 elmapfun 8663 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})) → Fun 𝑦)
49 fdm 6618 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦:(𝐼 ∖ {𝑗})⟶(Base‘𝑅) → dom 𝑦 = (𝐼 ∖ {𝑗}))
50 neldifsnd 4727 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (dom 𝑦 = (𝐼 ∖ {𝑗}) → ¬ 𝑗 ∈ (𝐼 ∖ {𝑗}))
51 df-nel 3051 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 ∉ dom 𝑦 ↔ ¬ 𝑗 ∈ dom 𝑦)
52 eleq2 2828 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (dom 𝑦 = (𝐼 ∖ {𝑗}) → (𝑗 ∈ dom 𝑦𝑗 ∈ (𝐼 ∖ {𝑗})))
5352notbid 318 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (dom 𝑦 = (𝐼 ∖ {𝑗}) → (¬ 𝑗 ∈ dom 𝑦 ↔ ¬ 𝑗 ∈ (𝐼 ∖ {𝑗})))
5451, 53bitrid 282 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (dom 𝑦 = (𝐼 ∖ {𝑗}) → (𝑗 ∉ dom 𝑦 ↔ ¬ 𝑗 ∈ (𝐼 ∖ {𝑗})))
5550, 54mpbird 256 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (dom 𝑦 = (𝐼 ∖ {𝑗}) → 𝑗 ∉ dom 𝑦)
5627, 49, 553syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})) → 𝑗 ∉ dom 𝑦)
5748, 56jca 512 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})) → (Fun 𝑦𝑗 ∉ dom 𝑦))
5857adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) → (Fun 𝑦𝑗 ∉ dom 𝑦))
5958adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → (Fun 𝑦𝑗 ∉ dom 𝑦))
6047, 59jca 512 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → ((𝑗𝐼𝑙 ∈ (Base‘𝑅)) ∧ (Fun 𝑦𝑗 ∉ dom 𝑦)))
61 funsnfsupp 9161 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑗𝐼𝑙 ∈ (Base‘𝑅)) ∧ (Fun 𝑦𝑗 ∉ dom 𝑦)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌𝑦 finSupp 𝑌))
6261bicomd 222 . . . . . . . . . . . . . . . . . . . . 21 (((𝑗𝐼𝑙 ∈ (Base‘𝑅)) ∧ (Fun 𝑦𝑗 ∉ dom 𝑦)) → (𝑦 finSupp 𝑌 ↔ (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌))
6360, 62syl 17 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → (𝑦 finSupp 𝑌 ↔ (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌))
6463biimpd 228 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → (𝑦 finSupp 𝑌 → (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌))
6564impr 455 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌)
668, 12, 9, 7, 2, 43, 29, 23, 20, 34, 65lcomfsupp 20172 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) finSupp 0 )
67 disjdifr 4407 . . . . . . . . . . . . . . . . . 18 ((𝐼 ∖ {𝑗}) ∩ {𝑗}) = ∅
6867a1i 11 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝐼 ∖ {𝑗}) ∩ {𝑗}) = ∅)
69 difsnid 4744 . . . . . . . . . . . . . . . . . . 19 (𝑗𝐼 → ((𝐼 ∖ {𝑗}) ∪ {𝑗}) = 𝐼)
7069eqcomd 2745 . . . . . . . . . . . . . . . . . 18 (𝑗𝐼𝐼 = ((𝐼 ∖ {𝑗}) ∪ {𝑗}))
7141, 70syl 17 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐼 = ((𝐼 ∖ {𝑗}) ∪ {𝑗}))
727, 20, 38, 22, 23, 44, 66, 68, 71gsumsplit 19538 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = ((𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ (𝐼 ∖ {𝑗})))(+g𝑊)(𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ {𝑗}))))
73 vex 3437 . . . . . . . . . . . . . . . . . . . . 21 𝑦 ∈ V
74 snex 5355 . . . . . . . . . . . . . . . . . . . . 21 {⟨𝑗, 𝑙⟩} ∈ V
7573, 74unex 7605 . . . . . . . . . . . . . . . . . . . 20 (𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∈ V
76 simpl3 1192 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝐹:𝐼𝐵)
77 simpl2 1191 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝐼𝑋)
7876, 77fexd 7112 . . . . . . . . . . . . . . . . . . . . 21 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝐹 ∈ V)
7978adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐹 ∈ V)
80 offres 7835 . . . . . . . . . . . . . . . . . . . 20 (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∈ V ∧ 𝐹 ∈ V) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ (𝐼 ∖ {𝑗})) = (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) ∘f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))
8175, 79, 80sylancr 587 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ (𝐼 ∖ {𝑗})) = (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) ∘f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))
8228ffnd 6610 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑦 Fn (𝐼 ∖ {𝑗}))
83 neldifsn 4726 . . . . . . . . . . . . . . . . . . . . 21 ¬ 𝑗 ∈ (𝐼 ∖ {𝑗})
84 fsnunres 7069 . . . . . . . . . . . . . . . . . . . . 21 ((𝑦 Fn (𝐼 ∖ {𝑗}) ∧ ¬ 𝑗 ∈ (𝐼 ∖ {𝑗})) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) = 𝑦)
8582, 83, 84sylancl 586 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) = 𝑦)
8685oveq1d 7299 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ↾ (𝐼 ∖ {𝑗})) ∘f · (𝐹 ↾ (𝐼 ∖ {𝑗}))) = (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))
8781, 86eqtrd 2779 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ (𝐼 ∖ {𝑗})) = (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))
8887oveq2d 7300 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ (𝐼 ∖ {𝑗}))) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))))
8944ffnd 6610 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) Fn 𝐼)
90 fnressn 7039 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) Fn 𝐼𝑗𝐼) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ {𝑗}) = {⟨𝑗, (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)‘𝑗)⟩})
9189, 41, 90syl2anc 584 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ {𝑗}) = {⟨𝑗, (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)‘𝑗)⟩})
9243ffnd 6610 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑦 ∪ {⟨𝑗, 𝑙⟩}) Fn 𝐼)
9329ffnd 6610 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝐹 Fn 𝐼)
94 fnfvof 7559 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑦 ∪ {⟨𝑗, 𝑙⟩}) Fn 𝐼𝐹 Fn 𝐼) ∧ (𝐼𝑋𝑗𝐼)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)‘𝑗) = (((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) · (𝐹𝑗)))
9592, 93, 23, 41, 94syl22anc 836 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)‘𝑗) = (((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) · (𝐹𝑗)))
96 fndm 6545 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑦 Fn (𝐼 ∖ {𝑗}) → dom 𝑦 = (𝐼 ∖ {𝑗}))
9796eleq2d 2825 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 Fn (𝐼 ∖ {𝑗}) → (𝑗 ∈ dom 𝑦𝑗 ∈ (𝐼 ∖ {𝑗})))
9883, 97mtbiri 327 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 Fn (𝐼 ∖ {𝑗}) → ¬ 𝑗 ∈ dom 𝑦)
99 vex 3437 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑗 ∈ V
100 vex 3437 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑙 ∈ V
101 fsnunfv 7068 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ V ∧ 𝑙 ∈ V ∧ ¬ 𝑗 ∈ dom 𝑦) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑙)
10299, 100, 101mp3an12 1450 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑗 ∈ dom 𝑦 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑙)
10382, 98, 1023syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑙)
104103oveq1d 7299 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) · (𝐹𝑗)) = (𝑙 · (𝐹𝑗)))
10595, 104eqtrd 2779 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)‘𝑗) = (𝑙 · (𝐹𝑗)))
106105opeq2d 4812 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ⟨𝑗, (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)‘𝑗)⟩ = ⟨𝑗, (𝑙 · (𝐹𝑗))⟩)
107106sneqd 4574 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → {⟨𝑗, (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)‘𝑗)⟩} = {⟨𝑗, (𝑙 · (𝐹𝑗))⟩})
108 ovex 7317 . . . . . . . . . . . . . . . . . . . . . 22 (𝑙 · (𝐹𝑗)) ∈ V
109 fmptsn 7048 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑗 ∈ V ∧ (𝑙 · (𝐹𝑗)) ∈ V) → {⟨𝑗, (𝑙 · (𝐹𝑗))⟩} = (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗))))
11099, 108, 109mp2an 689 . . . . . . . . . . . . . . . . . . . . 21 {⟨𝑗, (𝑙 · (𝐹𝑗))⟩} = (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗)))
111110a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → {⟨𝑗, (𝑙 · (𝐹𝑗))⟩} = (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗))))
11291, 107, 1113eqtrd 2783 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ {𝑗}) = (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗))))
113112oveq2d 7300 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ {𝑗})) = (𝑊 Σg (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗)))))
114 cmnmnd 19411 . . . . . . . . . . . . . . . . . . . 20 (𝑊 ∈ CMnd → 𝑊 ∈ Mnd)
1152, 21, 1143syl 18 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑊 ∈ Mnd)
11699a1i 11 . . . . . . . . . . . . . . . . . . 19 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑗 ∈ V)
117 eqidd 2740 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑗 → (𝑙 · (𝐹𝑗)) = (𝑙 · (𝐹𝑗)))
1187, 117gsumsn 19564 . . . . . . . . . . . . . . . . . . 19 ((𝑊 ∈ Mnd ∧ 𝑗 ∈ V ∧ (𝑙 · (𝐹𝑗)) ∈ 𝐵) → (𝑊 Σg (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗)))) = (𝑙 · (𝐹𝑗)))
119115, 116, 19, 118syl3anc 1370 . . . . . . . . . . . . . . . . . 18 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (𝑥 ∈ {𝑗} ↦ (𝑙 · (𝐹𝑗)))) = (𝑙 · (𝐹𝑗)))
120113, 119eqtrd 2779 . . . . . . . . . . . . . . . . 17 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ {𝑗})) = (𝑙 · (𝐹𝑗)))
12188, 120oveq12d 7302 . . . . . . . . . . . . . . . 16 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ (𝐼 ∖ {𝑗})))(+g𝑊)(𝑊 Σg (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹) ↾ {𝑗}))) = ((𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))))
12272, 121eqtr2d 2780 . . . . . . . . . . . . . . 15 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))) = (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)))
123122eqeq1d 2741 . . . . . . . . . . . . . 14 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))(+g𝑊)(𝑙 · (𝐹𝑗))) = 0 ↔ (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 ))
12415, 40, 1233bitrd 305 . . . . . . . . . . . . 13 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) ↔ (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 ))
125103eqcomd 2745 . . . . . . . . . . . . . 14 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → 𝑙 = ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗))
126125eqeq1d 2741 . . . . . . . . . . . . 13 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (𝑙 = 𝑌 ↔ ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))
127124, 126imbi12d 345 . . . . . . . . . . . 12 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ ((𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))) ∧ 𝑦 finSupp 𝑌)) → (((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌) ↔ ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌)))
128127anassrs 468 . . . . . . . . . . 11 (((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) ∧ 𝑦 finSupp 𝑌) → (((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌) ↔ ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌)))
129128pm5.74da 801 . . . . . . . . . 10 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → ((𝑦 finSupp 𝑌 → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌)) ↔ (𝑦 finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
130 impexp 451 . . . . . . . . . . 11 (((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ (𝑦 finSupp 𝑌 → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌)))
131130a1i 11 . . . . . . . . . 10 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → (((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ (𝑦 finSupp 𝑌 → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))) → 𝑙 = 𝑌))))
13263bicomd 222 . . . . . . . . . . 11 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌𝑦 finSupp 𝑌))
133132imbi1d 342 . . . . . . . . . 10 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → (((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌)) ↔ (𝑦 finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
134129, 131, 1333bitr4d 311 . . . . . . . . 9 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ (𝑙 ∈ (Base‘𝑅) ∧ 𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗})))) → (((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
1351342ralbidva 3129 . . . . . . . 8 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ ∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
136 breq1 5078 . . . . . . . . . . 11 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (𝑥 finSupp 𝑌 ↔ (𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌))
137 oveq1 7291 . . . . . . . . . . . . . 14 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (𝑥f · 𝐹) = ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹))
138137oveq2d 7300 . . . . . . . . . . . . 13 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (𝑊 Σg (𝑥f · 𝐹)) = (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)))
139138eqeq1d 2741 . . . . . . . . . . . 12 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → ((𝑊 Σg (𝑥f · 𝐹)) = 0 ↔ (𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 ))
140 fveq1 6782 . . . . . . . . . . . . 13 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (𝑥𝑗) = ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗))
141140eqeq1d 2741 . . . . . . . . . . . 12 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → ((𝑥𝑗) = 𝑌 ↔ ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))
142139, 141imbi12d 345 . . . . . . . . . . 11 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → (((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌) ↔ ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌)))
143136, 142imbi12d 345 . . . . . . . . . 10 (𝑥 = (𝑦 ∪ {⟨𝑗, 𝑙⟩}) → ((𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)) ↔ ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
144143ralxpmap 8693 . . . . . . . . 9 (𝑗𝐼 → (∀𝑥 ∈ ((Base‘𝑅) ↑m 𝐼)(𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)) ↔ ∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
145144adantl 482 . . . . . . . 8 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑥 ∈ ((Base‘𝑅) ↑m 𝐼)(𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)) ↔ ∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))((𝑦 ∪ {⟨𝑗, 𝑙⟩}) finSupp 𝑌 → ((𝑊 Σg ((𝑦 ∪ {⟨𝑗, 𝑙⟩}) ∘f · 𝐹)) = 0 → ((𝑦 ∪ {⟨𝑗, 𝑙⟩})‘𝑗) = 𝑌))))
146135, 145bitr4d 281 . . . . . . 7 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ ∀𝑥 ∈ ((Base‘𝑅) ↑m 𝐼)(𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌))))
147 breq1 5078 . . . . . . . 8 (𝑧 = 𝑥 → (𝑧 finSupp 𝑌𝑥 finSupp 𝑌))
148147ralrab 3631 . . . . . . 7 (∀𝑥 ∈ {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌} ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌) ↔ ∀𝑥 ∈ ((Base‘𝑅) ↑m 𝐼)(𝑥 finSupp 𝑌 → ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
149146, 148bitr4di 289 . . . . . 6 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ ∀𝑥 ∈ {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌} ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
150 resima 5928 . . . . . . . . . . . . 13 ((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗})) = (𝐹 “ (𝐼 ∖ {𝑗}))
151150eqcomi 2748 . . . . . . . . . . . 12 (𝐹 “ (𝐼 ∖ {𝑗})) = ((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗}))
152151fveq2i 6786 . . . . . . . . . . 11 ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) = ((LSpan‘𝑊)‘((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗})))
153152eleq2i 2831 . . . . . . . . . 10 ((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗}))))
154 eqid 2739 . . . . . . . . . . 11 (LSpan‘𝑊) = (LSpan‘𝑊)
15576, 30, 31sylancl 586 . . . . . . . . . . 11 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (𝐹 ↾ (𝐼 ∖ {𝑗})):(𝐼 ∖ {𝑗})⟶𝐵)
156 simpl1 1190 . . . . . . . . . . 11 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝑊 ∈ LMod)
157243ad2ant2 1133 . . . . . . . . . . . 12 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (𝐼 ∖ {𝑗}) ∈ V)
158157adantr 481 . . . . . . . . . . 11 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (𝐼 ∖ {𝑗}) ∈ V)
159154, 7, 12, 8, 34, 9, 155, 156, 158ellspd 21018 . . . . . . . . . 10 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘((𝐹 ↾ (𝐼 ∖ {𝑗})) “ (𝐼 ∖ {𝑗}))) ↔ ∃𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))(𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))))))
160153, 159bitrid 282 . . . . . . . . 9 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → ((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∃𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))(𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗})))))))
161160imbi1d 342 . . . . . . . 8 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌) ↔ (∃𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))(𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌)))
162 r19.23v 3209 . . . . . . . 8 (∀𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌) ↔ (∃𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))(𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌))
163161, 162bitr4di 289 . . . . . . 7 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌) ↔ ∀𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌)))
164163ralbidv 3113 . . . . . 6 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌) ↔ ∀𝑙 ∈ (Base‘𝑅)∀𝑦 ∈ ((Base‘𝑅) ↑m (𝐼 ∖ {𝑗}))((𝑦 finSupp 𝑌 ∧ (((invg𝑅)‘𝑙) · (𝐹𝑗)) = (𝑊 Σg (𝑦f · (𝐹 ↾ (𝐼 ∖ {𝑗}))))) → 𝑙 = 𝑌)))
165 islindf4.l . . . . . . . 8 𝐿 = (Base‘(𝑅 freeLMod 𝐼))
1668fvexi 6797 . . . . . . . . . . 11 𝑅 ∈ V
167 eqid 2739 . . . . . . . . . . . 12 (𝑅 freeLMod 𝐼) = (𝑅 freeLMod 𝐼)
168 eqid 2739 . . . . . . . . . . . 12 {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌} = {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌}
169167, 12, 34, 168frlmbas 20971 . . . . . . . . . . 11 ((𝑅 ∈ V ∧ 𝐼𝑋) → {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌} = (Base‘(𝑅 freeLMod 𝐼)))
170166, 169mpan 687 . . . . . . . . . 10 (𝐼𝑋 → {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌} = (Base‘(𝑅 freeLMod 𝐼)))
1711703ad2ant2 1133 . . . . . . . . 9 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌} = (Base‘(𝑅 freeLMod 𝐼)))
172171adantr 481 . . . . . . . 8 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌} = (Base‘(𝑅 freeLMod 𝐼)))
173165, 172eqtr4id 2798 . . . . . . 7 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → 𝐿 = {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌})
174173raleqdv 3349 . . . . . 6 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌) ↔ ∀𝑥 ∈ {𝑧 ∈ ((Base‘𝑅) ↑m 𝐼) ∣ 𝑧 finSupp 𝑌} ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
175149, 164, 1743bitr4d 311 . . . . 5 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ (Base‘𝑅)((((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) → 𝑙 = 𝑌) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
1761, 175bitrid 282 . . . 4 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
1778lmodfgrp 20141 . . . . . . . 8 (𝑊 ∈ LMod → 𝑅 ∈ Grp)
17812, 34, 11grpinvnzcl 18656 . . . . . . . 8 ((𝑅 ∈ Grp ∧ 𝑙 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘𝑙) ∈ ((Base‘𝑅) ∖ {𝑌}))
179177, 178sylan 580 . . . . . . 7 ((𝑊 ∈ LMod ∧ 𝑙 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘𝑙) ∈ ((Base‘𝑅) ∖ {𝑌}))
18012, 34, 11grpinvnzcl 18656 . . . . . . . . 9 ((𝑅 ∈ Grp ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘𝑘) ∈ ((Base‘𝑅) ∖ {𝑌}))
181177, 180sylan 580 . . . . . . . 8 ((𝑊 ∈ LMod ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘𝑘) ∈ ((Base‘𝑅) ∖ {𝑌}))
182 eldifi 4062 . . . . . . . . . 10 (𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) → 𝑘 ∈ (Base‘𝑅))
18312, 11grpinvinv 18651 . . . . . . . . . 10 ((𝑅 ∈ Grp ∧ 𝑘 ∈ (Base‘𝑅)) → ((invg𝑅)‘((invg𝑅)‘𝑘)) = 𝑘)
184177, 182, 183syl2an 596 . . . . . . . . 9 ((𝑊 ∈ LMod ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → ((invg𝑅)‘((invg𝑅)‘𝑘)) = 𝑘)
185184eqcomd 2745 . . . . . . . 8 ((𝑊 ∈ LMod ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → 𝑘 = ((invg𝑅)‘((invg𝑅)‘𝑘)))
186 fveq2 6783 . . . . . . . . 9 (𝑙 = ((invg𝑅)‘𝑘) → ((invg𝑅)‘𝑙) = ((invg𝑅)‘((invg𝑅)‘𝑘)))
187186rspceeqv 3576 . . . . . . . 8 ((((invg𝑅)‘𝑘) ∈ ((Base‘𝑅) ∖ {𝑌}) ∧ 𝑘 = ((invg𝑅)‘((invg𝑅)‘𝑘))) → ∃𝑙 ∈ ((Base‘𝑅) ∖ {𝑌})𝑘 = ((invg𝑅)‘𝑙))
188181, 185, 187syl2anc 584 . . . . . . 7 ((𝑊 ∈ LMod ∧ 𝑘 ∈ ((Base‘𝑅) ∖ {𝑌})) → ∃𝑙 ∈ ((Base‘𝑅) ∖ {𝑌})𝑘 = ((invg𝑅)‘𝑙))
189 oveq1 7291 . . . . . . . . . 10 (𝑘 = ((invg𝑅)‘𝑙) → (𝑘 · (𝐹𝑗)) = (((invg𝑅)‘𝑙) · (𝐹𝑗)))
190189eleq1d 2824 . . . . . . . . 9 (𝑘 = ((invg𝑅)‘𝑙) → ((𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
191190notbid 318 . . . . . . . 8 (𝑘 = ((invg𝑅)‘𝑙) → (¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
192191adantl 482 . . . . . . 7 ((𝑊 ∈ LMod ∧ 𝑘 = ((invg𝑅)‘𝑙)) → (¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
193179, 188, 192ralxfrd 5332 . . . . . 6 (𝑊 ∈ LMod → (∀𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
1941933ad2ant1 1132 . . . . 5 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (∀𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
195194adantr 481 . . . 4 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑙 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (((invg𝑅)‘𝑙) · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
196 simplr 766 . . . . . . . 8 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ 𝑥𝐿) → 𝑗𝐼)
19734fvexi 6797 . . . . . . . . 9 𝑌 ∈ V
198197fvconst2 7088 . . . . . . . 8 (𝑗𝐼 → ((𝐼 × {𝑌})‘𝑗) = 𝑌)
199196, 198syl 17 . . . . . . 7 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ 𝑥𝐿) → ((𝐼 × {𝑌})‘𝑗) = 𝑌)
200199eqeq2d 2750 . . . . . 6 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ 𝑥𝐿) → ((𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗) ↔ (𝑥𝑗) = 𝑌))
201200imbi2d 341 . . . . 5 ((((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) ∧ 𝑥𝐿) → (((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
202201ralbidva 3112 . . . 4 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = 𝑌)))
203176, 195, 2023bitr4d 311 . . 3 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑗𝐼) → (∀𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
204203ralbidva 3112 . 2 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (∀𝑗𝐼𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗}))) ↔ ∀𝑗𝐼𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
2057, 9, 154, 8, 12, 34islindf2 21030 . 2 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (𝐹 LIndF 𝑊 ↔ ∀𝑗𝐼𝑘 ∈ ((Base‘𝑅) ∖ {𝑌}) ¬ (𝑘 · (𝐹𝑗)) ∈ ((LSpan‘𝑊)‘(𝐹 “ (𝐼 ∖ {𝑗})))))
206167, 12, 165frlmbasf 20976 . . . . . . . 8 ((𝐼𝑋𝑥𝐿) → 𝑥:𝐼⟶(Base‘𝑅))
2072063ad2antl2 1185 . . . . . . 7 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑥𝐿) → 𝑥:𝐼⟶(Base‘𝑅))
208207ffnd 6610 . . . . . 6 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑥𝐿) → 𝑥 Fn 𝐼)
209 fnconstg 6671 . . . . . . 7 (𝑌 ∈ V → (𝐼 × {𝑌}) Fn 𝐼)
210197, 209ax-mp 5 . . . . . 6 (𝐼 × {𝑌}) Fn 𝐼
211 eqfnfv 6918 . . . . . 6 ((𝑥 Fn 𝐼 ∧ (𝐼 × {𝑌}) Fn 𝐼) → (𝑥 = (𝐼 × {𝑌}) ↔ ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
212208, 210, 211sylancl 586 . . . . 5 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑥𝐿) → (𝑥 = (𝐼 × {𝑌}) ↔ ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
213212imbi2d 341 . . . 4 (((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) ∧ 𝑥𝐿) → (((𝑊 Σg (𝑥f · 𝐹)) = 0𝑥 = (𝐼 × {𝑌})) ↔ ((𝑊 Σg (𝑥f · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
214213ralbidva 3112 . . 3 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0𝑥 = (𝐼 × {𝑌})) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
215 r19.21v 3114 . . . . 5 (∀𝑗𝐼 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ((𝑊 Σg (𝑥f · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
216215ralbii 3093 . . . 4 (∀𝑥𝐿𝑗𝐼 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
217 ralcom 3167 . . . 4 (∀𝑥𝐿𝑗𝐼 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ∀𝑗𝐼𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
218216, 217bitr3i 276 . . 3 (∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → ∀𝑗𝐼 (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)) ↔ ∀𝑗𝐼𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗)))
219214, 218bitrdi 287 . 2 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0𝑥 = (𝐼 × {𝑌})) ↔ ∀𝑗𝐼𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0 → (𝑥𝑗) = ((𝐼 × {𝑌})‘𝑗))))
220204, 205, 2193bitr4d 311 1 ((𝑊 ∈ LMod ∧ 𝐼𝑋𝐹:𝐼𝐵) → (𝐹 LIndF 𝑊 ↔ ∀𝑥𝐿 ((𝑊 Σg (𝑥f · 𝐹)) = 0𝑥 = (𝐼 × {𝑌}))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396  w3a 1086   = wceq 1539  wcel 2107  wnel 3050  wral 3065  wrex 3066  {crab 3069  Vcvv 3433  cdif 3885  cun 3886  cin 3887  wss 3888  c0 4257  {csn 4562  cop 4568   class class class wbr 5075  cmpt 5158   × cxp 5588  dom cdm 5590  cres 5592  cima 5593  Fun wfun 6431   Fn wfn 6432  wf 6433  cfv 6437  (class class class)co 7284  f cof 7540  m cmap 8624   finSupp cfsupp 9137  Basecbs 16921  +gcplusg 16971  Scalarcsca 16974   ·𝑠 cvsca 16975  0gc0g 17159   Σg cgsu 17160  Mndcmnd 18394  Grpcgrp 18586  invgcminusg 18587  CMndccmn 19395  LModclmod 20132  LSpanclspn 20242   freeLMod cfrlm 20962   LIndF clindf 21020
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2710  ax-rep 5210  ax-sep 5224  ax-nul 5231  ax-pow 5289  ax-pr 5353  ax-un 7597  ax-cnex 10936  ax-resscn 10937  ax-1cn 10938  ax-icn 10939  ax-addcl 10940  ax-addrcl 10941  ax-mulcl 10942  ax-mulrcl 10943  ax-mulcom 10944  ax-addass 10945  ax-mulass 10946  ax-distr 10947  ax-i2m1 10948  ax-1ne0 10949  ax-1rid 10950  ax-rnegex 10951  ax-rrecex 10952  ax-cnre 10953  ax-pre-lttri 10954  ax-pre-lttrn 10955  ax-pre-ltadd 10956  ax-pre-mulgt0 10957
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2541  df-eu 2570  df-clab 2717  df-cleq 2731  df-clel 2817  df-nfc 2890  df-ne 2945  df-nel 3051  df-ral 3070  df-rex 3071  df-rmo 3072  df-reu 3073  df-rab 3074  df-v 3435  df-sbc 3718  df-csb 3834  df-dif 3891  df-un 3893  df-in 3895  df-ss 3905  df-pss 3907  df-nul 4258  df-if 4461  df-pw 4536  df-sn 4563  df-pr 4565  df-tp 4567  df-op 4569  df-uni 4841  df-int 4881  df-iun 4927  df-iin 4928  df-br 5076  df-opab 5138  df-mpt 5159  df-tr 5193  df-id 5490  df-eprel 5496  df-po 5504  df-so 5505  df-fr 5545  df-se 5546  df-we 5547  df-xp 5596  df-rel 5597  df-cnv 5598  df-co 5599  df-dm 5600  df-rn 5601  df-res 5602  df-ima 5603  df-pred 6206  df-ord 6273  df-on 6274  df-lim 6275  df-suc 6276  df-iota 6395  df-fun 6439  df-fn 6440  df-f 6441  df-f1 6442  df-fo 6443  df-f1o 6444  df-fv 6445  df-isom 6446  df-riota 7241  df-ov 7287  df-oprab 7288  df-mpo 7289  df-of 7542  df-om 7722  df-1st 7840  df-2nd 7841  df-supp 7987  df-frecs 8106  df-wrecs 8137  df-recs 8211  df-rdg 8250  df-1o 8306  df-er 8507  df-map 8626  df-ixp 8695  df-en 8743  df-dom 8744  df-sdom 8745  df-fin 8746  df-fsupp 9138  df-sup 9210  df-oi 9278  df-card 9706  df-pnf 11020  df-mnf 11021  df-xr 11022  df-ltxr 11023  df-le 11024  df-sub 11216  df-neg 11217  df-nn 11983  df-2 12045  df-3 12046  df-4 12047  df-5 12048  df-6 12049  df-7 12050  df-8 12051  df-9 12052  df-n0 12243  df-z 12329  df-dec 12447  df-uz 12592  df-fz 13249  df-fzo 13392  df-seq 13731  df-hash 14054  df-struct 16857  df-sets 16874  df-slot 16892  df-ndx 16904  df-base 16922  df-ress 16951  df-plusg 16984  df-mulr 16985  df-sca 16987  df-vsca 16988  df-ip 16989  df-tset 16990  df-ple 16991  df-ds 16993  df-hom 16995  df-cco 16996  df-0g 17161  df-gsum 17162  df-prds 17167  df-pws 17169  df-mre 17304  df-mrc 17305  df-acs 17307  df-mgm 18335  df-sgrp 18384  df-mnd 18395  df-mhm 18439  df-submnd 18440  df-grp 18589  df-minusg 18590  df-sbg 18591  df-mulg 18710  df-subg 18761  df-ghm 18841  df-cntz 18932  df-cmn 19397  df-abl 19398  df-mgp 19730  df-ur 19747  df-ring 19794  df-subrg 20031  df-lmod 20134  df-lss 20203  df-lsp 20243  df-lmhm 20293  df-lbs 20346  df-sra 20443  df-rgmod 20444  df-nzr 20538  df-dsmm 20948  df-frlm 20963  df-uvc 20999  df-lindf 21022
This theorem is referenced by:  islindf5  21055  islinds5  31572  fedgmul  31721  matunitlindflem1  35782  aacllem  46516
  Copyright terms: Public domain W3C validator