Metamath Proof Explorer


Theorem ballotlemsgt1

Description: S maps values less than ( IC ) to values greater than 1. (Contributed by Thierry Arnoux, 28-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 ballotlemsgt1 C O E J 1 M + N J < I C 1 < S C J

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 elfzelz J 1 M + N J
11 10 3ad2ant2 C O E J 1 M + N J < I C J
12 11 zred C O E J 1 M + N J < I C J
13 1 2 3 4 5 6 7 8 ballotlemiex C O E I C 1 M + N F C I C = 0
14 13 simpld C O E I C 1 M + N
15 elfzelz I C 1 M + N I C
16 14 15 syl C O E I C
17 16 3ad2ant1 C O E J 1 M + N J < I C I C
18 17 zred C O E J 1 M + N J < I C I C
19 1red C O E J 1 M + N J < I C 1
20 18 19 readdcld C O E J 1 M + N J < I C I C + 1
21 simp3 C O E J 1 M + N J < I C J < I C
22 17 zcnd C O E J 1 M + N J < I C I C
23 1cnd C O E J 1 M + N J < I C 1
24 22 23 pncand C O E J 1 M + N J < I C I C + 1 - 1 = I C
25 21 24 breqtrrd C O E J 1 M + N J < I C J < I C + 1 - 1
26 12 20 19 25 ltsub13d C O E J 1 M + N J < I C 1 < I C + 1 - J
27 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
28 27 3adant3 C O E J 1 M + N J < I C S C J = if J I C I C + 1 - J J
29 12 18 21 ltled C O E J 1 M + N J < I C J I C
30 29 iftrued C O E J 1 M + N J < I C if J I C I C + 1 - J J = I C + 1 - J
31 28 30 eqtrd C O E J 1 M + N J < I C S C J = I C + 1 - J
32 26 31 breqtrrd C O E J 1 M + N J < I C 1 < S C J