Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ballotlemfc0 Structured version   Visualization version   GIF version

Theorem ballotlemfc0 31860
Description: 𝐹 takes value 0 between negative and positive values. (Contributed by Thierry Arnoux, 24-Nov-2016.)
Hypotheses
Ref Expression
ballotth.m 𝑀 ∈ ℕ
ballotth.n 𝑁 ∈ ℕ
ballotth.o 𝑂 = {𝑐 ∈ 𝒫 (1...(𝑀 + 𝑁)) ∣ (♯‘𝑐) = 𝑀}
ballotth.p 𝑃 = (𝑥 ∈ 𝒫 𝑂 ↦ ((♯‘𝑥) / (♯‘𝑂)))
ballotth.f 𝐹 = (𝑐𝑂 ↦ (𝑖 ∈ ℤ ↦ ((♯‘((1...𝑖) ∩ 𝑐)) − (♯‘((1...𝑖) ∖ 𝑐)))))
ballotlemfp1.c (𝜑𝐶𝑂)
ballotlemfp1.j (𝜑𝐽 ∈ ℕ)
ballotlemfc0.3 (𝜑 → ∃𝑖 ∈ (1...𝐽)((𝐹𝐶)‘𝑖) ≤ 0)
ballotlemfc0.4 (𝜑 → 0 < ((𝐹𝐶)‘𝐽))
Assertion
Ref Expression
ballotlemfc0 (𝜑 → ∃𝑘 ∈ (1...𝐽)((𝐹𝐶)‘𝑘) = 0)
Distinct variable groups:   𝑀,𝑐   𝑁,𝑐   𝑂,𝑐   𝑖,𝑀   𝑖,𝑁   𝑖,𝑂   𝑘,𝑀   𝑘,𝑁   𝑘,𝑂   𝑖,𝑐,𝐹   𝑘,𝐹   𝐶,𝑖   𝑖,𝐽   𝜑,𝑖,𝑘   𝑘,𝐽   𝐶,𝑘   𝜑,𝑘
Allowed substitution hints:   𝜑(𝑥,𝑐)   𝐶(𝑥,𝑐)   𝑃(𝑥,𝑖,𝑘,𝑐)   𝐹(𝑥)   𝐽(𝑥,𝑐)   𝑀(𝑥)   𝑁(𝑥)   𝑂(𝑥)

