Metamath Proof Explorer


Theorem modfsummods

Description: Induction step for modfsummod . (Contributed by Alexander van der Vekens, 1-Sep-2018)

Ref Expression
Assertion modfsummods AFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN

Proof

Step Hyp Ref Expression
1 snssi zAzA
2 ssequn1 zAzA=A
3 uncom zA=Az
4 3 eqeq1i zA=AAz=A
5 sumeq1 A=AzkAB=kAzB
6 5 oveq1d A=AzkABmodN=kAzBmodN
7 sumeq1 A=AzkABmodN=kAzBmodN
8 7 oveq1d A=AzkABmodNmodN=kAzBmodNmodN
9 6 8 eqeq12d A=AzkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
10 9 eqcoms Az=AkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
11 4 10 sylbi zA=AkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
12 11 biimpd zA=AkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
13 12 a1d zA=AAFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
14 2 13 sylbi zAAFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
15 1 14 syl zAAFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
16 df-nel zA¬zA
17 simp1 AFinNkAzBAFin
18 17 ad2antlr zAAFinNkAzBkABmodN=kABmodNmodNAFin
19 simpl zAAFinNkAzBzA
20 19 adantr zAAFinNkAzBkABmodN=kABmodNmodNzA
21 vex zV
22 20 21 jctil zAAFinNkAzBkABmodN=kABmodNmodNzVzA
23 simplr3 zAAFinNkAzBkABmodN=kABmodNmodNkAzB
24 fsumsplitsnun AFinzVzAkAzBkAzB=kAB+z/kB
25 18 22 23 24 syl3anc zAAFinNkAzBkABmodN=kABmodNmodNkAzB=kAB+z/kB
26 25 oveq1d zAAFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kAB+z/kBmodN
27 ralunb kAzBkABkzB
28 simpl kABkzBkAB
29 27 28 sylbi kAzBkAB
30 fsumzcl2 AFinkABkAB
31 29 30 sylan2 AFinkAzBkAB
32 31 3adant2 AFinNkAzBkAB
33 32 adantl zAAFinNkAzBkAB
34 33 zred zAAFinNkAzBkAB
35 modfsummodslem1 kAzBz/kB
36 35 3ad2ant3 AFinNkAzBz/kB
37 36 adantl zAAFinNkAzBz/kB
38 37 zred zAAFinNkAzBz/kB
39 nnrp NN+
40 39 3ad2ant2 AFinNkAzBN+
41 40 adantl zAAFinNkAzBN+
42 modaddabs kABz/kBN+kABmodN+z/kBmodNmodN=kAB+z/kBmodN
43 34 38 41 42 syl3anc zAAFinNkAzBkABmodN+z/kBmodNmodN=kAB+z/kBmodN
44 43 eqcomd zAAFinNkAzBkAB+z/kBmodN=kABmodN+z/kBmodNmodN
45 44 adantr zAAFinNkAzBkABmodN=kABmodNmodNkAB+z/kBmodN=kABmodN+z/kBmodNmodN
46 simpr zAAFinNkAzBkABmodN=kABmodNmodNkABmodN=kABmodNmodN
47 35 zred kAzBz/kB
48 47 3ad2ant3 AFinNkAzBz/kB
49 48 adantl zAAFinNkAzBz/kB
50 49 41 jca zAAFinNkAzBz/kBN+
51 50 adantr zAAFinNkAzBkABmodN=kABmodNmodNz/kBN+
52 modabs2 z/kBN+z/kBmodNmodN=z/kBmodN
53 52 eqcomd z/kBN+z/kBmodN=z/kBmodNmodN
54 51 53 syl zAAFinNkAzBkABmodN=kABmodNmodNz/kBmodN=z/kBmodNmodN
55 46 54 oveq12d zAAFinNkAzBkABmodN=kABmodNmodNkABmodN+z/kBmodN=kABmodNmodN+z/kBmodNmodN
56 55 oveq1d zAAFinNkAzBkABmodN=kABmodNmodNkABmodN+z/kBmodNmodN=kABmodNmodN+z/kBmodNmodNmodN
57 45 56 eqtrd zAAFinNkAzBkABmodN=kABmodNmodNkAB+z/kBmodN=kABmodNmodN+z/kBmodNmodNmodN
58 zmodcl BNBmodN0
59 58 nn0zd BNBmodN
60 59 expcom NBBmodN
61 60 ralimdv NkABkABmodN
62 61 com12 kABNkABmodN
63 62 adantr kABkzBNkABmodN
64 27 63 sylbi kAzBNkABmodN
65 64 impcom NkAzBkABmodN
66 65 3adant1 AFinNkAzBkABmodN
67 17 66 jca AFinNkAzBAFinkABmodN
68 fsumzcl2 AFinkABmodNkABmodN
69 68 zred AFinkABmodNkABmodN
70 67 69 syl AFinNkAzBkABmodN
71 70 ad2antlr zAAFinNkAzBkABmodN=kABmodNmodNkABmodN
72 35 anim1i kAzBNz/kBN
73 72 ancoms NkAzBz/kBN
74 zmodcl z/kBNz/kBmodN0
75 73 74 syl NkAzBz/kBmodN0
76 75 nn0red NkAzBz/kBmodN
77 76 3adant1 AFinNkAzBz/kBmodN
78 77 ad2antlr zAAFinNkAzBkABmodN=kABmodNmodNz/kBmodN
79 40 ad2antlr zAAFinNkAzBkABmodN=kABmodNmodNN+
80 modaddabs kABmodNz/kBmodNN+kABmodNmodN+z/kBmodNmodNmodN=kABmodN+z/kBmodNmodN
81 71 78 79 80 syl3anc zAAFinNkAzBkABmodN=kABmodNmodNkABmodNmodN+z/kBmodNmodNmodN=kABmodN+z/kBmodNmodN
82 60 ralimdv NkAzBkAzBmodN
83 82 imp NkAzBkAzBmodN
84 83 3adant1 AFinNkAzBkAzBmodN
85 84 ad2antlr zAAFinNkAzBkABmodN=kABmodNmodNkAzBmodN
86 fsumsplitsnun AFinzVzAkAzBmodNkAzBmodN=kABmodN+z/kBmodN
87 18 22 85 86 syl3anc zAAFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kABmodN+z/kBmodN
88 csbov1g zVz/kBmodN=z/kBmodN
89 21 88 mp1i zAAFinNkAzBkABmodN=kABmodNmodNz/kBmodN=z/kBmodN
90 89 oveq2d zAAFinNkAzBkABmodN=kABmodNmodNkABmodN+z/kBmodN=kABmodN+z/kBmodN
91 87 90 eqtrd zAAFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kABmodN+z/kBmodN
92 91 eqcomd zAAFinNkAzBkABmodN=kABmodNmodNkABmodN+z/kBmodN=kAzBmodN
93 92 oveq1d zAAFinNkAzBkABmodN=kABmodNmodNkABmodN+z/kBmodNmodN=kAzBmodNmodN
94 81 93 eqtrd zAAFinNkAzBkABmodN=kABmodNmodNkABmodNmodN+z/kBmodNmodNmodN=kAzBmodNmodN
95 26 57 94 3eqtrd zAAFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
96 95 exp31 zAAFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
97 16 96 sylbir ¬zAAFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN
98 15 97 pm2.61i AFinNkAzBkABmodN=kABmodNmodNkAzBmodN=kAzBmodNmodN