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 32920
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 6839 . . . . . . 7 (𝑖 = 𝑘 → ((𝐹𝐶)‘𝑖) = ((𝐹𝐶)‘𝑘))
21breq1d 5113 . . . . . 6 (𝑖 = 𝑘 → (((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝑘) ≤ 0))
32elrab 3643 . . . . 5 (𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ↔ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0))
43anbi1i 624 . . . 4 ((𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘) ↔ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘))
5 simprlr 778 . . . . 5 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) ≤ 0)
6 simprl 769 . . . . . . . . . 10 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → 𝑘 ∈ (1...𝐽))
76adantrr 715 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → 𝑘 ∈ (1...𝐽))
8 fzssuz 13436 . . . . . . . . . . . . . 14 (1...𝐽) ⊆ (ℤ‘1)
9 uzssz 12742 . . . . . . . . . . . . . 14 (ℤ‘1) ⊆ ℤ
108, 9sstri 3951 . . . . . . . . . . . . 13 (1...𝐽) ⊆ ℤ
11 zssre 12464 . . . . . . . . . . . . 13 ℤ ⊆ ℝ
1210, 11sstri 3951 . . . . . . . . . . . 12 (1...𝐽) ⊆ ℝ
1312sseli 3938 . . . . . . . . . . 11 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ ℝ)
1413ltp1d 12043 . . . . . . . . . 10 (𝑘 ∈ (1...𝐽) → 𝑘 < (𝑘 + 1))
15 1red 11114 . . . . . . . . . . . 12 (𝑘 ∈ (1...𝐽) → 1 ∈ ℝ)
1613, 15readdcld 11142 . . . . . . . . . . 11 (𝑘 ∈ (1...𝐽) → (𝑘 + 1) ∈ ℝ)
1713, 16ltnled 11260 . . . . . . . . . 10 (𝑘 ∈ (1...𝐽) → (𝑘 < (𝑘 + 1) ↔ ¬ (𝑘 + 1) ≤ 𝑘))
1814, 17mpbid 231 . . . . . . . . 9 (𝑘 ∈ (1...𝐽) → ¬ (𝑘 + 1) ≤ 𝑘)
197, 18syl 17 . . . . . . . 8 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ¬ (𝑘 + 1) ≤ 𝑘)
20 simprr 771 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)
21 ballotlemfc0.4 . . . . . . . . . . . . . . . 16 (𝜑 → 0 < ((𝐹𝐶)‘𝐽))
2221adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑘 = 𝐽) → 0 < ((𝐹𝐶)‘𝐽))
23 simpr 485 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 = 𝐽) → 𝑘 = 𝐽)
2423fveq2d 6843 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 = 𝐽) → ((𝐹𝐶)‘𝑘) = ((𝐹𝐶)‘𝐽))
2524breq2d 5115 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 = 𝐽) → (0 < ((𝐹𝐶)‘𝑘) ↔ 0 < ((𝐹𝐶)‘𝐽)))
26 ballotlemfp1.j . . . . . . . . . . . . . . . . . . . . . 22 (𝜑𝐽 ∈ ℕ)
27 elnnuz 12761 . . . . . . . . . . . . . . . . . . . . . 22 (𝐽 ∈ ℕ ↔ 𝐽 ∈ (ℤ‘1))
2826, 27sylib 217 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐽 ∈ (ℤ‘1))
29 eluzfz2 13403 . . . . . . . . . . . . . . . . . . . . 21 (𝐽 ∈ (ℤ‘1) → 𝐽 ∈ (1...𝐽))
3028, 29syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐽 ∈ (1...𝐽))
31 eleq1 2825 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝐽 → (𝑘 ∈ (1...𝐽) ↔ 𝐽 ∈ (1...𝐽)))
3230, 31syl5ibrcom 246 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑘 = 𝐽𝑘 ∈ (1...𝐽)))
3332anc2li 556 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑘 = 𝐽 → (𝜑𝑘 ∈ (1...𝐽))))
34 1eluzge0 12771 . . . . . . . . . . . . . . . . . . . 20 1 ∈ (ℤ‘0)
35 fzss1 13434 . . . . . . . . . . . . . . . . . . . . 21 (1 ∈ (ℤ‘0) → (1...𝐽) ⊆ (0...𝐽))
3635sseld 3941 . . . . . . . . . . . . . . . . . . . 20 (1 ∈ (ℤ‘0) → (𝑘 ∈ (1...𝐽) → 𝑘 ∈ (0...𝐽)))
3734, 36ax-mp 5 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ (0...𝐽))
38 0red 11116 . . . . . . . . . . . . . . . . . . . 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 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘 ∈ (0...𝐽)) → 𝐶𝑂)
46 elfzelz 13395 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 ∈ (0...𝐽) → 𝑘 ∈ ℤ)
4746adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘 ∈ (0...𝐽)) → 𝑘 ∈ ℤ)
4839, 40, 41, 42, 43, 45, 47ballotlemfelz 32918 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘 ∈ (0...𝐽)) → ((𝐹𝐶)‘𝑘) ∈ ℤ)
4948zred 12565 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑘 ∈ (0...𝐽)) → ((𝐹𝐶)‘𝑘) ∈ ℝ)
5038, 49ltnled 11260 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑘 ∈ (0...𝐽)) → (0 < ((𝐹𝐶)‘𝑘) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5137, 50sylan2 593 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑘 ∈ (1...𝐽)) → (0 < ((𝐹𝐶)‘𝑘) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5233, 51syl6 35 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑘 = 𝐽 → (0 < ((𝐹𝐶)‘𝑘) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0)))
5352imp 407 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 = 𝐽) → (0 < ((𝐹𝐶)‘𝑘) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5425, 53bitr3d 280 . . . . . . . . . . . . . . 15 ((𝜑𝑘 = 𝐽) → (0 < ((𝐹𝐶)‘𝐽) ↔ ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5522, 54mpbid 231 . . . . . . . . . . . . . 14 ((𝜑𝑘 = 𝐽) → ¬ ((𝐹𝐶)‘𝑘) ≤ 0)
5655ex 413 . . . . . . . . . . . . 13 (𝜑 → (𝑘 = 𝐽 → ¬ ((𝐹𝐶)‘𝑘) ≤ 0))
5756con2d 134 . . . . . . . . . . . 12 (𝜑 → (((𝐹𝐶)‘𝑘) ≤ 0 → ¬ 𝑘 = 𝐽))
58 nn1m1nn 12132 . . . . . . . . . . . . . . . . . . . . 21 (𝐽 ∈ ℕ → (𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ))
5926, 58syl 17 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ))
60 ballotlemfc0.3 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ∃𝑖 ∈ (1...𝐽)((𝐹𝐶)‘𝑖) ≤ 0)
6160adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝐽 = 1) → ∃𝑖 ∈ (1...𝐽)((𝐹𝐶)‘𝑖) ≤ 0)
62 oveq1 7358 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝐽 = 1 → (𝐽...𝐽) = (1...𝐽))
6362adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝐽 = 1) → (𝐽...𝐽) = (1...𝐽))
6426nnzd 12484 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝐽 ∈ ℤ)
65 fzsn 13437 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝐽 ∈ ℤ → (𝐽...𝐽) = {𝐽})
6664, 65syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (𝐽...𝐽) = {𝐽})
6766adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝐽 = 1) → (𝐽...𝐽) = {𝐽})
6863, 67eqtr3d 2778 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝐽 = 1) → (1...𝐽) = {𝐽})
6968rexeqdv 3312 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝐽 = 1) → (∃𝑖 ∈ (1...𝐽)((𝐹𝐶)‘𝑖) ≤ 0 ↔ ∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0))
7061, 69mpbid 231 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝐽 = 1) → ∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0)
71 fveq2 6839 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖 = 𝐽 → ((𝐹𝐶)‘𝑖) = ((𝐹𝐶)‘𝐽))
7271breq1d 5113 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑖 = 𝐽 → (((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝐽) ≤ 0))
7372rexsng 4633 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝐽 ∈ ℕ → (∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝐽) ≤ 0))
7426, 73syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝐽) ≤ 0))
7574adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝐽 = 1) → (∃𝑖 ∈ {𝐽} ((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘𝐽) ≤ 0))
7670, 75mpbid 231 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝐽 = 1) → ((𝐹𝐶)‘𝐽) ≤ 0)
7721adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝐽 = 1) → 0 < ((𝐹𝐶)‘𝐽))
78 0red 11116 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → 0 ∈ ℝ)
7939, 40, 41, 42, 43, 44, 64ballotlemfelz 32918 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → ((𝐹𝐶)‘𝐽) ∈ ℤ)
8079zred 12565 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ((𝐹𝐶)‘𝐽) ∈ ℝ)
8178, 80ltnled 11260 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (0 < ((𝐹𝐶)‘𝐽) ↔ ¬ ((𝐹𝐶)‘𝐽) ≤ 0))
8281adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝐽 = 1) → (0 < ((𝐹𝐶)‘𝐽) ↔ ¬ ((𝐹𝐶)‘𝐽) ≤ 0))
8377, 82mpbid 231 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝐽 = 1) → ¬ ((𝐹𝐶)‘𝐽) ≤ 0)
8476, 83pm2.65da 815 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ¬ 𝐽 = 1)
85 biortn 936 . . . . . . . . . . . . . . . . . . . . . 22 𝐽 = 1 → ((𝐽 − 1) ∈ ℕ ↔ (¬ ¬ 𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ)))
8684, 85syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝐽 − 1) ∈ ℕ ↔ (¬ ¬ 𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ)))
87 notnotb 314 . . . . . . . . . . . . . . . . . . . . . 22 (𝐽 = 1 ↔ ¬ ¬ 𝐽 = 1)
8887orbi1i 912 . . . . . . . . . . . . . . . . . . . . 21 ((𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ) ↔ (¬ ¬ 𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ))
8986, 88bitr4di 288 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝐽 − 1) ∈ ℕ ↔ (𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ)))
9059, 89mpbird 256 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐽 − 1) ∈ ℕ)
91 elnnuz 12761 . . . . . . . . . . . . . . . . . . 19 ((𝐽 − 1) ∈ ℕ ↔ (𝐽 − 1) ∈ (ℤ‘1))
9290, 91sylib 217 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝐽 − 1) ∈ (ℤ‘1))
93 elfzp1 13445 . . . . . . . . . . . . . . . . . 18 ((𝐽 − 1) ∈ (ℤ‘1) → (𝑘 ∈ (1...((𝐽 − 1) + 1)) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = ((𝐽 − 1) + 1))))
9492, 93syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑘 ∈ (1...((𝐽 − 1) + 1)) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = ((𝐽 − 1) + 1))))
9526nncnd 12127 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐽 ∈ ℂ)
96 1cnd 11108 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ∈ ℂ)
9795, 96npcand 11474 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝐽 − 1) + 1) = 𝐽)
9897oveq2d 7367 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1...((𝐽 − 1) + 1)) = (1...𝐽))
9998eleq2d 2823 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑘 ∈ (1...((𝐽 − 1) + 1)) ↔ 𝑘 ∈ (1...𝐽)))
10097eqeq2d 2747 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑘 = ((𝐽 − 1) + 1) ↔ 𝑘 = 𝐽))
101100orbi2d 914 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = ((𝐽 − 1) + 1)) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = 𝐽)))
10294, 99, 1013bitr3d 308 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑘 ∈ (1...𝐽) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = 𝐽)))
103 orcom 868 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = 𝐽) ↔ (𝑘 = 𝐽𝑘 ∈ (1...(𝐽 − 1))))
104102, 103bitrdi 286 . . . . . . . . . . . . . . 15 (𝜑 → (𝑘 ∈ (1...𝐽) ↔ (𝑘 = 𝐽𝑘 ∈ (1...(𝐽 − 1)))))
105104biimpd 228 . . . . . . . . . . . . . 14 (𝜑 → (𝑘 ∈ (1...𝐽) → (𝑘 = 𝐽𝑘 ∈ (1...(𝐽 − 1)))))
106 pm5.6 1000 . . . . . . . . . . . . . 14 (((𝑘 ∈ (1...𝐽) ∧ ¬ 𝑘 = 𝐽) → 𝑘 ∈ (1...(𝐽 − 1))) ↔ (𝑘 ∈ (1...𝐽) → (𝑘 = 𝐽𝑘 ∈ (1...(𝐽 − 1)))))
107105, 106sylibr 233 . . . . . . . . . . . . 13 (𝜑 → ((𝑘 ∈ (1...𝐽) ∧ ¬ 𝑘 = 𝐽) → 𝑘 ∈ (1...(𝐽 − 1))))
10890nnzd 12484 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐽 − 1) ∈ ℤ)
109 1z 12491 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℤ
110108, 109jctil 520 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1 ∈ ℤ ∧ (𝐽 − 1) ∈ ℤ))
111 elfzelz 13395 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...(𝐽 − 1)) → 𝑘 ∈ ℤ)
112111, 109jctir 521 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...(𝐽 − 1)) → (𝑘 ∈ ℤ ∧ 1 ∈ ℤ))
113 fzaddel 13429 . . . . . . . . . . . . . . . . . 18 (((1 ∈ ℤ ∧ (𝐽 − 1) ∈ ℤ) ∧ (𝑘 ∈ ℤ ∧ 1 ∈ ℤ)) → (𝑘 ∈ (1...(𝐽 − 1)) ↔ (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1))))
114110, 112, 113syl2an 596 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 ∈ (1...(𝐽 − 1)) ↔ (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1))))
115114biimp3a 1469 . . . . . . . . . . . . . . . 16 ((𝜑𝑘 ∈ (1...(𝐽 − 1)) ∧ 𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)))
1161153anidm23 1421 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)))
117 1p1e2 12236 . . . . . . . . . . . . . . . . . . . 20 (1 + 1) = 2
118117a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (1 + 1) = 2)
119118, 97oveq12d 7369 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((1 + 1)...((𝐽 − 1) + 1)) = (2...𝐽))
120119eleq2d 2823 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)) ↔ (𝑘 + 1) ∈ (2...𝐽)))
121 2eluzge1 12773 . . . . . . . . . . . . . . . . . . 19 2 ∈ (ℤ‘1)
122 fzss1 13434 . . . . . . . . . . . . . . . . . . 19 (2 ∈ (ℤ‘1) → (2...𝐽) ⊆ (1...𝐽))
123121, 122ax-mp 5 . . . . . . . . . . . . . . . . . 18 (2...𝐽) ⊆ (1...𝐽)
124123sseli 3938 . . . . . . . . . . . . . . . . 17 ((𝑘 + 1) ∈ (2...𝐽) → (𝑘 + 1) ∈ (1...𝐽))
125120, 124syl6bi 252 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)) → (𝑘 + 1) ∈ (1...𝐽)))
126125adantr 481 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ (1...(𝐽 − 1))) → ((𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)) → (𝑘 + 1) ∈ (1...𝐽)))
127116, 126mpd 15 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 + 1) ∈ (1...𝐽))
128127ex 413 . . . . . . . . . . . . 13 (𝜑 → (𝑘 ∈ (1...(𝐽 − 1)) → (𝑘 + 1) ∈ (1...𝐽)))
129107, 128syld 47 . . . . . . . . . . . 12 (𝜑 → ((𝑘 ∈ (1...𝐽) ∧ ¬ 𝑘 = 𝐽) → (𝑘 + 1) ∈ (1...𝐽)))
13057, 129sylan2d 605 . . . . . . . . . . 11 (𝜑 → ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) → (𝑘 + 1) ∈ (1...𝐽)))
131130imp 407 . . . . . . . . . 10 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → (𝑘 + 1) ∈ (1...𝐽))
132131adantrr 715 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (𝑘 + 1) ∈ (1...𝐽))
133 fveq2 6839 . . . . . . . . . . . . . 14 (𝑖 = (𝑘 + 1) → ((𝐹𝐶)‘𝑖) = ((𝐹𝐶)‘(𝑘 + 1)))
134133breq1d 5113 . . . . . . . . . . . . 13 (𝑖 = (𝑘 + 1) → (((𝐹𝐶)‘𝑖) ≤ 0 ↔ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0))
135134elrab 3643 . . . . . . . . . . . 12 ((𝑘 + 1) ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ↔ ((𝑘 + 1) ∈ (1...𝐽) ∧ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0))
136 breq1 5106 . . . . . . . . . . . . 13 (𝑗 = (𝑘 + 1) → (𝑗𝑘 ↔ (𝑘 + 1) ≤ 𝑘))
137136rspccva 3578 . . . . . . . . . . . 12 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘 ∧ (𝑘 + 1) ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}) → (𝑘 + 1) ≤ 𝑘)
138135, 137sylan2br 595 . . . . . . . . . . 11 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘 ∧ ((𝑘 + 1) ∈ (1...𝐽) ∧ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0)) → (𝑘 + 1) ≤ 𝑘)
139138expr 457 . . . . . . . . . 10 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (((𝐹𝐶)‘(𝑘 + 1)) ≤ 0 → (𝑘 + 1) ≤ 𝑘))
140139con3d 152 . . . . . . . . 9 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (¬ (𝑘 + 1) ≤ 𝑘 → ¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0))
14120, 132, 140syl2anc 584 . . . . . . . 8 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (¬ (𝑘 + 1) ≤ 𝑘 → ¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0))
14219, 141mpd 15 . . . . . . 7 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0)
143 simplrr 776 . . . . . . . . . . 11 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)
144132adantr 481 . . . . . . . . . . 11 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ∈ (1...𝐽))
145 simpll 765 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 𝜑)
146131adantr 481 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ∈ (1...𝐽))
14735sseld 3941 . . . . . . . . . . . . . . 15 (1 ∈ (ℤ‘0) → ((𝑘 + 1) ∈ (1...𝐽) → (𝑘 + 1) ∈ (0...𝐽)))
14834, 146, 147mpsyl 68 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ∈ (0...𝐽))
14944adantr 481 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → 𝐶𝑂)
150 elfzelz 13395 . . . . . . . . . . . . . . . . 17 ((𝑘 + 1) ∈ (0...𝐽) → (𝑘 + 1) ∈ ℤ)
151150adantl 482 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → (𝑘 + 1) ∈ ℤ)
15239, 40, 41, 42, 43, 149, 151ballotlemfelz 32918 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → ((𝐹𝐶)‘(𝑘 + 1)) ∈ ℤ)
153152zred 12565 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → ((𝐹𝐶)‘(𝑘 + 1)) ∈ ℝ)
154145, 148, 153syl2anc 584 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) ∈ ℝ)
155 0red 11116 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 0 ∈ ℝ)
156 simplrr 776 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘𝑘) ≤ 0)
1576adantr 481 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 𝑘 ∈ (1...𝐽))
158157, 37syl 17 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 𝑘 ∈ (0...𝐽))
159130imdistani 569 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → (𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)))
16044adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → 𝐶𝑂)
161 elfznn 13424 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 + 1) ∈ (1...𝐽) → (𝑘 + 1) ∈ ℕ)
162161adantl 482 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (𝑘 + 1) ∈ ℕ)
16339, 40, 41, 42, 43, 160, 162ballotlemfp1 32919 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → ((¬ (𝑘 + 1) ∈ 𝐶 → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1)) ∧ ((𝑘 + 1) ∈ 𝐶 → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1))))
164163simpld 495 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (¬ (𝑘 + 1) ∈ 𝐶 → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1)))
165164imp 407 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1))
166159, 165sylan 580 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1))
167 elfzelz 13395 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ ℤ)
168167zcnd 12566 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ ℂ)
169 1cnd 11108 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝐽) → 1 ∈ ℂ)
170168, 169pncand 11471 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ (1...𝐽) → ((𝑘 + 1) − 1) = 𝑘)
171170fveq2d 6843 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...𝐽) → ((𝐹𝐶)‘((𝑘 + 1) − 1)) = ((𝐹𝐶)‘𝑘))
172171oveq1d 7366 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...𝐽) → (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1) = (((𝐹𝐶)‘𝑘) − 1))
173172eqeq2d 2747 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (1...𝐽) → (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1) ↔ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)))
174157, 173syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) − 1) ↔ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)))
175166, 174mpbid 231 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1))
176 0z 12468 . . . . . . . . . . . . . . . . . 18 0 ∈ ℤ
177 zlem1lt 12513 . . . . . . . . . . . . . . . . . 18 ((((𝐹𝐶)‘𝑘) ∈ ℤ ∧ 0 ∈ ℤ) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
17848, 176, 177sylancl 586 . . . . . . . . . . . . . . . . 17 ((𝜑𝑘 ∈ (0...𝐽)) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
179178adantr 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ (0...𝐽)) ∧ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
180 breq1 5106 . . . . . . . . . . . . . . . . 17 (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1) → (((𝐹𝐶)‘(𝑘 + 1)) < 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
181180adantl 482 . . . . . . . . . . . . . . . 16 (((𝜑𝑘 ∈ (0...𝐽)) ∧ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)) → (((𝐹𝐶)‘(𝑘 + 1)) < 0 ↔ (((𝐹𝐶)‘𝑘) − 1) < 0))
182179, 181bitr4d 281 . . . . . . . . . . . . . . 15 (((𝜑𝑘 ∈ (0...𝐽)) ∧ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) − 1)) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ ((𝐹𝐶)‘(𝑘 + 1)) < 0))
183145, 158, 175, 182syl21anc 836 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (((𝐹𝐶)‘𝑘) ≤ 0 ↔ ((𝐹𝐶)‘(𝑘 + 1)) < 0))
184156, 183mpbid 231 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) < 0)
185154, 155, 184ltled 11261 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0)
186185adantlrr 719 . . . . . . . . . . 11 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0)
187143, 144, 186, 138syl12anc 835 . . . . . . . . . 10 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ≤ 𝑘)
18819adantr 481 . . . . . . . . . 10 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ¬ (𝑘 + 1) ≤ 𝑘)
189187, 188condan 816 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (𝑘 + 1) ∈ 𝐶)
190163simprd 496 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → ((𝑘 + 1) ∈ 𝐶 → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1)))
191190imp 407 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1))
192159, 191sylan 580 . . . . . . . . . . 11 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1))
1936adantr 481 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → 𝑘 ∈ (1...𝐽))
194171oveq1d 7366 . . . . . . . . . . . . 13 (𝑘 ∈ (1...𝐽) → (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1) = (((𝐹𝐶)‘𝑘) + 1))
195194eqeq2d 2747 . . . . . . . . . . . 12 (𝑘 ∈ (1...𝐽) → (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1) ↔ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1)))
196193, 195syl 17 . . . . . . . . . . 11 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘((𝑘 + 1) − 1)) + 1) ↔ ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1)))
197192, 196mpbid 231 . . . . . . . . . 10 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1))
198197adantlrr 719 . . . . . . . . 9 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1))
199189, 198mpdan 685 . . . . . . . 8 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1))
200 breq1 5106 . . . . . . . . 9 (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1) → (((𝐹𝐶)‘(𝑘 + 1)) ≤ 0 ↔ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
201200notbid 317 . . . . . . . 8 (((𝐹𝐶)‘(𝑘 + 1)) = (((𝐹𝐶)‘𝑘) + 1) → (¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0 ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
202199, 201syl 17 . . . . . . 7 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (¬ ((𝐹𝐶)‘(𝑘 + 1)) ≤ 0 ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
203142, 202mpbid 231 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0)
2046, 37syl 17 . . . . . . . . 9 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → 𝑘 ∈ (0...𝐽))
205204, 48syldan 591 . . . . . . . 8 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0)) → ((𝐹𝐶)‘𝑘) ∈ ℤ)
206205adantrr 715 . . . . . . 7 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) ∈ ℤ)
207 zleltp1 12512 . . . . . . . . 9 ((0 ∈ ℤ ∧ ((𝐹𝐶)‘𝑘) ∈ ℤ) → (0 ≤ ((𝐹𝐶)‘𝑘) ↔ 0 < (((𝐹𝐶)‘𝑘) + 1)))
208176, 207mpan 688 . . . . . . . 8 (((𝐹𝐶)‘𝑘) ∈ ℤ → (0 ≤ ((𝐹𝐶)‘𝑘) ↔ 0 < (((𝐹𝐶)‘𝑘) + 1)))
209 0red 11116 . . . . . . . . 9 (((𝐹𝐶)‘𝑘) ∈ ℤ → 0 ∈ ℝ)
210 zre 12461 . . . . . . . . . 10 (((𝐹𝐶)‘𝑘) ∈ ℤ → ((𝐹𝐶)‘𝑘) ∈ ℝ)
211 1red 11114 . . . . . . . . . 10 (((𝐹𝐶)‘𝑘) ∈ ℤ → 1 ∈ ℝ)
212210, 211readdcld 11142 . . . . . . . . 9 (((𝐹𝐶)‘𝑘) ∈ ℤ → (((𝐹𝐶)‘𝑘) + 1) ∈ ℝ)
213209, 212ltnled 11260 . . . . . . . 8 (((𝐹𝐶)‘𝑘) ∈ ℤ → (0 < (((𝐹𝐶)‘𝑘) + 1) ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
214208, 213bitrd 278 . . . . . . 7 (((𝐹𝐶)‘𝑘) ∈ ℤ → (0 ≤ ((𝐹𝐶)‘𝑘) ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
215206, 214syl 17 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (0 ≤ ((𝐹𝐶)‘𝑘) ↔ ¬ (((𝐹𝐶)‘𝑘) + 1) ≤ 0))
216203, 215mpbird 256 . . . . 5 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → 0 ≤ ((𝐹𝐶)‘𝑘))
217206zred 12565 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) ∈ ℝ)
218 0red 11116 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → 0 ∈ ℝ)
219217, 218letri3d 11255 . . . . 5 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → (((𝐹𝐶)‘𝑘) = 0 ↔ (((𝐹𝐶)‘𝑘) ≤ 0 ∧ 0 ≤ ((𝐹𝐶)‘𝑘))))
2205, 216, 219mpbir2and 711 . . . 4 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) = 0)
2214, 220sylan2b 594 . . 3 ((𝜑 ∧ (𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)) → ((𝐹𝐶)‘𝑘) = 0)
222 ssrab2 4035 . . . . . 6 {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ (1...𝐽)
223222, 12sstri 3951 . . . . 5 {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ ℝ
224223a1i 11 . . . 4 (𝜑 → {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ ℝ)
225 fzfi 13831 . . . . . 6 (1...𝐽) ∈ Fin
226 ssfi 9075 . . . . . 6 (((1...𝐽) ∈ Fin ∧ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ (1...𝐽)) → {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∈ Fin)
227225, 222, 226mp2an 690 . . . . 5 {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∈ Fin
228227a1i 11 . . . 4 (𝜑 → {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∈ Fin)
229 rabn0 4343 . . . . 5 ({𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ≠ ∅ ↔ ∃𝑖 ∈ (1...𝐽)((𝐹𝐶)‘𝑖) ≤ 0)
23060, 229sylibr 233 . . . 4 (𝜑 → {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ≠ ∅)
231 fimaxre 12057 . . . 4 (({𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ⊆ ℝ ∧ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∈ Fin ∧ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ≠ ∅) → ∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)
232224, 228, 230, 231syl3anc 1371 . . 3 (𝜑 → ∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0}𝑗𝑘)
233221, 232reximddv 3166 . 2 (𝜑 → ∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ((𝐹𝐶)‘𝑘) = 0)
234 elrabi 3637 . . . 4 (𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} → 𝑘 ∈ (1...𝐽))
235234anim1i 615 . . 3 ((𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹𝐶)‘𝑖) ≤ 0} ∧ ((𝐹𝐶)‘𝑘) = 0) → (𝑘 ∈ (1...𝐽) ∧ ((𝐹𝐶)‘𝑘) = 0))
236235reximi2 3080 . 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 205  wa 396  wo 845   = wceq 1541  wcel 2106  wne 2941  wral 3062  wrex 3071  {crab 3405  cdif 3905  cin 3907  wss 3908  c0 4280  𝒫 cpw 4558  {csn 4584   class class class wbr 5103  cmpt 5186  cfv 6493  (class class class)co 7351  Fincfn 8841  cr 11008  0cc0 11009  1c1 11010   + caddc 11012   < clt 11147  cle 11148  cmin 11343   / cdiv 11770  cn 12111  2c2 12166  cz 12457  cuz 12721  ...cfz 13378  chash 14184
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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5240  ax-sep 5254  ax-nul 5261  ax-pow 5318  ax-pr 5382  ax-un 7664  ax-cnex 11065  ax-resscn 11066  ax-1cn 11067  ax-icn 11068  ax-addcl 11069  ax-addrcl 11070  ax-mulcl 11071  ax-mulrcl 11072  ax-mulcom 11073  ax-addass 11074  ax-mulass 11075  ax-distr 11076  ax-i2m1 11077  ax-1ne0 11078  ax-1rid 11079  ax-rnegex 11080  ax-rrecex 11081  ax-cnre 11082  ax-pre-lttri 11083  ax-pre-lttrn 11084  ax-pre-ltadd 11085  ax-pre-mulgt0 11086
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2887  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-reu 3352  df-rab 3406  df-v 3445  df-sbc 3738  df-csb 3854  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3927  df-nul 4281  df-if 4485  df-pw 4560  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4864  df-int 4906  df-iun 4954  df-br 5104  df-opab 5166  df-mpt 5187  df-tr 5221  df-id 5529  df-eprel 5535  df-po 5543  df-so 5544  df-fr 5586  df-we 5588  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6251  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6445  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-riota 7307  df-ov 7354  df-oprab 7355  df-mpo 7356  df-om 7795  df-1st 7913  df-2nd 7914  df-frecs 8204  df-wrecs 8235  df-recs 8309  df-rdg 8348  df-1o 8404  df-oadd 8408  df-er 8606  df-en 8842  df-dom 8843  df-sdom 8844  df-fin 8845  df-dju 9795  df-card 9833  df-pnf 11149  df-mnf 11150  df-xr 11151  df-ltxr 11152  df-le 11153  df-sub 11345  df-neg 11346  df-nn 12112  df-2 12174  df-n0 12372  df-z 12458  df-uz 12722  df-fz 13379  df-hash 14185
This theorem is referenced by:  ballotlem5  32927  ballotlemic  32934
  Copyright terms: Public domain W3C validator