Metamath Proof Explorer


Theorem ballotlemsdom

Description: Domain of S for a given counting C . (Contributed by Thierry Arnoux, 12-Apr-2017)

Ref Expression
Hypotheses ballotth.m M
ballotth.n N
ballotth.o O = c 𝒫 1 M + N | c = M
ballotth.p P = x 𝒫 O x O
ballotth.f F = c O i 1 i c 1 i c
ballotth.e E = c O | i 1 M + N 0 < F c i
ballotth.mgtn N < M
ballotth.i I = c O E sup k 1 M + N | F c k = 0 <
ballotth.s S = c O E i 1 M + N if i I c I c + 1 - i i
Assertion ballotlemsdom C O E J 1 M + N S C J 1 M + N

Proof

Step Hyp Ref Expression
1 ballotth.m M
2 ballotth.n N
3 ballotth.o O = c 𝒫 1 M + N | c = M
4 ballotth.p P = x 𝒫 O x O
5 ballotth.f F = c O i 1 i c 1 i c
6 ballotth.e E = c O | i 1 M + N 0 < F c i
7 ballotth.mgtn N < M
8 ballotth.i I = c O E sup k 1 M + N | F c k = 0 <
9 ballotth.s S = c O E i 1 M + N if i I c I c + 1 - i i
10 1 2 3 4 5 6 7 8 9 ballotlemsv C O E J 1 M + N S C J = if J I C I C + 1 - J J
11 fzssuz 1 M + N 1
12 uzssz 1
13 11 12 sstri 1 M + N
14 1 2 3 4 5 6 7 8 ballotlemiex C O E I C 1 M + N F C I C = 0
15 14 simpld C O E I C 1 M + N
16 13 15 sseldi C O E I C
17 16 ad2antrr C O E J 1 M + N J I C I C
18 nnaddcl M N M + N
19 1 2 18 mp2an M + N
20 19 nnzi M + N
21 20 a1i C O E J 1 M + N J I C M + N
22 15 ad2antrr C O E J 1 M + N J I C I C 1 M + N
23 elfzle2 I C 1 M + N I C M + N
24 22 23 syl C O E J 1 M + N J I C I C M + N
25 eluz2 M + N I C I C M + N I C M + N
26 fzss2 M + N I C 1 I C 1 M + N
27 25 26 sylbir I C M + N I C M + N 1 I C 1 M + N
28 17 21 24 27 syl3anc C O E J 1 M + N J I C 1 I C 1 M + N
29 1zzd C O E J 1 M + N J I C 1
30 simplr C O E J 1 M + N J I C J 1 M + N
31 13 30 sseldi C O E J 1 M + N J I C J
32 elfzle1 J 1 M + N 1 J
33 30 32 syl C O E J 1 M + N J I C 1 J
34 simpr C O E J 1 M + N J I C J I C
35 elfz4 1 I C J 1 J J I C J 1 I C
36 29 17 31 33 34 35 syl32anc C O E J 1 M + N J I C J 1 I C
37 fzrev3i J 1 I C 1 + I C - J 1 I C
38 36 37 syl C O E J 1 M + N J I C 1 + I C - J 1 I C
39 1cnd C O E 1
40 16 zcnd C O E I C
41 39 40 addcomd C O E 1 + I C = I C + 1
42 41 oveq1d C O E 1 + I C - J = I C + 1 - J
43 42 eleq1d C O E 1 + I C - J 1 I C I C + 1 - J 1 I C
44 43 ad2antrr C O E J 1 M + N J I C 1 + I C - J 1 I C I C + 1 - J 1 I C
45 38 44 mpbid C O E J 1 M + N J I C I C + 1 - J 1 I C
46 28 45 sseldd C O E J 1 M + N J I C I C + 1 - J 1 M + N
47 simplr C O E J 1 M + N ¬ J I C J 1 M + N
48 46 47 ifclda C O E J 1 M + N if J I C I C + 1 - J J 1 M + N
49 10 48 eqeltrd C O E J 1 M + N S C J 1 M + N