Proof of Theorem ballotlemfc0
Dummy variable 𝑗 is distinct from all other variables.
StepHypRef Expression
1 fveq2 6645 . . . . . . 7 (𝑖 = 𝑘 → ((𝐹𝐶)‘𝑖) = ((𝐹𝐶)‘𝑘))
21breq1d 5040 . . . . . 6 (𝑖 = 𝑘 → (((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝑘) ≤ 0))
32elrab 3628 . . . . 5 (𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ↔ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0))
43anbi1i 626 . . . 4 ((𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘) ↔ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘))
5 simprlr 779 . . . . 5 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) ≤ 0)
6 simprl 770 . . . . . . . . . 10 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → 𝑘 ∈ (1...𝐽))
76adantrr 716 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → 𝑘 ∈ (1...𝐽))
8 fzssuz 12943 . . . . . . . . . . . . . 14 (1...𝐽) ⊆ (ℤ‘1)
9 uzssz 12252 . . . . . . . . . . . . . 14 (ℤ‘1) ⊆ ℤ
108, 9sstri 3924 . . . . . . . . . . . . 13 (1...𝐽) ⊆ ℤ
11 zssre 11976 . . . . . . . . . . . . 13 ℤ ⊆ ℝ
1210, 11sstri 3924 . . . . . . . . . . . 12 (1...𝐽) ⊆ ℝ
1312sseli 3911 . . . . . . . . . . 11 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ ℝ)
1413ltp1d 11559 . . . . . . . . . 10 (𝑘 ∈ (1...𝐽) → 𝑘 < (𝑘 + 1))
15 1red 10631 . . . . . . . . . . . 12 (𝑘 ∈ (1...𝐽) → 1 ∈ ℝ)
1613, 15readdcld 10659 . . . . . . . . . . 11 (𝑘 ∈ (1...𝐽) → (𝑘 + 1) ∈ ℝ)
1713, 16ltnled 10776 . . . . . . . . . 10 (𝑘 ∈ (1...𝐽) → (𝑘 < (𝑘 + 1) ↔ ¬ (𝑘 + 1) ≤ 𝑘))
1814, 17mpbid 235 . . . . . . . . 9 (𝑘 ∈ (1...𝐽) → ¬ (𝑘 + 1) ≤ 𝑘)
197, 18syl 17 . . . . . . . 8 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ¬ (𝑘 + 1) ≤ 𝑘)
20 simprr 772 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)
21 ballotlemfc0.4 . . . . . . . . . . . . . . . 16 (𝜑 → 0 < ((𝐹𝐶)‘𝐽))
2221adantr 484 . . . . . . . . . . . . . . 15 ((𝜑𝑘 = 𝐽) → 0 < ((𝐹𝐶)‘𝐽))
23 simpr 488 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 = 𝐽) → 𝑘 = 𝐽)
2423fveq2d 6649 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 = 𝐽) → ((𝐹𝐶)‘𝑘) = ((𝐹𝐶)‘𝐽))
2524breq2d 5042 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 = 𝐽) → (0 < ((𝐹𝐶)‘𝑘) ↔ 0 < ((𝐹𝐶)‘𝐽)))
26 ballotlemfp1.j . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝐽 ∈ ℕ)
27 elnnuz 12270 . . . . . . . . . . . . . . . . . . . . . 22 (𝐽 ∈ ℕ ↔ 𝐽 ∈ (ℤ‘1))
2826, 27sylib 221 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐽 ∈ (ℤ‘1))
29 eluzfz2 12910 . . . . . . . . . . . . . . . . . . . . 21 (𝐽 ∈ (ℤ‘1) → 𝐽 ∈ (1...𝐽))
3028, 29syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐽 ∈ (1...𝐽))
31 eleq1 2877 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝐽 → (𝑘 ∈ (1...𝐽) ↔ 𝐽 ∈ (1...𝐽)))
3230, 31syl5ibrcom 250 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑘 = 𝐽𝑘 ∈ (1...𝐽)))
3332anc2li 559 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑘 = 𝐽 → (𝜑𝑘 ∈ (1...𝐽))))
34 1eluzge0 12280 . . . . . . . . . . . . . . . . . . . 20 1 ∈ (ℤ‘0)
35 fzss1 12941 . . . . . . . . . . . . . . . . . . . . 21 (1 ∈ (ℤ‘0) → (1...𝐽) ⊆ (0...𝐽))
3635sseld 3914 . . . . . . . . . . . . . . . . . . . 20 (1 ∈ (ℤ‘0) → (𝑘 ∈ (1...𝐽) → 𝑘 ∈ (0...𝐽)))
3734, 36ax-mp 5 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ (0...𝐽))
38 0red 10633 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ (0...𝐽)) → 0 ∈ ℝ)
39 ballotth.m . . . . . . . . . . . . . . . . . . . . . 22 𝑀 ∈ ℕ
40 ballotth.n . . . . . . . . . . . . . . . . . . . . . 22 𝑁 ∈ ℕ
41 ballotth.o . . . . . . . . . . . . . . . . . . . . . 22 𝑂 = {𝑐 ∈ 𝒫 (1...(𝑀 + 𝑁)) ∣ (♯‘𝑐) = 𝑀}
42 ballotth.p . . . . . . . . . . . . . . . . . . . . . 22 𝑃 = (𝑥 ∈ 𝒫 𝑂 ↦ ((♯‘𝑥) / (♯‘𝑂)))
43 ballotth.f . . . . . . . . . . . . . . . . . . . . . 22 𝐹 = (𝑐𝑂 ↦ (𝑖 ∈ ℤ ↦ ((♯‘((1...𝑖) ∩ 𝑐)) − (♯‘((1...𝑖) ∖ 𝑐)))))
44 ballotlemfp1.c . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑𝐶𝑂)
4544adantr 484 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘 ∈ (0...𝐽)) → 𝐶𝑂)
46 elfzelz 12902 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 ∈ (0...𝐽) → 𝑘 ∈ ℤ)
4746adantl 485 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘 ∈ (0...𝐽)) → 𝑘 ∈ ℤ)
4839, 40, 41, 42, 43, 45, 47ballotlemfelz 31858 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘 ∈ (0...𝐽)) → ((𝐹𝐶)‘𝑘) ∈ ℤ)
4948zred 12075 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ (0...𝐽)) → ((𝐹𝐶)‘𝑘) ∈ ℝ)
5038, 49ltnled 10776 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ (0...𝐽)) → (0 < ((𝐹𝐶)‘𝑘) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5137, 50sylan2 595 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ (1...𝐽)) → (0 < ((𝐹𝐶)‘𝑘) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5233, 51syl6 35 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑘 = 𝐽 → (0 < ((𝐹𝐶)‘𝑘) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0)))
5352imp 410 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 = 𝐽) → (0 < ((𝐹𝐶)‘𝑘) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5425, 53bitr3d 284 . . . . . . . . . . . . . . 15 ((𝜑𝑘 = 𝐽) → (0 < ((𝐹𝐶)‘𝐽) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5522, 54mpbid 235 . . . . . . . . . . . . . 14 ((𝜑𝑘 = 𝐽) → ¬ ((𝐹𝐶)‘𝑘) ≤ 0)
5655ex 416 . . . . . . . . . . . . 13 (𝜑 → (𝑘 = 𝐽 → ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5756con2d 136 . . . . . . . . . . . 12 (𝜑 → (((𝐹𝐶)‘𝑘) ≤ 0 → ¬ 𝑘 = 𝐽))
58 nn1m1nn 11646 . . . . . . . . . . . . . . . . . . . . 21 (𝐽 ∈ ℕ → (𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ))
5926, 58syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ))
60 ballotlemfc0.3 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ∃𝑖 ∈ (1...𝐽)((𝐹𝐶)‘𝑖) ≤ 0)
6160adantr 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝐽 = 1) → ∃𝑖 ∈ (1...𝐽)((𝐹𝐶)‘𝑖) ≤ 0)
62 oveq1 7142 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝐽 = 1 → (𝐽...𝐽) = (1...𝐽))
6362adantl 485 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝐽 = 1) → (𝐽...𝐽) = (1...𝐽))
6426nnzd 12074 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝐽 ∈ ℤ)
65 fzsn 12944 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝐽 ∈ ℤ → (𝐽...𝐽) = {𝐽})
6664, 65syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (𝐽...𝐽) = {𝐽})
6766adantr 484 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝐽 = 1) → (𝐽...𝐽) = {𝐽})
6863, 67eqtr3d 2835 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝐽 = 1) → (1...𝐽) = {𝐽})
6968rexeqdv 3365 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝐽 = 1) → (∃𝑖 ∈ (1...𝐽)((𝐹𝐶)‘𝑖) ≤ 0 ↔ ∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0))
7061, 69mpbid 235 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝐽 = 1) → ∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0)
71 fveq2 6645 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖 = 𝐽 → ((𝐹𝐶)‘𝑖) = ((𝐹𝐶)‘𝐽))
7271breq1d 5040 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑖 = 𝐽 → (((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝐽) ≤ 0))
7372rexsng 4574 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝐽 ∈ ℕ → (∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝐽) ≤ 0))
7426, 73syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝐽) ≤ 0))
7574adantr 484 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝐽 = 1) → (∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝐽) ≤ 0))
7670, 75mpbid 235 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝐽 = 1) → ((𝐹𝐶)‘𝐽) ≤ 0)
7721adantr 484 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝐽 = 1) → 0 < ((𝐹𝐶)‘𝐽))
78 0red 10633 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → 0 ∈ ℝ)
7939, 40, 41, 42, 43, 44, 64ballotlemfelz 31858 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → ((𝐹𝐶)‘𝐽) ∈ ℤ)
8079zred 12075 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ((𝐹𝐶)‘𝐽) ∈ ℝ)
8178, 80ltnled 10776 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (0 < ((𝐹𝐶)‘𝐽) ↔ ¬ ((𝐹𝐶)‘𝐽) ≤ 0))
8281adantr 484 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝐽 = 1) → (0 < ((𝐹𝐶)‘𝐽) ↔ ¬ ((𝐹𝐶)‘𝐽) ≤ 0))
8377, 82mpbid 235 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝐽 = 1) → ¬ ((𝐹𝐶)‘𝐽) ≤ 0)
8476, 83pm2.65da 816 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ¬ 𝐽 = 1)
85 biortn 935 . . . . . . . . . . . . . . . . . . . . . 22 𝐽 = 1 → ((𝐽 − 1) ∈ ℕ ↔ (¬ ¬ 𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ)))
8684, 85syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝐽 − 1) ∈ ℕ ↔ (¬ ¬ 𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ)))
87 notnotb 318 . . . . . . . . . . . . . . . . . . . . . 22 (𝐽 = 1 ↔ ¬ ¬ 𝐽 = 1)
8887orbi1i 911 . . . . . . . . . . . . . . . . . . . . 21 ((𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ) ↔ (¬ ¬ 𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ))
8986, 88syl6bbr 292 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝐽 − 1) ∈ ℕ ↔ (𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ)))
9059, 89mpbird 260 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐽 − 1) ∈ ℕ)
91 elnnuz 12270 . . . . . . . . . . . . . . . . . . 19 ((𝐽 − 1) ∈ ℕ ↔ (𝐽 − 1) ∈ (ℤ‘1))
9290, 91sylib 221 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝐽 − 1) ∈ (ℤ‘1))
93 elfzp1 12952 . . . . . . . . . . . . . . . . . 18 ((𝐽 − 1) ∈ (ℤ‘1) → (𝑘 ∈ (1...((𝐽 − 1) + 1)) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = ((𝐽 − 1) + 1))))
9492, 93syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑘 ∈ (1...((𝐽 − 1) + 1)) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = ((𝐽 − 1) + 1))))
9526nncnd 11641 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐽 ∈ ℂ)
96 1cnd 10625 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ∈ ℂ)
9795, 96npcand 10990 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝐽 − 1) + 1) = 𝐽)
9897oveq2d 7151 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1...((𝐽 − 1) + 1)) = (1...𝐽))
9998eleq2d 2875 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑘 ∈ (1...((𝐽 − 1) + 1)) ↔ 𝑘 ∈ (1...𝐽)))
10097eqeq2d 2809 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑘 = ((𝐽 − 1) + 1) ↔ 𝑘 = 𝐽))
101100orbi2d 913 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = ((𝐽 − 1) + 1)) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = 𝐽)))
10294, 99, 1013bitr3d 312 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑘 ∈ (1...𝐽) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = 𝐽)))
103 orcom 867 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = 𝐽) ↔ (𝑘 = 𝐽𝑘 ∈ (1...(𝐽 − 1))))
104102, 103syl6bb 290 . . . . . . . . . . . . . . 15 (𝜑 → (𝑘 ∈ (1...𝐽) ↔ (𝑘 = 𝐽𝑘 ∈ (1...(𝐽 − 1)))))
105104biimpd 232 . . . . . . . . . . . . . 14 (𝜑 → (𝑘 ∈ (1...𝐽) → (𝑘 = 𝐽𝑘 ∈ (1...(𝐽 − 1)))))
106 pm5.6 999 . . . . . . . . . . . . . 14 (((𝑘 ∈ (1...𝐽) ∧ ¬ 𝑘 = 𝐽) → 𝑘 ∈ (1...(𝐽 − 1))) ↔ (𝑘 ∈ (1...𝐽) → (𝑘 = 𝐽𝑘 ∈ (1...(𝐽 − 1)))))
107105, 106sylibr 237 . . . . . . . . . . . . 13 (𝜑 → ((𝑘 ∈ (1...𝐽) ∧ ¬ 𝑘 = 𝐽) → 𝑘 ∈ (1...(𝐽 − 1))))
10890nnzd 12074 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐽 − 1) ∈ ℤ)
109 1z 12000 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℤ
110108, 109jctil 523 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1 ∈ ℤ ∧ (𝐽 − 1) ∈ ℤ))
111 elfzelz 12902 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...(𝐽 − 1)) → 𝑘 ∈ ℤ)
112111, 109jctir 524 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...(𝐽 − 1)) → (𝑘 ∈ ℤ ∧ 1 ∈ ℤ))
113 fzaddel 12936 . . . . . . . . . . . . . . . . . 18 (((1 ∈ ℤ ∧ (𝐽 − 1) ∈ ℤ) ∧ (𝑘 ∈ ℤ ∧ 1 ∈ ℤ)) → (𝑘 ∈ (1...(𝐽 − 1)) ↔ (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1))))
114110, 112, 113syl2an 598 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 ∈ (1...(𝐽 − 1)) ↔ (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1))))
115114biimp3a 1466 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ (1...(𝐽 − 1)) ∧ 𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)))
1161153anidm23 1418 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)))
117 1p1e2 11750 . . . . . . . . . . . . . . . . . . . 20 (1 + 1) = 2
118117a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (1 + 1) = 2)
119118, 97oveq12d 7153 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((1 + 1)...((𝐽 − 1) + 1)) = (2...𝐽))
120119eleq2d 2875 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)) ↔ (𝑘 + 1) ∈ (2...𝐽)))
121 2eluzge1 12282 . . . . . . . . . . . . . . . . . . 19 2 ∈ (ℤ‘1)
122 fzss1 12941 . . . . . . . . . . . . . . . . . . 19 (2 ∈ (ℤ‘1) → (2...𝐽) ⊆ (1...𝐽))
123121, 122ax-mp 5 . . . . . . . . . . . . . . . . . 18 (2...𝐽) ⊆ (1...𝐽)
124123sseli 3911 . . . . . . . . . . . . . . . . 17 ((𝑘 + 1) ∈ (2...𝐽) → (𝑘 + 1) ∈ (1...𝐽))
125120, 124syl6bi 256 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)) → (𝑘 + 1) ∈ (1...𝐽)))
126125adantr 484 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ (1...(𝐽 − 1))) → ((𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)) → (𝑘 + 1) ∈ (1...𝐽)))
127116, 126mpd 15 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 + 1) ∈ (1...𝐽))
128127ex 416 . . . . . . . . . . . . 13 (𝜑 → (𝑘 ∈ (1...(𝐽 − 1)) → (𝑘 + 1) ∈ (1...𝐽)))
129107, 128syld 47 . . . . . . . . . . . 12 (𝜑 → ((𝑘 ∈ (1...𝐽) ∧ ¬ 𝑘 = 𝐽) → (𝑘 + 1) ∈ (1...𝐽)))
13057, 129sylan2d 607 . . . . . . . . . . 11 (𝜑 → ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) → (𝑘 + 1) ∈ (1...𝐽)))
131130imp 410 . . . . . . . . . 10 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → (𝑘 + 1) ∈ (1...𝐽))
132131adantrr 716 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (𝑘 + 1) ∈ (1...𝐽))
133 fveq2 6645 . . . . . . . . . . . . . 14 (𝑖 = (𝑘 + 1) → ((𝐹𝐶)‘𝑖) = ((𝐹𝐶)‘(𝑘 + 1)))
134133breq1d 5040 . . . . . . . . . . . . 13 (𝑖 = (𝑘 + 1) → (((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0))
135134elrab 3628 . . . . . . . . . . . 12 ((𝑘 + 1) ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ↔ ((𝑘 + 1) ∈ (1...𝐽) ∧ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0))
136 breq1 5033 . . . . . . . . . . . . 13 (𝑗 = (𝑘 + 1) → (𝑗𝑘 ↔ (𝑘 + 1) ≤ 𝑘))
137136rspccva 3570 . . . . . . . . . . . 12 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘 ∧ (𝑘 + 1) ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}) → (𝑘 + 1) ≤ 𝑘)
138135, 137sylan2br 597 . . . . . . . . . . 11 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘 ∧ ((𝑘 + 1) ∈ (1...𝐽) ∧ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0)) → (𝑘 + 1) ≤ 𝑘)
139138expr 460 . . . . . . . . . 10 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (((𝐹𝐶)‘(𝑘 + 1)) ≤ 0 → (𝑘 + 1) ≤ 𝑘))
140139con3d 155 . . . . . . . . 9 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (¬ (𝑘 + 1) ≤ 𝑘 → ¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0))
14120, 132, 140syl2anc 587 . . . . . . . 8 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (¬ (𝑘 + 1) ≤ 𝑘 → ¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0))
14219, 141mpd 15 . . . . . . 7 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0)
143 simplrr 777 . . . . . . . . . . 11 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)
144132adantr 484 . . . . . . . . . . 11 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ∈ (1...𝐽))
145 simpll 766 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 𝜑)
146131adantr 484 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ∈ (1...𝐽))
14735sseld 3914 . . . . . . . . . . . . . . 15 (1 ∈ (ℤ‘0) → ((𝑘 + 1) ∈ (1...𝐽) → (𝑘 + 1) ∈ (0...𝐽)))
14834, 146, 147mpsyl 68 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ∈ (0...𝐽))
14944adantr 484 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → 𝐶𝑂)
150 elfzelz 12902 . . . . . . . . . . . . . . . . 17 ((𝑘 + 1) ∈ (0...𝐽) → (𝑘 + 1) ∈ ℤ)
151150adantl 485 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → (𝑘 + 1) ∈ ℤ)
15239, 40, 41, 42, 43, 149, 151ballotlemfelz 31858 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → ((𝐹𝐶)‘(𝑘 + 1)) ∈ ℤ)
153152zred 12075 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → ((𝐹𝐶)‘(𝑘 + 1)) ∈ ℝ)
154145, 148, 153syl2anc 587 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) ∈ ℝ)
155 0red 10633 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 0 ∈ ℝ)
156 simplrr 777 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘𝑘) ≤ 0)
1576adantr 484 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 𝑘 ∈ (1...𝐽))
158157, 37syl 17 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 𝑘 ∈ (0...𝐽))
159130imdistani 572 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → (𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)))
16044adantr 484 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → 𝐶𝑂)
161 elfznn 12931 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 + 1) ∈ (1...𝐽) → (𝑘 + 1) ∈ ℕ)
162161adantl 485 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (𝑘 + 1) ∈ ℕ)
16339, 40, 41, 42, 43, 160, 162ballotlemfp1 31859 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → ((¬ (𝑘 + 1) ∈ 𝐶 → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1)) ∧ ((𝑘 + 1) ∈ 𝐶 → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1))))
164163simpld 498 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (¬ (𝑘 + 1) ∈ 𝐶 → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1)))
165164imp 410 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1))
166159, 165sylan 583 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1))
167 elfzelz 12902 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ ℤ)
168167zcnd 12076 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ ℂ)
169 1cnd 10625 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝐽) → 1 ∈ ℂ)
170168, 169pncand 10987 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ (1...𝐽) → ((𝑘 + 1) − 1) = 𝑘)
171170fveq2d 6649 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...𝐽) → ((𝐹𝐶)‘((𝑘 + 1) − 1)) = ((𝐹𝐶)‘𝑘))
172171oveq1d 7150 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...𝐽) → (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1) = (((𝐹𝐶)‘𝑘) − 1))
173172eqeq2d 2809 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (1...𝐽) → (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1) ↔ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)))
174157, 173syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1) ↔ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)))
175166, 174mpbid 235 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1))
176 0z 11980 . . . . . . . . . . . . . . . . . 18 0 ∈ ℤ
177 zlem1lt 12022 . . . . . . . . . . . . . . . . . 18 ((((𝐹𝐶)‘𝑘) ∈ ℤ ∧ 0 ∈ ℤ) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
17848, 176, 177sylancl 589 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ (0...𝐽)) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
179178adantr 484 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ (0...𝐽)) ∧ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
180 breq1 5033 . . . . . . . . . . . . . . . . 17 (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1) → (((𝐹𝐶)‘(𝑘 + 1)) < 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
181180adantl 485 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ (0...𝐽)) ∧ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)) → (((𝐹𝐶)‘(𝑘 + 1)) < 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
182179, 181bitr4d 285 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ (0...𝐽)) ∧ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ ((𝐹𝐶)‘(𝑘 + 1)) < 0))
183145, 158, 175, 182syl21anc 836 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ ((𝐹𝐶)‘(𝑘 + 1)) < 0))
184156, 183mpbid 235 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) < 0)
185154, 155, 184ltled 10777 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0)
186185adantlrr 720 . . . . . . . . . . 11 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0)
187143, 144, 186, 138syl12anc 835 . . . . . . . . . 10 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ≤ 𝑘)
18819adantr 484 . . . . . . . . . 10 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ¬ (𝑘 + 1) ≤ 𝑘)
189187, 188condan 817 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (𝑘 + 1) ∈ 𝐶)
190163simprd 499 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → ((𝑘 + 1) ∈ 𝐶 → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1)))
191190imp 410 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1))
192159, 191sylan 583 . . . . . . . . . . 11 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1))
1936adantr 484 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → 𝑘 ∈ (1...𝐽))
194171oveq1d 7150 . . . . . . . . . . . . 13 (𝑘 ∈ (1...𝐽) → (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1) = (((𝐹𝐶)‘𝑘) + 1))
195194eqeq2d 2809 . . . . . . . . . . . 12 (𝑘 ∈ (1...𝐽) → (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1) ↔ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1)))
196193, 195syl 17 . . . . . . . . . . 11 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1) ↔ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1)))
197192, 196mpbid 235 . . . . . . . . . 10 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1))
198197adantlrr 720 . . . . . . . . 9 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1))
199189, 198mpdan 686 . . . . . . . 8 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1))
200 breq1 5033 . . . . . . . . 9 (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1) → (((𝐹𝐶)‘(𝑘 + 1)) ≤ 0 ↔ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
201200notbid 321 . . . . . . . 8 (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1) → (¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0 ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
202199, 201syl 17 . . . . . . 7 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0 ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
203142, 202mpbid 235 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0)
2046, 37syl 17 . . . . . . . . 9 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → 𝑘 ∈ (0...𝐽))
205204, 48syldan 594 . . . . . . . 8 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → ((𝐹𝐶)‘𝑘) ∈ ℤ)
206205adantrr 716 . . . . . . 7 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) ∈ ℤ)
207 zleltp1 12021 . . . . . . . . 9 ((0 ∈ ℤ ∧ ((𝐹𝐶)‘𝑘) ∈ ℤ) → (0 ≤ ((𝐹𝐶)‘𝑘) ↔ 0 < (((𝐹𝐶)‘𝑘) + 1)))
208176, 207mpan 689 . . . . . . . 8 (((𝐹𝐶)‘𝑘) ∈ ℤ → (0 ≤ ((𝐹𝐶)‘𝑘) ↔ 0 < (((𝐹𝐶)‘𝑘) + 1)))
209 0red 10633 . . . . . . . . 9 (((𝐹𝐶)‘𝑘) ∈ ℤ → 0 ∈ ℝ)
210 zre 11973 . . . . . . . . . 10 (((𝐹𝐶)‘𝑘) ∈ ℤ → ((𝐹𝐶)‘𝑘) ∈ ℝ)
211 1red 10631 . . . . . . . . . 10 (((𝐹𝐶)‘𝑘) ∈ ℤ → 1 ∈ ℝ)
212210, 211readdcld 10659 . . . . . . . . 9 (((𝐹𝐶)‘𝑘) ∈ ℤ → (((𝐹𝐶)‘𝑘) + 1) ∈ ℝ)
213209, 212ltnled 10776 . . . . . . . 8 (((𝐹𝐶)‘𝑘) ∈ ℤ → (0 < (((𝐹𝐶)‘𝑘) + 1) ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
214208, 213bitrd 282 . . . . . . 7 (((𝐹𝐶)‘𝑘) ∈ ℤ → (0 ≤ ((𝐹𝐶)‘𝑘) ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
215206, 214syl 17 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (0 ≤ ((𝐹𝐶)‘𝑘) ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
216203, 215mpbird 260 . . . . 5 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → 0 ≤ ((𝐹𝐶)‘𝑘))
217206zred 12075 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) ∈ ℝ)
218 0red 10633 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → 0 ∈ ℝ)
219217, 218letri3d 10771 . . . . 5 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (((𝐹𝐶)‘𝑘) = 0 ↔ (((𝐹𝐶)‘𝑘) ≤ 0 ∧ 0 ≤ ((𝐹𝐶)‘𝑘))))
2205, 216, 219mpbir2and 712 . . . 4 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) = 0)
2214, 220sylan2b 596 . . 3 ((𝜑 ∧ (𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) = 0)
222 ssrab2 4007 . . . . . 6 {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ (1...𝐽)
223222, 12sstri 3924 . . . . 5 {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ ℝ
224223a1i 11 . . . 4 (𝜑 → {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ ℝ)
225 fzfi 13335 . . . . . 6 (1...𝐽) ∈ Fin
226 ssfi 8722 . . . . . 6 (((1...𝐽) ∈ Fin ∧ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ (1...𝐽)) → {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∈ Fin)
227225, 222, 226mp2an 691 . . . . 5 {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∈ Fin
228227a1i 11 . . . 4 (𝜑 → {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∈ Fin)
229 rabn0 4293 . . . . 5 ({𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ≠ ∅ ↔ ∃𝑖 ∈ (1...𝐽)((𝐹𝐶)‘𝑖) ≤ 0)
23060, 229sylibr 237 . . . 4 (𝜑 → {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ≠ ∅)
231 fimaxre 11573 . . . 4 (({𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ ℝ ∧ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∈ Fin ∧ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ≠ ∅) → ∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)
232224, 228, 230, 231syl3anc 1368 . . 3 (𝜑 → ∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)
233221, 232reximddv 3234 . 2 (𝜑 → ∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ((𝐹𝐶)‘𝑘) = 0)
234 elrabi 3623 . . . 4 (𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} → 𝑘 ∈ (1...𝐽))
235234anim1i 617 . . 3 ((𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∧ ((𝐹𝐶)‘𝑘) = 0) → (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) = 0))
236235reximi2 3207 . 2 (∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ((𝐹𝐶)‘𝑘) = 0 → ∃𝑘 ∈ (1...𝐽)((𝐹𝐶)‘𝑘) = 0)
237233, 236syl 17 1 (𝜑 → ∃𝑘 ∈ (1...𝐽)((𝐹𝐶)‘𝑘) = 0)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  wo 844   = wceq 1538  wcel 2111  wne 2987  wral 3106  wrex 3107  {crab 3110  cdif 3878  cin 3880  wss 3881  c0 4243  𝒫 cpw 4497  {csn 4525   class class class wbr 5030  cmpt 5110  cfv 6324  (class class class)co 7135  Fincfn 8492  cr 10525  0cc0 10526  1c1 10527   + caddc 10529   < clt 10664  cle 10665  cmin 10859   / cdiv 11286  cn 11625  2c2 11680  cz 11969  cuz 12231  ...cfz 12885  chash 13686
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-rep 5154  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7441  ax-cnex 10582  ax-resscn 10583  ax-1cn 10584  ax-icn 10585  ax-addcl 10586  ax-addrcl 10587  ax-mulcl 10588  ax-mulrcl 10589  ax-mulcom 10590  ax-addass 10591  ax-mulass 10592  ax-distr 10593  ax-i2m1 10594  ax-1ne0 10595  ax-1rid 10596  ax-rnegex 10597  ax-rrecex 10598  ax-cnre 10599  ax-pre-lttri 10600  ax-pre-lttrn 10601  ax-pre-ltadd 10602  ax-pre-mulgt0 10603
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-nel 3092  df-ral 3111  df-rex 3112  df-reu 3113  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-pss 3900  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-tp 4530  df-op 4532  df-uni 4801  df-int 4839  df-iun 4883  df-br 5031  df-opab 5093  df-mpt 5111  df-tr 5137  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  df-we 5480  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-pred 6116  df-ord 6162  df-on 6163  df-lim 6164  df-suc 6165  df-iota 6283  df-fun 6326  df-fn 6327  df-f 6328  df-f1 6329  df-fo 6330  df-f1o 6331  df-fv 6332  df-riota 7093  df-ov 7138  df-oprab 7139  df-mpo 7140  df-om 7561  df-1st 7671  df-2nd 7672  df-wrecs 7930  df-recs 7991  df-rdg 8029  df-1o 8085  df-oadd 8089  df-er 8272  df-en 8493  df-dom 8494  df-sdom 8495  df-fin 8496  df-dju 9314  df-card 9352  df-pnf 10666  df-mnf 10667  df-xr 10668  df-ltxr 10669  df-le 10670  df-sub 10861  df-neg 10862  df-nn 11626  df-2 11688  df-n0 11886  df-z 11970  df-uz 12232  df-fz 12886  df-hash 13687
This theorem is referenced by:  ballotlem5  31867  ballotlemic  31874
  Copyright terms: Public domain W3C validator