Metamath Proof Explorer


Theorem modsumfzodifsn

Description: The sum of a number within a half-open range of positive integers is an element of the corresponding open range of nonnegative integers with one excluded integer modulo the excluded integer. (Contributed by AV, 19-Mar-2021)

Ref Expression
Assertion modsumfzodifsn J 0 ..^ N K 1 ..^ N K + J mod N 0 ..^ N J

Proof

Step Hyp Ref Expression
1 elfzo0 J 0 ..^ N J 0 N J < N
2 elfzoelz K 1 ..^ N K
3 2 zred K 1 ..^ N K
4 nn0re J 0 J
5 4 3ad2ant1 J 0 N J < N J
6 readdcl K J K + J
7 3 5 6 syl2anr J 0 N J < N K 1 ..^ N K + J
8 nnrp N N +
9 8 3ad2ant2 J 0 N J < N N +
10 9 adantr J 0 N J < N K 1 ..^ N N +
11 7 10 jca J 0 N J < N K 1 ..^ N K + J N +
12 1 11 sylanb J 0 ..^ N K 1 ..^ N K + J N +
13 12 adantl K + J < N J 0 ..^ N K 1 ..^ N K + J N +
14 elfzo1 K 1 ..^ N K N K < N
15 nnnn0 K K 0
16 15 3ad2ant1 K N K < N K 0
17 14 16 sylbi K 1 ..^ N K 0
18 elfzonn0 J 0 ..^ N J 0
19 nn0addcl K 0 J 0 K + J 0
20 17 18 19 syl2anr J 0 ..^ N K 1 ..^ N K + J 0
21 20 adantl K + J < N J 0 ..^ N K 1 ..^ N K + J 0
22 21 nn0ge0d K + J < N J 0 ..^ N K 1 ..^ N 0 K + J
23 simpl K + J < N J 0 ..^ N K 1 ..^ N K + J < N
24 modid K + J N + 0 K + J K + J < N K + J mod N = K + J
25 13 22 23 24 syl12anc K + J < N J 0 ..^ N K 1 ..^ N K + J mod N = K + J
26 simp2 J 0 N J < N N
27 1 26 sylbi J 0 ..^ N N
28 27 adantr J 0 ..^ N K 1 ..^ N N
29 28 adantl K + J < N J 0 ..^ N K 1 ..^ N N
30 elfzo0 K + J 0 ..^ N K + J 0 N K + J < N
31 21 29 23 30 syl3anbrc K + J < N J 0 ..^ N K 1 ..^ N K + J 0 ..^ N
32 2 zcnd K 1 ..^ N K
33 32 adantl J 0 ..^ N K 1 ..^ N K
34 0cnd J 0 ..^ N K 1 ..^ N 0
35 elfzoelz J 0 ..^ N J
36 35 zcnd J 0 ..^ N J
37 36 adantr J 0 ..^ N K 1 ..^ N J
38 nnne0 K K 0
39 38 3ad2ant1 K N K < N K 0
40 14 39 sylbi K 1 ..^ N K 0
41 40 adantl J 0 ..^ N K 1 ..^ N K 0
42 33 34 37 41 addneintr2d J 0 ..^ N K 1 ..^ N K + J 0 + J
43 42 adantl K + J < N J 0 ..^ N K 1 ..^ N K + J 0 + J
44 37 adantl K + J < N J 0 ..^ N K 1 ..^ N J
45 addid2 J 0 + J = J
46 45 eqcomd J J = 0 + J
47 44 46 syl K + J < N J 0 ..^ N K 1 ..^ N J = 0 + J
48 43 47 neeqtrrd K + J < N J 0 ..^ N K 1 ..^ N K + J J
49 eldifsn K + J 0 ..^ N J K + J 0 ..^ N K + J J
50 31 48 49 sylanbrc K + J < N J 0 ..^ N K 1 ..^ N K + J 0 ..^ N J
51 25 50 eqeltrd K + J < N J 0 ..^ N K 1 ..^ N K + J mod N 0 ..^ N J
52 elfzoel2 J 0 ..^ N N
53 52 zcnd J 0 ..^ N N
54 53 adantr J 0 ..^ N K 1 ..^ N N
55 54 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N N
56 55 mulm1d ¬ K + J < N J 0 ..^ N K 1 ..^ N -1 N = N
57 56 oveq2d ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J + -1 N = K + J + -N
58 zaddcl K J K + J
59 2 35 58 syl2anr J 0 ..^ N K 1 ..^ N K + J
60 59 zcnd J 0 ..^ N K 1 ..^ N K + J
61 60 54 jca J 0 ..^ N K 1 ..^ N K + J N
62 61 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J N
63 negsub K + J N K + J + -N = K + J - N
64 62 63 syl ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J + -N = K + J - N
65 57 64 eqtrd ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J + -1 N = K + J - N
66 65 oveq1d ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J + -1 N mod N = K + J - N mod N
67 2 35 58 syl2an K 1 ..^ N J 0 ..^ N K + J
68 67 zred K 1 ..^ N J 0 ..^ N K + J
69 68 ancoms J 0 ..^ N K 1 ..^ N K + J
70 52 zred J 0 ..^ N N
71 70 adantr J 0 ..^ N K 1 ..^ N N
72 69 71 resubcld J 0 ..^ N K 1 ..^ N K + J - N
73 72 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N
74 26 nnrpd J 0 N J < N N +
75 1 74 sylbi J 0 ..^ N N +
76 75 adantr J 0 ..^ N K 1 ..^ N N +
77 76 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N N +
78 nnre K K
79 78 3ad2ant1 K N K < N K
80 79 adantl J 0 J < N K N K < N K
81 4 adantr J 0 J < N J
82 81 adantr J 0 J < N K N K < N J
83 nnre N N
84 83 3ad2ant2 K N K < N N
85 84 adantl J 0 J < N K N K < N N
86 simp3 K J N N
87 6 3adant3 K J N K + J
88 86 87 lenltd K J N N K + J ¬ K + J < N
89 88 biimprd K J N ¬ K + J < N N K + J
90 87 86 subge0d K J N 0 K + J - N N K + J
91 89 90 sylibrd K J N ¬ K + J < N 0 K + J - N
92 80 82 85 91 syl3anc J 0 J < N K N K < N ¬ K + J < N 0 K + J - N
93 81 79 anim12ci J 0 J < N K N K < N K J
94 83 83 jca N N N
95 94 3ad2ant2 K N K < N N N
96 95 adantl J 0 J < N K N K < N N N
97 simpr J 0 J < N J < N
98 simp3 K N K < N K < N
99 97 98 anim12ci J 0 J < N K N K < N K < N J < N
100 93 96 99 jca31 J 0 J < N K N K < N K J N N K < N J < N
101 lt2add K J N N K < N J < N K + J < N + N
102 101 imp K J N N K < N J < N K + J < N + N
103 100 102 syl J 0 J < N K N K < N K + J < N + N
104 79 81 6 syl2anr J 0 J < N K N K < N K + J
105 ltsubadd K + J N N K + J - N < N K + J < N + N
106 104 85 85 105 syl3anc J 0 J < N K N K < N K + J - N < N K + J < N + N
107 103 106 mpbird J 0 J < N K N K < N K + J - N < N
108 92 107 jctird J 0 J < N K N K < N ¬ K + J < N 0 K + J - N K + J - N < N
109 108 ex J 0 J < N K N K < N ¬ K + J < N 0 K + J - N K + J - N < N
110 14 109 syl5bi J 0 J < N K 1 ..^ N ¬ K + J < N 0 K + J - N K + J - N < N
111 110 3adant2 J 0 N J < N K 1 ..^ N ¬ K + J < N 0 K + J - N K + J - N < N
112 1 111 sylbi J 0 ..^ N K 1 ..^ N ¬ K + J < N 0 K + J - N K + J - N < N
113 112 imp J 0 ..^ N K 1 ..^ N ¬ K + J < N 0 K + J - N K + J - N < N
114 113 impcom ¬ K + J < N J 0 ..^ N K 1 ..^ N 0 K + J - N K + J - N < N
115 73 77 114 jca31 ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N N + 0 K + J - N K + J - N < N
116 modid K + J - N N + 0 K + J - N K + J - N < N K + J - N mod N = K + J - N
117 115 116 syl ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N mod N = K + J - N
118 66 117 eqtrd ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J + -1 N mod N = K + J - N
119 118 eqcomd ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N = K + J + -1 N mod N
120 1 9 sylbi J 0 ..^ N N +
121 120 adantr J 0 ..^ N K 1 ..^ N N +
122 neg1z 1
123 122 a1i ¬ K + J < N J 0 ..^ N K 1 ..^ N 1
124 modcyc K + J N + 1 K + J + -1 N mod N = K + J mod N
125 69 121 123 124 syl2an23an ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J + -1 N mod N = K + J mod N
126 119 125 eqtrd ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N = K + J mod N
127 126 eqcomd ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J mod N = K + J - N
128 52 adantr J 0 ..^ N K 1 ..^ N N
129 59 128 zsubcld J 0 ..^ N K 1 ..^ N K + J - N
130 129 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N
131 3 adantl J 0 ..^ N K 1 ..^ N K
132 35 zred J 0 ..^ N J
133 132 adantr J 0 ..^ N K 1 ..^ N J
134 90 biimprd K J N N K + J 0 K + J - N
135 88 134 sylbird K J N ¬ K + J < N 0 K + J - N
136 131 133 71 135 syl3anc J 0 ..^ N K 1 ..^ N ¬ K + J < N 0 K + J - N
137 136 impcom ¬ K + J < N J 0 ..^ N K 1 ..^ N 0 K + J - N
138 elnn0z K + J - N 0 K + J - N 0 K + J - N
139 130 137 138 sylanbrc ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N 0
140 28 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N N
141 100 expcom K N K < N J 0 J < N K J N N K < N J < N
142 14 141 sylbi K 1 ..^ N J 0 J < N K J N N K < N J < N
143 142 com12 J 0 J < N K 1 ..^ N K J N N K < N J < N
144 143 3adant2 J 0 N J < N K 1 ..^ N K J N N K < N J < N
145 1 144 sylbi J 0 ..^ N K 1 ..^ N K J N N K < N J < N
146 145 imp J 0 ..^ N K 1 ..^ N K J N N K < N J < N
147 146 102 syl J 0 ..^ N K 1 ..^ N K + J < N + N
148 4 adantr J 0 N J
149 3 148 6 syl2anr J 0 N K 1 ..^ N K + J
150 83 adantl J 0 N N
151 150 adantr J 0 N K 1 ..^ N N
152 149 151 151 3jca J 0 N K 1 ..^ N K + J N N
153 152 ex J 0 N K 1 ..^ N K + J N N
154 153 3adant3 J 0 N J < N K 1 ..^ N K + J N N
155 1 154 sylbi J 0 ..^ N K 1 ..^ N K + J N N
156 155 imp J 0 ..^ N K 1 ..^ N K + J N N
157 156 105 syl J 0 ..^ N K 1 ..^ N K + J - N < N K + J < N + N
158 147 157 mpbird J 0 ..^ N K 1 ..^ N K + J - N < N
159 158 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N < N
160 elfzo0 K + J - N 0 ..^ N K + J - N 0 N K + J - N < N
161 139 140 159 160 syl3anbrc ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N 0 ..^ N
162 nncn K K
163 nncn N N
164 subcl K N K N
165 162 163 164 syl2an K N K N
166 165 3adant3 K N K < N K N
167 14 166 sylbi K 1 ..^ N K N
168 167 adantl J 0 ..^ N K 1 ..^ N K N
169 168 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N K N
170 0cnd ¬ K + J < N J 0 ..^ N K 1 ..^ N 0
171 37 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N J
172 elfzoel2 K 1 ..^ N N
173 172 zcnd K 1 ..^ N N
174 79 98 ltned K N K < N K N
175 14 174 sylbi K 1 ..^ N K N
176 32 173 175 subne0d K 1 ..^ N K N 0
177 176 adantl J 0 ..^ N K 1 ..^ N K N 0
178 177 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N K N 0
179 169 170 171 178 addneintr2d ¬ K + J < N J 0 ..^ N K 1 ..^ N K - N + J 0 + J
180 33 37 54 3jca J 0 ..^ N K 1 ..^ N K J N
181 180 adantl ¬ K + J < N J 0 ..^ N K 1 ..^ N K J N
182 addsub K J N K + J - N = K - N + J
183 181 182 syl ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N = K - N + J
184 171 45 syl ¬ K + J < N J 0 ..^ N K 1 ..^ N 0 + J = J
185 184 eqcomd ¬ K + J < N J 0 ..^ N K 1 ..^ N J = 0 + J
186 179 183 185 3netr4d ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N J
187 eldifsn K + J - N 0 ..^ N J K + J - N 0 ..^ N K + J - N J
188 161 186 187 sylanbrc ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J - N 0 ..^ N J
189 127 188 eqeltrd ¬ K + J < N J 0 ..^ N K 1 ..^ N K + J mod N 0 ..^ N J
190 51 189 pm2.61ian J 0 ..^ N K 1 ..^ N K + J mod N 0 ..^ N J