Metamath Proof Explorer


Theorem elrspunidl

Description: Elementhood in the span of a union of ideals. (Contributed by Thierry Arnoux, 30-Jun-2024) Remove dependency on ax-reg and ax-inf2 . (Revised by Timothy J. O'Malley, 15-Oct-2026)

Ref Expression
Hypotheses elrspunidl.n ⊢ N = RSpan ⁡ R
elrspunidl.b ⊢ B = Base R
elrspunidl.1 ⊢ 0 ˙ = 0 R
elrspunidl.x ⊢ · ˙ = ⋅ R
elrspunidl.r ⊢ φ → R ∈ Ring
elrspunidl.i ⊢ φ → S ⊆ LIdeal ⁡ R
Assertion elrspunidl ⊢ φ → X ∈ N ⁡ ⋃ S ↔ ∃ a ∈ B S finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k

Proof

Step Hyp Ref Expression
1 elrspunidl.n ⊢ N = RSpan ⁡ R
2 elrspunidl.b ⊢ B = Base R
3 elrspunidl.1 ⊢ 0 ˙ = 0 R
4 elrspunidl.x ⊢ · ˙ = ⋅ R
5 elrspunidl.r ⊢ φ → R ∈ Ring
6 elrspunidl.i ⊢ φ → S ⊆ LIdeal ⁡ R
7 6 sselda ⊢ φ ∧ i ∈ S → i ∈ LIdeal ⁡ R
8 eqid ⊢ LIdeal ⁡ R = LIdeal ⁡ R
9 2 8 lidlss ⊢ i ∈ LIdeal ⁡ R → i ⊆ B
10 7 9 syl ⊢ φ ∧ i ∈ S → i ⊆ B
11 10 ralrimiva ⊢ φ → ∀ i ∈ S i ⊆ B
12 unissb ⊢ ⋃ S ⊆ B ↔ ∀ i ∈ S i ⊆ B
13 11 12 sylibr ⊢ φ → ⋃ S ⊆ B
14 1 2 3 4 5 13 elrsp ⊢ φ → X ∈ N ⁡ ⋃ S ↔ ∃ b ∈ B ⋃ S finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j
15 fvexd ⊢ φ → LIdeal ⁡ R ∈ V
16 15 6 ssexd ⊢ φ → S ∈ V
17 16 uniexd ⊢ φ → ⋃ S ∈ V
18 eluni2 ⊢ j ∈ ⋃ S ↔ ∃ i ∈ S j ∈ i
19 18 bilani ⊢ φ ∧ j ∈ ⋃ S → ∃ i ∈ S j ∈ i
20 19 ralrimiva ⊢ φ → ∀ j ∈ ⋃ S ∃ i ∈ S j ∈ i
21 eleq2 ⊢ i = f ⁡ j → j ∈ i ↔ j ∈ f ⁡ j
22 21 ac6 ⊢ ⋃ S ∈ V ∧ S ∈ V ∧ ∀ j ∈ ⋃ S ∃ i ∈ S j ∈ i → ∃ f f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j
23 17 16 20 22 syl3anc ⊢ φ → ∃ f f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j
24 23 ad3antrrr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j → ∃ f f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j
25 breq1 ⊢ a = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j → finSupp 0 ˙⁡ a ↔ finSupp 0 ˙⁡ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j
26 oveq2 ⊢ a = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j → ∑ R a = ∑ R i ∈ S ∑ R j ∈ f -1 i b ⁡ j · ˙ j
27 26 eqeq2d ⊢ a = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j → X = ∑ R a ↔ X = ∑ R i ∈ S ∑ R j ∈ f -1 i b ⁡ j · ˙ j
28 fveq1 ⊢ a = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j → a ⁡ k = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ⁡ k
29 28 eleq1d ⊢ a = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j → a ⁡ k ∈ k ↔ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ⁡ k ∈ k
30 29 ralbidv ⊢ a = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j → ∀ k ∈ S a ⁡ k ∈ k ↔ ∀ k ∈ S i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ⁡ k ∈ k
31 25 27 30 3anbi123d ⊢ a = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j → finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ↔ finSupp 0 ˙⁡ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ∧ X = ∑ R i ∈ S ∑ R j ∈ f -1 i b ⁡ j · ˙ j ∧ ∀ k ∈ S i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ⁡ k ∈ k
32 simp-5l ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → φ
33 32 adantr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → φ
34 ringcmn ⊢ R ∈ Ring → R ∈ CMnd
35 33 5 34 3syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → R ∈ CMnd
36 vex ⊢ f ∈ V
37 36 cnvex ⊢ f -1 ∈ V
38 37 imaex ⊢ f -1 i ∈ V
39 38 a1i ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → f -1 i ∈ V
40 5 ad7antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ l ∈ f -1 i → R ∈ Ring
41 elmapi ⊢ b ∈ B ⋃ S → b : ⋃ S ⟶ B
42 41 ad7antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ l ∈ f -1 i → b : ⋃ S ⟶ B
43 cnvimass ⊢ f -1 i ⊆ dom ⁡ f
44 fdm ⊢ f : ⋃ S ⟶ S → dom ⁡ f = ⋃ S
45 43 44 sseqtrid ⊢ f : ⋃ S ⟶ S → f -1 i ⊆ ⋃ S
46 45 ad3antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → f -1 i ⊆ ⋃ S
47 46 sselda ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ l ∈ f -1 i → l ∈ ⋃ S
48 42 47 ffvelcdmd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ l ∈ f -1 i → b ⁡ l ∈ B
49 13 ad7antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ l ∈ f -1 i → ⋃ S ⊆ B
50 49 47 sseldd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ l ∈ f -1 i → l ∈ B
51 2 4 40 48 50 ringcld ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ l ∈ f -1 i → b ⁡ l · ˙ l ∈ B
52 fveq2 ⊢ j = l → b ⁡ j = b ⁡ l
53 id ⊢ j = l → j = l
54 52 53 oveq12d ⊢ j = l → b ⁡ j · ˙ j = b ⁡ l · ˙ l
55 54 cbvmptv ⊢ j ∈ f -1 i ⟼ b ⁡ j · ˙ j = l ∈ f -1 i ⟼ b ⁡ l · ˙ l
56 51 55 fmptd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → j ∈ f -1 i ⟼ b ⁡ j · ˙ j : f -1 i ⟶ B
57 39 mptexd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → j ∈ f -1 i ⟼ b ⁡ j · ˙ j ∈ V
58 56 ffund ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → Fun ⁡ j ∈ f -1 i ⟼ b ⁡ j · ˙ j
59 simp-5r ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → finSupp 0 ˙⁡ b
60 nfv ⊢ Ⅎ j φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b
61 nfcv ⊢ Ⅎ _ j R
62 nfcv ⊢ Ⅎ _ j Σ𝑔
63 nfmpt1 ⊢ Ⅎ _ j j ∈ ⋃ S ⟼ b ⁡ j · ˙ j
64 61 62 63 nfov ⊢ Ⅎ _ j ∑ R j ∈ ⋃ S b ⁡ j · ˙ j
65 64 nfeq2 ⊢ Ⅎ j X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j
66 60 65 nfan ⊢ Ⅎ j φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j
67 nfv ⊢ Ⅎ j f : ⋃ S ⟶ S
68 66 67 nfan ⊢ Ⅎ j φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S
69 nfra1 ⊢ Ⅎ j ∀ j ∈ ⋃ S j ∈ f ⁡ j
70 68 69 nfan ⊢ Ⅎ j φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j
71 nfv ⊢ Ⅎ j i ∈ S
72 70 71 nfan ⊢ Ⅎ j φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S
73 nfcv ⊢ Ⅎ _ j f -1 i
74 nfcv ⊢ Ⅎ _ j supp 0 ˙⁡ b
75 41 ad7antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → b : ⋃ S ⟶ B
76 75 ffnd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → b Fn ⋃ S
77 32 17 syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → ⋃ S ∈ V
78 77 ad2antrr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → ⋃ S ∈ V
79 3 fvexi ⊢ 0 ˙ ∈ V
80 79 a1i ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → 0 ˙ ∈ V
81 46 ssdifd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → f -1 i ∖ supp 0 ˙⁡ b ⊆ ⋃ S ∖ supp 0 ˙⁡ b
82 81 sselda ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → j ∈ ⋃ S ∖ supp 0 ˙⁡ b
83 76 78 80 82 fvdifsupp ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → b ⁡ j = 0 ˙
84 83 oveq1d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → b ⁡ j · ˙ j = 0 ˙ · ˙ j
85 5 ad7antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → R ∈ Ring
86 13 ad7antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → ⋃ S ⊆ B
87 82 eldifad ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → j ∈ ⋃ S
88 86 87 sseldd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → j ∈ B
89 2 4 3 ringlz ⊢ R ∈ Ring ∧ j ∈ B → 0 ˙ · ˙ j = 0 ˙
90 85 88 89 syl2anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → 0 ˙ · ˙ j = 0 ˙
91 84 90 eqtrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∧ j ∈ f -1 i ∖ supp 0 ˙⁡ b → b ⁡ j · ˙ j = 0 ˙
92 72 73 74 91 39 suppss2f ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → j ∈ f -1 i ⟼ b ⁡ j · ˙ j supp 0 ˙ ⊆ b supp 0 ˙
93 fsuppsssupp ⊢ j ∈ f -1 i ⟼ b ⁡ j · ˙ j ∈ V ∧ Fun ⁡ j ∈ f -1 i ⟼ b ⁡ j · ˙ j ∧ finSupp 0 ˙⁡ b ∧ j ∈ f -1 i ⟼ b ⁡ j · ˙ j supp 0 ˙ ⊆ b supp 0 ˙ → finSupp 0 ˙⁡ j ∈ f -1 i ⟼ b ⁡ j · ˙ j
94 57 58 59 92 93 syl22anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → finSupp 0 ˙⁡ j ∈ f -1 i ⟼ b ⁡ j · ˙ j
95 2 3 35 39 56 94 gsumcl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → ∑ R j ∈ f -1 i b ⁡ j · ˙ j ∈ B
96 95 fmpttd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j : S ⟶ B
97 2 fvexi ⊢ B ∈ V
98 97 a1i ⊢ φ → B ∈ V
99 98 16 elmapd ⊢ φ → i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ∈ B S ↔ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j : S ⟶ B
100 99 biimpar ⊢ φ ∧ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j : S ⟶ B → i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ∈ B S
101 32 96 100 syl2anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ∈ B S
102 32 16 syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → S ∈ V
103 102 mptexd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ∈ V
104 79 a1i ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → 0 ˙ ∈ V
105 funmpt ⊢ Fun ⁡ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j
106 105 a1i ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → Fun ⁡ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j
107 simplr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → f : ⋃ S ⟶ S
108 107 ffund ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → Fun ⁡ f
109 simp-4r ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → finSupp 0 ˙⁡ b
110 109 fsuppimpd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → b supp 0 ˙ ∈ Fin
111 imafi ⊢ Fun ⁡ f ∧ b supp 0 ˙ ∈ Fin → f b supp 0 ˙ ∈ Fin
112 108 110 111 syl2anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → f b supp 0 ˙ ∈ Fin
113 nfv ⊢ Ⅎ j i ∈ S ∖ f b supp 0 ˙
114 70 113 nfan ⊢ Ⅎ j φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙
115 simpllr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f : ⋃ S ⟶ S
116 115 ffund ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → Fun ⁡ f
117 snssi ⊢ i ∈ S ∖ f b supp 0 ˙ → i ⊆ S ∖ f b supp 0 ˙
118 117 adantl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → i ⊆ S ∖ f b supp 0 ˙
119 sspreima ⊢ Fun ⁡ f ∧ i ⊆ S ∖ f b supp 0 ˙ → f -1 i ⊆ f -1 S ∖ f b supp 0 ˙
120 116 118 119 syl2anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f -1 i ⊆ f -1 S ∖ f b supp 0 ˙
121 difpreima ⊢ Fun ⁡ f → f -1 S ∖ f b supp 0 ˙ = f -1 S ∖ f -1 f b supp 0 ˙
122 116 121 syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f -1 S ∖ f b supp 0 ˙ = f -1 S ∖ f -1 f b supp 0 ˙
123 120 122 sseqtrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f -1 i ⊆ f -1 S ∖ f -1 f b supp 0 ˙
124 suppssdm ⊢ b supp 0 ˙ ⊆ dom ⁡ b
125 41 ad6antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → b : ⋃ S ⟶ B
126 124 125 fssdm ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → b supp 0 ˙ ⊆ ⋃ S
127 115 fdmd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → dom ⁡ f = ⋃ S
128 126 127 sseqtrrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → b supp 0 ˙ ⊆ dom ⁡ f
129 sseqin2 ⊢ b supp 0 ˙ ⊆ dom ⁡ f ↔ dom ⁡ f ∩ supp 0 ˙⁡ b = b supp 0 ˙
130 129 biimpi ⊢ b supp 0 ˙ ⊆ dom ⁡ f → dom ⁡ f ∩ supp 0 ˙⁡ b = b supp 0 ˙
131 dminss ⊢ dom ⁡ f ∩ supp 0 ˙⁡ b ⊆ f -1 f b supp 0 ˙
132 130 131 eqsstrrdi ⊢ b supp 0 ˙ ⊆ dom ⁡ f → b supp 0 ˙ ⊆ f -1 f b supp 0 ˙
133 128 132 syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → b supp 0 ˙ ⊆ f -1 f b supp 0 ˙
134 133 sscond ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f -1 S ∖ f -1 f b supp 0 ˙ ⊆ f -1 S ∖ supp 0 ˙⁡ b
135 123 134 sstrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f -1 i ⊆ f -1 S ∖ supp 0 ˙⁡ b
136 fimacnv ⊢ f : ⋃ S ⟶ S → f -1 S = ⋃ S
137 115 136 syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f -1 S = ⋃ S
138 137 difeq1d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f -1 S ∖ supp 0 ˙⁡ b = ⋃ S ∖ supp 0 ˙⁡ b
139 135 138 sseqtrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f -1 i ⊆ ⋃ S ∖ supp 0 ˙⁡ b
140 139 sselda ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ f -1 i → j ∈ ⋃ S ∖ supp 0 ˙⁡ b
141 ssidd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → b supp 0 ˙ ⊆ b supp 0 ˙
142 77 adantr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → ⋃ S ∈ V
143 79 a1i ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → 0 ˙ ∈ V
144 125 141 142 143 suppssr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → b ⁡ j = 0 ˙
145 140 144 syldan ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ f -1 i → b ⁡ j = 0 ˙
146 145 oveq1d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ f -1 i → b ⁡ j · ˙ j = 0 ˙ · ˙ j
147 5 ad7antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ f -1 i → R ∈ Ring
148 13 ad7antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ f -1 i → ⋃ S ⊆ B
149 45 ad3antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → f -1 i ⊆ ⋃ S
150 149 sselda ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ f -1 i → j ∈ ⋃ S
151 148 150 sseldd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ f -1 i → j ∈ B
152 147 151 89 syl2anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ f -1 i → 0 ˙ · ˙ j = 0 ˙
153 146 152 eqtrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ ∧ j ∈ f -1 i → b ⁡ j · ˙ j = 0 ˙
154 114 153 mpteq2da ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → j ∈ f -1 i ⟼ b ⁡ j · ˙ j = j ∈ f -1 i ⟼ 0 ˙
155 154 oveq2d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → ∑ R j ∈ f -1 i b ⁡ j · ˙ j = ∑ R j ∈ f -1 i 0 ˙
156 5 ringcmnd ⊢ φ → R ∈ CMnd
157 156 cmnmndd ⊢ φ → R ∈ Mnd
158 157 ad6antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → R ∈ Mnd
159 3 gsumz ⊢ R ∈ Mnd ∧ f -1 i ∈ V → ∑ R j ∈ f -1 i 0 ˙ = 0 ˙
160 158 38 159 sylancl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → ∑ R j ∈ f -1 i 0 ˙ = 0 ˙
161 155 160 eqtrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S ∖ f b supp 0 ˙ → ∑ R j ∈ f -1 i b ⁡ j · ˙ j = 0 ˙
162 161 102 suppss2 ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j supp 0 ˙ ⊆ f b supp 0 ˙
163 112 162 ssfid ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j supp 0 ˙ ∈ Fin
164 103 104 106 163 isfsuppd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → finSupp 0 ˙⁡ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j
165 simpllr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j
166 32 156 syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → R ∈ CMnd
167 5 ad6antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S → R ∈ Ring
168 41 ad5antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → b : ⋃ S ⟶ B
169 168 ffvelcdmda ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S → b ⁡ j ∈ B
170 32 13 syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → ⋃ S ⊆ B
171 170 sselda ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S → j ∈ B
172 2 4 167 169 171 ringcld ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S → b ⁡ j · ˙ j ∈ B
173 eqid ⊢ j ∈ ⋃ S ⟼ b ⁡ j · ˙ j = j ∈ ⋃ S ⟼ b ⁡ j · ˙ j
174 70 172 173 fmptdf ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → j ∈ ⋃ S ⟼ b ⁡ j · ˙ j : ⋃ S ⟶ B
175 77 mptexd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → j ∈ ⋃ S ⟼ b ⁡ j · ˙ j ∈ V
176 funmpt ⊢ Fun ⁡ j ∈ ⋃ S ⟼ b ⁡ j · ˙ j
177 176 a1i ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → Fun ⁡ j ∈ ⋃ S ⟼ b ⁡ j · ˙ j
178 nfcv ⊢ Ⅎ _ j ⋃ S
179 168 adantr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → b : ⋃ S ⟶ B
180 179 ffnd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → b Fn ⋃ S
181 77 adantr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → ⋃ S ∈ V
182 79 a1i ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → 0 ˙ ∈ V
183 simpr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → j ∈ ⋃ S ∖ supp 0 ˙⁡ b
184 180 181 182 183 fvdifsupp ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → b ⁡ j = 0 ˙
185 184 oveq1d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → b ⁡ j · ˙ j = 0 ˙ · ˙ j
186 5 ad6antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → R ∈ Ring
187 170 adantr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → ⋃ S ⊆ B
188 183 eldifad ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → j ∈ ⋃ S
189 187 188 sseldd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → j ∈ B
190 186 189 89 syl2anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → 0 ˙ · ˙ j = 0 ˙
191 185 190 eqtrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ j ∈ ⋃ S ∖ supp 0 ˙⁡ b → b ⁡ j · ˙ j = 0 ˙
192 70 178 74 191 77 suppss2f ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → j ∈ ⋃ S ⟼ b ⁡ j · ˙ j supp 0 ˙ ⊆ b supp 0 ˙
193 fsuppsssupp ⊢ j ∈ ⋃ S ⟼ b ⁡ j · ˙ j ∈ V ∧ Fun ⁡ j ∈ ⋃ S ⟼ b ⁡ j · ˙ j ∧ finSupp 0 ˙⁡ b ∧ j ∈ ⋃ S ⟼ b ⁡ j · ˙ j supp 0 ˙ ⊆ b supp 0 ˙ → finSupp 0 ˙⁡ j ∈ ⋃ S ⟼ b ⁡ j · ˙ j
194 175 177 109 192 193 syl22anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → finSupp 0 ˙⁡ j ∈ ⋃ S ⟼ b ⁡ j · ˙ j
195 sndisj ⊢ Disj i ∈ S i
196 disjpreima ⊢ Fun ⁡ f ∧ Disj i ∈ S i → Disj i ∈ S f -1 i
197 108 195 196 sylancl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → Disj i ∈ S f -1 i
198 iunid ⊢ ⋃ i ∈ S i = S
199 198 imaeq2i ⊢ f -1 ⋃ i ∈ S i = f -1 S
200 iunpreima ⊢ Fun ⁡ f → f -1 ⋃ i ∈ S i = ⋃ i ∈ S f -1 i
201 108 200 syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → f -1 ⋃ i ∈ S i = ⋃ i ∈ S f -1 i
202 136 ad2antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → f -1 S = ⋃ S
203 199 201 202 3eqtr3a ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → ⋃ i ∈ S f -1 i = ⋃ S
204 2 3 166 77 102 174 194 197 203 gsumpart ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → ∑ R j ∈ ⋃ S b ⁡ j · ˙ j = ∑ R i ∈ S ∑ R j ∈ ⋃ S ⟼ b ⁡ j · ˙ j ↾ f -1 i
205 46 resmptd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → j ∈ ⋃ S ⟼ b ⁡ j · ˙ j ↾ f -1 i = j ∈ f -1 i ⟼ b ⁡ j · ˙ j
206 205 oveq2d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ i ∈ S → ∑ R j ∈ ⋃ S ⟼ b ⁡ j · ˙ j ↾ f -1 i = ∑ R j ∈ f -1 i b ⁡ j · ˙ j
207 206 mpteq2dva ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → i ∈ S ⟼ ∑ R j ∈ ⋃ S ⟼ b ⁡ j · ˙ j ↾ f -1 i = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j
208 207 oveq2d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → ∑ R i ∈ S ∑ R j ∈ ⋃ S ⟼ b ⁡ j · ˙ j ↾ f -1 i = ∑ R i ∈ S ∑ R j ∈ f -1 i b ⁡ j · ˙ j
209 165 204 208 3eqtrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → X = ∑ R i ∈ S ∑ R j ∈ f -1 i b ⁡ j · ˙ j
210 eqid ⊢ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j = i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j
211 simpr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ i = k → i = k
212 211 sneqd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ i = k → i = k
213 212 imaeq2d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ i = k → f -1 i = f -1 k
214 213 mpteq1d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ i = k → j ∈ f -1 i ⟼ b ⁡ j · ˙ j = j ∈ f -1 k ⟼ b ⁡ j · ˙ j
215 214 oveq2d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ i = k → ∑ R j ∈ f -1 i b ⁡ j · ˙ j = ∑ R j ∈ f -1 k b ⁡ j · ˙ j
216 simpr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → k ∈ S
217 ovexd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → ∑ R j ∈ f -1 k b ⁡ j · ˙ j ∈ V
218 210 215 216 217 fvmptd2 ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ⁡ k = ∑ R j ∈ f -1 k b ⁡ j · ˙ j
219 156 ad6antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → R ∈ CMnd
220 37 imaex ⊢ f -1 k ∈ V
221 220 a1i ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → f -1 k ∈ V
222 5 ad6antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → R ∈ Ring
223 32 6 syl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → S ⊆ LIdeal ⁡ R
224 223 sselda ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → k ∈ LIdeal ⁡ R
225 8 lidlsubg ⊢ R ∈ Ring ∧ k ∈ LIdeal ⁡ R → k ∈ SubGrp ⁡ R
226 subgsubm ⊢ k ∈ SubGrp ⁡ R → k ∈ SubMnd ⁡ R
227 225 226 syl ⊢ R ∈ Ring ∧ k ∈ LIdeal ⁡ R → k ∈ SubMnd ⁡ R
228 222 224 227 syl2anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → k ∈ SubMnd ⁡ R
229 222 adantr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → R ∈ Ring
230 224 adantr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → k ∈ LIdeal ⁡ R
231 41 ad7antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → b : ⋃ S ⟶ B
232 cnvimass ⊢ f -1 k ⊆ dom ⁡ f
233 232 44 sseqtrid ⊢ f : ⋃ S ⟶ S → f -1 k ⊆ ⋃ S
234 233 ad3antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → f -1 k ⊆ ⋃ S
235 234 sselda ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → l ∈ ⋃ S
236 231 235 ffvelcdmd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → b ⁡ l ∈ B
237 fveq2 ⊢ j = l → f ⁡ j = f ⁡ l
238 53 237 eleq12d ⊢ j = l → j ∈ f ⁡ j ↔ l ∈ f ⁡ l
239 simpllr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → ∀ j ∈ ⋃ S j ∈ f ⁡ j
240 238 239 235 rspcdva ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → l ∈ f ⁡ l
241 simp-4r ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → f : ⋃ S ⟶ S
242 241 ffnd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → f Fn ⋃ S
243 elpreima ⊢ f Fn ⋃ S → l ∈ f -1 k ↔ l ∈ ⋃ S ∧ f ⁡ l ∈ k
244 243 biimpa ⊢ f Fn ⋃ S ∧ l ∈ f -1 k → l ∈ ⋃ S ∧ f ⁡ l ∈ k
245 elsni ⊢ f ⁡ l ∈ k → f ⁡ l = k
246 244 245 simpl2im ⊢ f Fn ⋃ S ∧ l ∈ f -1 k → f ⁡ l = k
247 242 246 sylancom ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → f ⁡ l = k
248 240 247 eleqtrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → l ∈ k
249 8 2 4 229 230 236 248 lidlmcld ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ l ∈ f -1 k → b ⁡ l · ˙ l ∈ k
250 54 cbvmptv ⊢ j ∈ f -1 k ⟼ b ⁡ j · ˙ j = l ∈ f -1 k ⟼ b ⁡ l · ˙ l
251 249 250 fmptd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → j ∈ f -1 k ⟼ b ⁡ j · ˙ j : f -1 k ⟶ k
252 221 mptexd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → j ∈ f -1 k ⟼ b ⁡ j · ˙ j ∈ V
253 251 ffund ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → Fun ⁡ j ∈ f -1 k ⟼ b ⁡ j · ˙ j
254 simp-5r ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → finSupp 0 ˙⁡ b
255 nfv ⊢ Ⅎ j k ∈ S
256 70 255 nfan ⊢ Ⅎ j φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S
257 nfcv ⊢ Ⅎ _ j f -1 k
258 41 ad7antlr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → b : ⋃ S ⟶ B
259 258 ffnd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → b Fn ⋃ S
260 77 ad2antrr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → ⋃ S ∈ V
261 79 a1i ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → 0 ˙ ∈ V
262 234 ssdifd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → f -1 k ∖ supp 0 ˙⁡ b ⊆ ⋃ S ∖ supp 0 ˙⁡ b
263 262 sselda ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → j ∈ ⋃ S ∖ supp 0 ˙⁡ b
264 259 260 261 263 fvdifsupp ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → b ⁡ j = 0 ˙
265 264 oveq1d ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → b ⁡ j · ˙ j = 0 ˙ · ˙ j
266 13 ad7antr ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → ⋃ S ⊆ B
267 263 eldifad ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → j ∈ ⋃ S
268 266 267 sseldd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → j ∈ B
269 222 268 89 syl2an2r ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → 0 ˙ · ˙ j = 0 ˙
270 265 269 eqtrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S ∧ j ∈ f -1 k ∖ supp 0 ˙⁡ b → b ⁡ j · ˙ j = 0 ˙
271 256 257 74 270 221 suppss2f ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → j ∈ f -1 k ⟼ b ⁡ j · ˙ j supp 0 ˙ ⊆ b supp 0 ˙
272 fsuppsssupp ⊢ j ∈ f -1 k ⟼ b ⁡ j · ˙ j ∈ V ∧ Fun ⁡ j ∈ f -1 k ⟼ b ⁡ j · ˙ j ∧ finSupp 0 ˙⁡ b ∧ j ∈ f -1 k ⟼ b ⁡ j · ˙ j supp 0 ˙ ⊆ b supp 0 ˙ → finSupp 0 ˙⁡ j ∈ f -1 k ⟼ b ⁡ j · ˙ j
273 252 253 254 271 272 syl22anc ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → finSupp 0 ˙⁡ j ∈ f -1 k ⟼ b ⁡ j · ˙ j
274 3 219 221 228 251 273 gsumsubmcl ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → ∑ R j ∈ f -1 k b ⁡ j · ˙ j ∈ k
275 218 274 eqeltrd ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j ∧ k ∈ S → i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ⁡ k ∈ k
276 275 ralrimiva ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → ∀ k ∈ S i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ⁡ k ∈ k
277 164 209 276 3jca ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → finSupp 0 ˙⁡ i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ∧ X = ∑ R i ∈ S ∑ R j ∈ f -1 i b ⁡ j · ˙ j ∧ ∀ k ∈ S i ∈ S ⟼ ∑ R j ∈ f -1 i b ⁡ j · ˙ j ⁡ k ∈ k
278 31 101 277 rspcedvdw ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → ∃ a ∈ B S finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k
279 278 anasss ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ∧ f : ⋃ S ⟶ S ∧ ∀ j ∈ ⋃ S j ∈ f ⁡ j → ∃ a ∈ B S finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k
280 24 279 exlimddv ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j → ∃ a ∈ B S finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k
281 280 anasss ⊢ φ ∧ b ∈ B ⋃ S ∧ finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j → ∃ a ∈ B S finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k
282 281 r19.29an ⊢ φ ∧ ∃ b ∈ B ⋃ S finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j → ∃ a ∈ B S finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k
283 breq1 ⊢ b = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ → finSupp 0 ˙⁡ b ↔ finSupp 0 ˙⁡ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙
284 fveq1 ⊢ b = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ → b ⁡ j = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j
285 284 oveq1d ⊢ b = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ → b ⁡ j · ˙ j = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j
286 285 mpteq2dv ⊢ b = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ → j ∈ ⋃ S ⟼ b ⁡ j · ˙ j = j ∈ ⋃ S ⟼ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j
287 286 oveq2d ⊢ b = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ → ∑ R j ∈ ⋃ S b ⁡ j · ˙ j = ∑ R j ∈ ⋃ S m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j
288 287 eqeq2d ⊢ b = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ → X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ↔ X = ∑ R j ∈ ⋃ S m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j
289 283 288 anbi12d ⊢ b = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ → finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ↔ finSupp 0 ˙⁡ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ∧ X = ∑ R j ∈ ⋃ S m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j
290 97 a1i ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → B ∈ V
291 17 ad4antr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ⋃ S ∈ V
292 98 16 elmapd ⊢ φ → a ∈ B S ↔ a : S ⟶ B
293 292 biimpa ⊢ φ ∧ a ∈ B S → a : S ⟶ B
294 293 ad3antrrr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → a : S ⟶ B
295 294 ffnd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → a Fn S
296 elssuni ⊢ k ∈ S → k ⊆ ⋃ S
297 296 adantl ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ k ∈ S → k ⊆ ⋃ S
298 297 sseld ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ k ∈ S → a ⁡ k ∈ k → a ⁡ k ∈ ⋃ S
299 298 ralimdva ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a → ∀ k ∈ S a ⁡ k ∈ k → ∀ k ∈ S a ⁡ k ∈ ⋃ S
300 299 imp ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ∀ k ∈ S a ⁡ k ∈ ⋃ S
301 fnfvrnss ⊢ a Fn S ∧ ∀ k ∈ S a ⁡ k ∈ ⋃ S → ran ⁡ a ⊆ ⋃ S
302 295 300 301 syl2anc ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ran ⁡ a ⊆ ⋃ S
303 302 ssdifssd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ran ⁡ a ∖ 0 ˙ ⊆ ⋃ S
304 undif ⊢ ran ⁡ a ∖ 0 ˙ ⊆ ⋃ S ↔ ran ⁡ a ∖ 0 ˙ ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ = ⋃ S
305 303 304 sylib ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ran ⁡ a ∖ 0 ˙ ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ = ⋃ S
306 5 ad4antr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → R ∈ Ring
307 306 adantr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → R ∈ Ring
308 eqid ⊢ ℤRHom ⁡ R = ℤRHom ⁡ R
309 308 zrhrhm ⊢ R ∈ Ring → ℤRHom ⁡ R ∈ ℤ ring RingHom R
310 zringbas ⊢ ℤ = Base ℤ ring
311 310 2 rhmf ⊢ ℤRHom ⁡ R ∈ ℤ ring RingHom R → ℤRHom ⁡ R : ℤ ⟶ B
312 307 309 311 3syl ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → ℤRHom ⁡ R : ℤ ⟶ B
313 simp-5r ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → a ∈ B S
314 79 a1i ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → 0 ˙ ∈ V
315 ssv ⊢ ran ⁡ a ⊆ V
316 ssdif ⊢ ran ⁡ a ⊆ V → ran ⁡ a ∖ 0 ˙ ⊆ V ∖ 0 ˙
317 315 316 ax-mp ⊢ ran ⁡ a ∖ 0 ˙ ⊆ V ∖ 0 ˙
318 317 sseli ⊢ m ∈ ran ⁡ a ∖ 0 ˙ → m ∈ V ∖ 0 ˙
319 318 adantl ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → m ∈ V ∖ 0 ˙
320 simp-4r ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → finSupp 0 ˙⁡ a
321 313 314 319 320 fsuppinisegfi ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → a -1 m ∈ Fin
322 hashcl ⊢ a -1 m ∈ Fin → a -1 m ∈ ℕ 0
323 321 322 syl ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → a -1 m ∈ ℕ 0
324 323 nn0zd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → a -1 m ∈ ℤ
325 312 324 ffvelcdmd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ m ∈ ran ⁡ a ∖ 0 ˙ → ℤRHom ⁡ R ⁡ a -1 m ∈ B
326 eqid ⊢ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m
327 325 326 fmptd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m : ran ⁡ a ∖ 0 ˙ ⟶ B
328 2 3 ring0cl ⊢ R ∈ Ring → 0 ˙ ∈ B
329 fconst6g ⊢ 0 ˙ ∈ B → ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ : ⋃ S ∖ ran ⁡ a ∖ 0 ˙ ⟶ B
330 306 328 329 3syl ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ : ⋃ S ∖ ran ⁡ a ∖ 0 ˙ ⟶ B
331 disjdif ⊢ ran ⁡ a ∖ 0 ˙ ∩ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ = ∅
332 331 a1i ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ran ⁡ a ∖ 0 ˙ ∩ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ = ∅
333 327 330 332 fun2d ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ : ran ⁡ a ∖ 0 ˙ ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ ⟶ B
334 305 333 feq2dd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ : ⋃ S ⟶ B
335 290 291 334 elmapdd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ∈ B ⋃ S
336 79 a1i ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → 0 ˙ ∈ V
337 333 ffund ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → Fun ⁡ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙
338 294 ffund ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → Fun ⁡ a
339 simp-4r ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → a ∈ B S
340 simpllr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → finSupp 0 ˙⁡ a
341 fsupprnfi ⊢ Fun ⁡ a ∧ a ∈ B S ∧ 0 ˙ ∈ V ∧ finSupp 0 ˙⁡ a → ran ⁡ a ∈ Fin
342 diffi ⊢ ran ⁡ a ∈ Fin → ran ⁡ a ∖ 0 ˙ ∈ Fin
343 341 342 syl ⊢ Fun ⁡ a ∧ a ∈ B S ∧ 0 ˙ ∈ V ∧ finSupp 0 ˙⁡ a → ran ⁡ a ∖ 0 ˙ ∈ Fin
344 338 339 336 340 343 syl22anc ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ran ⁡ a ∖ 0 ˙ ∈ Fin
345 327 344 336 fdmfifsupp ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → finSupp 0 ˙⁡ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m
346 13 ssdifssd ⊢ φ → ⋃ S ∖ ran ⁡ a ∖ 0 ˙ ⊆ B
347 346 ad4antr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ⋃ S ∖ ran ⁡ a ∖ 0 ˙ ⊆ B
348 290 347 ssexd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ⋃ S ∖ ran ⁡ a ∖ 0 ˙ ∈ V
349 348 336 fczfsuppd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → finSupp 0 ˙⁡ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙
350 345 349 fsuppun ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ supp 0 ˙ ∈ Fin
351 335 336 337 350 isfsuppd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → finSupp 0 ˙⁡ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙
352 fvex ⊢ ℤRHom ⁡ R ⁡ a -1 m ∈ V
353 352 326 fnmpti ⊢ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m Fn ran ⁡ a ∖ 0 ˙
354 353 a1i ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m Fn ran ⁡ a ∖ 0 ˙
355 fnconstg ⊢ 0 ˙ ∈ V → ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ Fn ⋃ S ∖ ran ⁡ a ∖ 0 ˙
356 79 355 ax-mp ⊢ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ Fn ⋃ S ∖ ran ⁡ a ∖ 0 ˙
357 356 a1i ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ Fn ⋃ S ∖ ran ⁡ a ∖ 0 ˙
358 331 a1i ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → ran ⁡ a ∖ 0 ˙ ∩ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ = ∅
359 simpr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → j ∈ ran ⁡ a ∖ 0 ˙
360 354 357 358 359 fvun1d ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j = m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ⁡ j
361 sneq ⊢ m = j → m = j
362 361 imaeq2d ⊢ m = j → a -1 m = a -1 j
363 362 fveq2d ⊢ m = j → a -1 m = a -1 j
364 363 fveq2d ⊢ m = j → ℤRHom ⁡ R ⁡ a -1 m = ℤRHom ⁡ R ⁡ a -1 j
365 fvexd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → ℤRHom ⁡ R ⁡ a -1 j ∈ V
366 326 364 359 365 fvmptd3 ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ⁡ j = ℤRHom ⁡ R ⁡ a -1 j
367 360 366 eqtrd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j = ℤRHom ⁡ R ⁡ a -1 j
368 367 oveq1d ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j = ℤRHom ⁡ R ⁡ a -1 j · ˙ j
369 368 mpteq2dva ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → j ∈ ran ⁡ a ∖ 0 ˙ ⟼ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j = j ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 j · ˙ j
370 369 oveq2d ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ∑ R j ∈ ran ⁡ a ∖ 0 ˙ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j = ∑ R j ∈ ran ⁡ a ∖ 0 ˙ ℤRHom ⁡ R ⁡ a -1 j · ˙ j
371 306 ringcmnd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → R ∈ CMnd
372 331 a1i ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → ran ⁡ a ∖ 0 ˙ ∩ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ = ∅
373 fvun2 ⊢ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m Fn ran ⁡ a ∖ 0 ˙ ∧ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ Fn ⋃ S ∖ ran ⁡ a ∖ 0 ˙ ∧ ran ⁡ a ∖ 0 ˙ ∩ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ = ∅ ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j = ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j
374 353 356 373 mp3an12 ⊢ ran ⁡ a ∖ 0 ˙ ∩ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ = ∅ ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j = ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j
375 372 374 sylancom ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j = ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j
376 79 fvconst2 ⊢ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j = 0 ˙
377 376 adantl ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j = 0 ˙
378 375 377 eqtrd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j = 0 ˙
379 378 oveq1d ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j = 0 ˙ · ˙ j
380 347 sselda ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → j ∈ B
381 306 380 89 syl2an2r ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → 0 ˙ · ˙ j = 0 ˙
382 379 381 eqtrd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j = 0 ˙
383 306 adantr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S → R ∈ Ring
384 334 ffvelcdmda ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j ∈ B
385 13 ad4antr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ⋃ S ⊆ B
386 385 sselda ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S → j ∈ B
387 2 4 383 384 386 ringcld ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ⋃ S → m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j ∈ B
388 2 3 371 291 382 344 387 303 gsummptres2 ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ∑ R j ∈ ⋃ S m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j = ∑ R j ∈ ran ⁡ a ∖ 0 ˙ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j
389 eqid ⊢ ⋅ R = ⋅ R
390 2 3 389 371 294 340 gsumhashmul ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ∑ R a = ∑ R j ∈ ran ⁡ a ∖ 0 ˙ a -1 j ⋅ R j
391 simplr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → X = ∑ R a
392 306 adantr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → R ∈ Ring
393 339 adantr ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → a ∈ B S
394 79 a1i ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → 0 ˙ ∈ V
395 317 359 sselid ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → j ∈ V ∖ 0 ˙
396 simp-4r ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → finSupp 0 ˙⁡ a
397 393 394 395 396 fsuppinisegfi ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → a -1 j ∈ Fin
398 hashcl ⊢ a -1 j ∈ Fin → a -1 j ∈ ℕ 0
399 397 398 syl ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → a -1 j ∈ ℕ 0
400 399 nn0zd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → a -1 j ∈ ℤ
401 303 385 sstrd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ran ⁡ a ∖ 0 ˙ ⊆ B
402 401 sselda ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → j ∈ B
403 eqid ⊢ 1 R = 1 R
404 308 389 403 zrhmulg ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ → ℤRHom ⁡ R ⁡ a -1 j = a -1 j ⋅ R 1 R
405 404 adantr ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → ℤRHom ⁡ R ⁡ a -1 j = a -1 j ⋅ R 1 R
406 405 oveq1d ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → ℤRHom ⁡ R ⁡ a -1 j · ˙ j = a -1 j ⋅ R 1 R · ˙ j
407 simpll ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → R ∈ Ring
408 simplr ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → a -1 j ∈ ℤ
409 2 403 ringidcl ⊢ R ∈ Ring → 1 R ∈ B
410 409 ad2antrr ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → 1 R ∈ B
411 simpr ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → j ∈ B
412 2 389 4 mulgass2 ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ 1 R ∈ B ∧ j ∈ B → a -1 j ⋅ R 1 R · ˙ j = a -1 j ⋅ R 1 R · ˙ j
413 407 408 410 411 412 syl13anc ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → a -1 j ⋅ R 1 R · ˙ j = a -1 j ⋅ R 1 R · ˙ j
414 2 4 403 ringlidm ⊢ R ∈ Ring ∧ j ∈ B → 1 R · ˙ j = j
415 407 414 sylancom ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → 1 R · ˙ j = j
416 415 oveq2d ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → a -1 j ⋅ R 1 R · ˙ j = a -1 j ⋅ R j
417 406 413 416 3eqtrd ⊢ R ∈ Ring ∧ a -1 j ∈ ℤ ∧ j ∈ B → ℤRHom ⁡ R ⁡ a -1 j · ˙ j = a -1 j ⋅ R j
418 392 400 402 417 syl21anc ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k ∧ j ∈ ran ⁡ a ∖ 0 ˙ → ℤRHom ⁡ R ⁡ a -1 j · ˙ j = a -1 j ⋅ R j
419 418 mpteq2dva ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → j ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 j · ˙ j = j ∈ ran ⁡ a ∖ 0 ˙ ⟼ a -1 j ⋅ R j
420 419 oveq2d ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ∑ R j ∈ ran ⁡ a ∖ 0 ˙ ℤRHom ⁡ R ⁡ a -1 j · ˙ j = ∑ R j ∈ ran ⁡ a ∖ 0 ˙ a -1 j ⋅ R j
421 390 391 420 3eqtr4d ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → X = ∑ R j ∈ ran ⁡ a ∖ 0 ˙ ℤRHom ⁡ R ⁡ a -1 j · ˙ j
422 370 388 421 3eqtr4rd ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → X = ∑ R j ∈ ⋃ S m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j
423 351 422 jca ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → finSupp 0 ˙⁡ m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ∧ X = ∑ R j ∈ ⋃ S m ∈ ran ⁡ a ∖ 0 ˙ ⟼ ℤRHom ⁡ R ⁡ a -1 m ∪ ⋃ S ∖ ran ⁡ a ∖ 0 ˙ × 0 ˙ ⁡ j · ˙ j
424 289 335 423 rspcedvdw ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ∃ b ∈ B ⋃ S finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j
425 424 3anasss ⊢ φ ∧ a ∈ B S ∧ finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ∃ b ∈ B ⋃ S finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j
426 425 r19.29an ⊢ φ ∧ ∃ a ∈ B S finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k → ∃ b ∈ B ⋃ S finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j
427 282 426 impbida ⊢ φ → ∃ b ∈ B ⋃ S finSupp 0 ˙⁡ b ∧ X = ∑ R j ∈ ⋃ S b ⁡ j · ˙ j ↔ ∃ a ∈ B S finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k
428 14 427 bitrd ⊢ φ → X ∈ N ⁡ ⋃ S ↔ ∃ a ∈ B S finSupp 0 ˙⁡ a ∧ X = ∑ R a ∧ ∀ k ∈ S a ⁡ k ∈ k