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 35172
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 6886 . . . . . . 7 (𝑖 = 𝑘 → ((𝐹‘𝐶)‘𝑖) = ((𝐹‘𝐶)‘𝑘))
21breq1d 5112 . . . . . 6 (𝑖 = 𝑘 → (((𝐹‘𝐶)‘𝑖) ≤ 0 ↔ ((𝐹‘𝐶)‘𝑘) ≤ 0))
32elrab 3644 . . . . 5 (𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ↔ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0))
43anbi1i 636 . . . 4 ((𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘) ↔ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘))
5 simprlr 792 . . . . 5 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ((𝐹‘𝐶)‘𝑘) ≤ 0)
6 simprl 783 . . . . . . . . . 10 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) → 𝑘 ∈ (1...𝐽))
76adantrr 730 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → 𝑘 ∈ (1...𝐽))
8 fzssuz 13703 . . . . . . . . . . . . . 14 (1...𝐽) ⊆ (ℤ≥‘1)
9 uzssz 12990 . . . . . . . . . . . . . 14 (ℤ≥‘1) ⊆ ℤ
108, 9sstri 3917 . . . . . . . . . . . . 13 (1...𝐽) ⊆ ℤ
11 zssre 12704 . . . . . . . . . . . . 13 ℤ ⊆ ℝ
1210, 11sstri 3917 . . . . . . . . . . . 12 (1...𝐽) ⊆ ℝ
1312sseli 3904 . . . . . . . . . . 11 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ ℝ)
1413ltp1d 12251 . . . . . . . . . 10 (𝑘 ∈ (1...𝐽) → 𝑘 < (𝑘 + 1))
15 1red 11313 . . . . . . . . . . . 12 (𝑘 ∈ (1...𝐽) → 1 ∈ ℝ)
1613, 15readdcld 11342 . . . . . . . . . . 11 (𝑘 ∈ (1...𝐽) → (𝑘 + 1) ∈ ℝ)
1713, 16ltnled 11461 . . . . . . . . . 10 (𝑘 ∈ (1...𝐽) → (𝑘 < (𝑘 + 1) ↔ ¬ (𝑘 + 1) ≤ 𝑘))
1814, 17mpbid 235 . . . . . . . . 9 (𝑘 ∈ (1...𝐽) → ¬ (𝑘 + 1) ≤ 𝑘)
197, 18syl 18 . . . . . . . 8 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ¬ (𝑘 + 1) ≤ 𝑘)
20 simprr 785 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)
21 ballotlemfc0.4 . . . . . . . . . . . . . . . 16 (𝜑 → 0 < ((𝐹‘𝐶)‘𝐽))
2221adantr 486 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 = 𝐽) → 0 < ((𝐹‘𝐶)‘𝐽))
23 simpr 490 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑘 = 𝐽) → 𝑘 = 𝐽)
2423fveq2d 6890 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑘 = 𝐽) → ((𝐹‘𝐶)‘𝑘) = ((𝐹‘𝐶)‘𝐽))
2524breq2d 5114 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑘 = 𝐽) → (0 < ((𝐹‘𝐶)‘𝑘) ↔ 0 < ((𝐹‘𝐶)‘𝐽)))
26 ballotlemfp1.j . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → 𝐽 ∈ ℕ)
27 elnnuz 13009 . . . . . . . . . . . . . . . . . . . . . 22 (𝐽 ∈ ℕ ↔ 𝐽 ∈ (ℤ≥‘1))
2826, 27sylib 221 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → 𝐽 ∈ (ℤ≥‘1))
29 eluzfz2 13669 . . . . . . . . . . . . . . . . . . . . 21 (𝐽 ∈ (ℤ≥‘1) → 𝐽 ∈ (1...𝐽))
3028, 29syl 18 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 𝐽 ∈ (1...𝐽))
31 eleq1 2848 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 𝐽 → (𝑘 ∈ (1...𝐽) ↔ 𝐽 ∈ (1...𝐽)))
3230, 31syl5ibrcom 250 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑘 = 𝐽 → 𝑘 ∈ (1...𝐽)))
3332anc2li 565 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑘 = 𝐽 → (𝜑 ∧ 𝑘 ∈ (1...𝐽))))
34 1eluzge0 13011 . . . . . . . . . . . . . . . . . . . 20 1 ∈ (ℤ≥‘0)
35 fzss1 13701 . . . . . . . . . . . . . . . . . . . . 21 (1 ∈ (ℤ≥‘0) → (1...𝐽) ⊆ (0...𝐽))
3635sseld 3907 . . . . . . . . . . . . . . . . . . . 20 (1 ∈ (ℤ≥‘0) → (𝑘 ∈ (1...𝐽) → 𝑘 ∈ (0...𝐽)))
3734, 36ax-mp 5 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ (0...𝐽))
38 0red 11315 . . . . . . . . . . . . . . . . . . . 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 486 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑘 ∈ (0...𝐽)) → 𝐶 ∈ 𝑂)
46 elfzelz 13660 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 ∈ (0...𝐽) → 𝑘 ∈ ℤ)
4746adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑘 ∈ (0...𝐽)) → 𝑘 ∈ ℤ)
4839, 40, 41, 42, 43, 45, 47ballotlemfelz 35170 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑘 ∈ (0...𝐽)) → ((𝐹‘𝐶)‘𝑘) ∈ ℤ)
4948zred 12807 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑘 ∈ (0...𝐽)) → ((𝐹‘𝐶)‘𝑘) ∈ ℝ)
5038, 49ltnled 11461 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑘 ∈ (0...𝐽)) → (0 < ((𝐹‘𝐶)‘𝑘) ↔ ¬ ((𝐹‘𝐶)‘𝑘) ≤ 0))
5137, 50sylan2 605 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑘 ∈ (1...𝐽)) → (0 < ((𝐹‘𝐶)‘𝑘) ↔ ¬ ((𝐹‘𝐶)‘𝑘) ≤ 0))
5233, 51syl6 36 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑘 = 𝐽 → (0 < ((𝐹‘𝐶)‘𝑘) ↔ ¬ ((𝐹‘𝐶)‘𝑘) ≤ 0)))
5352imp 412 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑘 = 𝐽) → (0 < ((𝐹‘𝐶)‘𝑘) ↔ ¬ ((𝐹‘𝐶)‘𝑘) ≤ 0))
5425, 53bitr3d 284 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 = 𝐽) → (0 < ((𝐹‘𝐶)‘𝐽) ↔ ¬ ((𝐹‘𝐶)‘𝑘) ≤ 0))
5522, 54mpbid 235 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑘 = 𝐽) → ¬ ((𝐹‘𝐶)‘𝑘) ≤ 0)
5655ex 418 . . . . . . . . . . . . 13 (𝜑 → (𝑘 = 𝐽 → ¬ ((𝐹‘𝐶)‘𝑘) ≤ 0))
5756con2d 135 . . . . . . . . . . . 12 (𝜑 → (((𝐹‘𝐶)‘𝑘) ≤ 0 → ¬ 𝑘 = 𝐽))
58 nn1m1nn 12360 . . . . . . . . . . . . . . . . . . . . 21 (𝐽 ∈ ℕ → (𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ))
5926, 58syl 18 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ))
60 ballotlemfc0.3 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ∃𝑖 ∈ (1...𝐽)((𝐹‘𝐶)‘𝑖) ≤ 0)
6160adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝐽 = 1) → ∃𝑖 ∈ (1...𝐽)((𝐹‘𝐶)‘𝑖) ≤ 0)
62 oveq1 7428 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝐽 = 1 → (𝐽...𝐽) = (1...𝐽))
6362adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 𝐽 = 1) → (𝐽...𝐽) = (1...𝐽))
6426nnzd 12723 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → 𝐽 ∈ ℤ)
65 fzsn 13704 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝐽 ∈ ℤ → (𝐽...𝐽) = {𝐽})
6664, 65syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝐽...𝐽) = {𝐽})
6766adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 𝐽 = 1) → (𝐽...𝐽) = {𝐽})
6863, 67eqtr3d 2797 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ 𝐽 = 1) → (1...𝐽) = {𝐽})
6961, 68rexeqtrdv 3322 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝐽 = 1) → ∃𝑖 ∈ {𝐽} ((𝐹‘𝐶)‘𝑖) ≤ 0)
70 fveq2 6886 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖 = 𝐽 → ((𝐹‘𝐶)‘𝑖) = ((𝐹‘𝐶)‘𝐽))
7170breq1d 5112 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑖 = 𝐽 → (((𝐹‘𝐶)‘𝑖) ≤ 0 ↔ ((𝐹‘𝐶)‘𝐽) ≤ 0))
7271rexsng 4633 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝐽 ∈ ℕ → (∃𝑖 ∈ {𝐽} ((𝐹‘𝐶)‘𝑖) ≤ 0 ↔ ((𝐹‘𝐶)‘𝐽) ≤ 0))
7326, 72syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (∃𝑖 ∈ {𝐽} ((𝐹‘𝐶)‘𝑖) ≤ 0 ↔ ((𝐹‘𝐶)‘𝐽) ≤ 0))
7473adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝐽 = 1) → (∃𝑖 ∈ {𝐽} ((𝐹‘𝐶)‘𝑖) ≤ 0 ↔ ((𝐹‘𝐶)‘𝐽) ≤ 0))
7569, 74mpbid 235 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝐽 = 1) → ((𝐹‘𝐶)‘𝐽) ≤ 0)
7621adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝐽 = 1) → 0 < ((𝐹‘𝐶)‘𝐽))
77 0red 11315 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → 0 ∈ ℝ)
7839, 40, 41, 42, 43, 44, 64ballotlemfelz 35170 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → ((𝐹‘𝐶)‘𝐽) ∈ ℤ)
7978zred 12807 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ((𝐹‘𝐶)‘𝐽) ∈ ℝ)
8077, 79ltnled 11461 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (0 < ((𝐹‘𝐶)‘𝐽) ↔ ¬ ((𝐹‘𝐶)‘𝐽) ≤ 0))
8180adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝐽 = 1) → (0 < ((𝐹‘𝐶)‘𝐽) ↔ ¬ ((𝐹‘𝐶)‘𝐽) ≤ 0))
8276, 81mpbid 235 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝐽 = 1) → ¬ ((𝐹‘𝐶)‘𝐽) ≤ 0)
8375, 82pm2.65da 829 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ¬ 𝐽 = 1)
84 biortn 951 . . . . . . . . . . . . . . . . . . . . . 22 (¬ 𝐽 = 1 → ((𝐽 − 1) ∈ ℕ ↔ (¬ ¬ 𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ)))
8583, 84syl 18 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → ((𝐽 − 1) ∈ ℕ ↔ (¬ ¬ 𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ)))
86 notnotb 318 . . . . . . . . . . . . . . . . . . . . . 22 (𝐽 = 1 ↔ ¬ ¬ 𝐽 = 1)
8786orbi1i 927 . . . . . . . . . . . . . . . . . . . . 21 ((𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ) ↔ (¬ ¬ 𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ))
8885, 87bitr4di 292 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ((𝐽 − 1) ∈ ℕ ↔ (𝐽 = 1 ∨ (𝐽 − 1) ∈ ℕ)))
8959, 88mpbird 260 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐽 − 1) ∈ ℕ)
90 elnnuz 13009 . . . . . . . . . . . . . . . . . . 19 ((𝐽 − 1) ∈ ℕ ↔ (𝐽 − 1) ∈ (ℤ≥‘1))
9189, 90sylib 221 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝐽 − 1) ∈ (ℤ≥‘1))
92 elfzp1 13712 . . . . . . . . . . . . . . . . . 18 ((𝐽 − 1) ∈ (ℤ≥‘1) → (𝑘 ∈ (1...((𝐽 − 1) + 1)) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = ((𝐽 − 1) + 1))))
9391, 92syl 18 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑘 ∈ (1...((𝐽 − 1) + 1)) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = ((𝐽 − 1) + 1))))
9426nncnd 12355 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 𝐽 ∈ ℂ)
95 1cnd 11306 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ∈ ℂ)
9694, 95npcand 11677 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝐽 − 1) + 1) = 𝐽)
9796oveq2d 7437 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1...((𝐽 − 1) + 1)) = (1...𝐽))
9897eleq2d 2846 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝑘 ∈ (1...((𝐽 − 1) + 1)) ↔ 𝑘 ∈ (1...𝐽)))
9996eqeq2d 2771 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑘 = ((𝐽 − 1) + 1) ↔ 𝑘 = 𝐽))
10099orbi2d 929 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = ((𝐽 − 1) + 1)) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = 𝐽)))
10193, 98, 1003bitr3d 312 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑘 ∈ (1...𝐽) ↔ (𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = 𝐽)))
102 orcom 884 . . . . . . . . . . . . . . . 16 ((𝑘 ∈ (1...(𝐽 − 1)) ∨ 𝑘 = 𝐽) ↔ (𝑘 = 𝐽 ∨ 𝑘 ∈ (1...(𝐽 − 1))))
103101, 102bitrdi 290 . . . . . . . . . . . . . . 15 (𝜑 → (𝑘 ∈ (1...𝐽) ↔ (𝑘 = 𝐽 ∨ 𝑘 ∈ (1...(𝐽 − 1)))))
104103biimpd 232 . . . . . . . . . . . . . 14 (𝜑 → (𝑘 ∈ (1...𝐽) → (𝑘 = 𝐽 ∨ 𝑘 ∈ (1...(𝐽 − 1)))))
105 pm5.6 1017 . . . . . . . . . . . . . 14 (((𝑘 ∈ (1...𝐽) ∧ ¬ 𝑘 = 𝐽) → 𝑘 ∈ (1...(𝐽 − 1))) ↔ (𝑘 ∈ (1...𝐽) → (𝑘 = 𝐽 ∨ 𝑘 ∈ (1...(𝐽 − 1)))))
106104, 105sylibr 237 . . . . . . . . . . . . 13 (𝜑 → ((𝑘 ∈ (1...𝐽) ∧ ¬ 𝑘 = 𝐽) → 𝑘 ∈ (1...(𝐽 − 1))))
10789nnzd 12723 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐽 − 1) ∈ ℤ)
108 1z 12730 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℤ
109107, 108jctil 529 . . . . . . . . . . . . . . . . . 18 (𝜑 → (1 ∈ ℤ ∧ (𝐽 − 1) ∈ ℤ))
110 elfzelz 13660 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...(𝐽 − 1)) → 𝑘 ∈ ℤ)
111110, 108jctir 530 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...(𝐽 − 1)) → (𝑘 ∈ ℤ ∧ 1 ∈ ℤ))
112 fzaddel 13696 . . . . . . . . . . . . . . . . . 18 (((1 ∈ ℤ ∧ (𝐽 − 1) ∈ ℤ) ∧ (𝑘 ∈ ℤ ∧ 1 ∈ ℤ)) → (𝑘 ∈ (1...(𝐽 − 1)) ↔ (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1))))
113109, 111, 112syl2an 608 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 ∈ (1...(𝐽 − 1)) ↔ (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1))))
114113biimp3a 1498 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑘 ∈ (1...(𝐽 − 1)) ∧ 𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)))
1151143anidm23 1448 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)))
116 1p1e2 12470 . . . . . . . . . . . . . . . . . . . 20 (1 + 1) = 2
117116a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (1 + 1) = 2)
118117, 96oveq12d 7439 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((1 + 1)...((𝐽 − 1) + 1)) = (2...𝐽))
119118eleq2d 2846 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)) ↔ (𝑘 + 1) ∈ (2...𝐽)))
120 2eluzge1 13013 . . . . . . . . . . . . . . . . . . 19 2 ∈ (ℤ≥‘1)
121 fzss1 13701 . . . . . . . . . . . . . . . . . . 19 (2 ∈ (ℤ≥‘1) → (2...𝐽) ⊆ (1...𝐽))
122120, 121ax-mp 5 . . . . . . . . . . . . . . . . . 18 (2...𝐽) ⊆ (1...𝐽)
123122sseli 3904 . . . . . . . . . . . . . . . . 17 ((𝑘 + 1) ∈ (2...𝐽) → (𝑘 + 1) ∈ (1...𝐽))
124119, 123biimtrdi 256 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)) → (𝑘 + 1) ∈ (1...𝐽)))
125124adantr 486 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑘 ∈ (1...(𝐽 − 1))) → ((𝑘 + 1) ∈ ((1 + 1)...((𝐽 − 1) + 1)) → (𝑘 + 1) ∈ (1...𝐽)))
126115, 125mpd 16 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑘 ∈ (1...(𝐽 − 1))) → (𝑘 + 1) ∈ (1...𝐽))
127126ex 418 . . . . . . . . . . . . 13 (𝜑 → (𝑘 ∈ (1...(𝐽 − 1)) → (𝑘 + 1) ∈ (1...𝐽)))
128106, 127syld 48 . . . . . . . . . . . 12 (𝜑 → ((𝑘 ∈ (1...𝐽) ∧ ¬ 𝑘 = 𝐽) → (𝑘 + 1) ∈ (1...𝐽)))
12957, 128sylan2d 617 . . . . . . . . . . 11 (𝜑 → ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) → (𝑘 + 1) ∈ (1...𝐽)))
130129imp 412 . . . . . . . . . 10 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) → (𝑘 + 1) ∈ (1...𝐽))
131130adantrr 730 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → (𝑘 + 1) ∈ (1...𝐽))
132 fveq2 6886 . . . . . . . . . . . . . 14 (𝑖 = (𝑘 + 1) → ((𝐹‘𝐶)‘𝑖) = ((𝐹‘𝐶)‘(𝑘 + 1)))
133132breq1d 5112 . . . . . . . . . . . . 13 (𝑖 = (𝑘 + 1) → (((𝐹‘𝐶)‘𝑖) ≤ 0 ↔ ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0))
134133elrab 3644 . . . . . . . . . . . 12 ((𝑘 + 1) ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ↔ ((𝑘 + 1) ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0))
135 breq1 5105 . . . . . . . . . . . . 13 (𝑗 = (𝑘 + 1) → (𝑗 ≤ 𝑘 ↔ (𝑘 + 1) ≤ 𝑘))
136135rspccva 3575 . . . . . . . . . . . 12 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘 ∧ (𝑘 + 1) ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}) → (𝑘 + 1) ≤ 𝑘)
137134, 136sylan2br 607 . . . . . . . . . . 11 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘 ∧ ((𝑘 + 1) ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0)) → (𝑘 + 1) ≤ 𝑘)
138137expr 462 . . . . . . . . . 10 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0 → (𝑘 + 1) ≤ 𝑘))
139138con3d 153 . . . . . . . . 9 ((∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (¬ (𝑘 + 1) ≤ 𝑘 → ¬ ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0))
14020, 131, 139syl2anc 596 . . . . . . . 8 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → (¬ (𝑘 + 1) ≤ 𝑘 → ¬ ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0))
14119, 140mpd 16 . . . . . . 7 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ¬ ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0)
142 simplrr 790 . . . . . . . . . . 11 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)
143131adantr 486 . . . . . . . . . . 11 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ∈ (1...𝐽))
144 simpll 779 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 𝜑)
145130adantr 486 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ∈ (1...𝐽))
14635sseld 3907 . . . . . . . . . . . . . . 15 (1 ∈ (ℤ≥‘0) → ((𝑘 + 1) ∈ (1...𝐽) → (𝑘 + 1) ∈ (0...𝐽)))
14734, 145, 146mpsyl 69 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ∈ (0...𝐽))
14844adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → 𝐶 ∈ 𝑂)
149 elfzelz 13660 . . . . . . . . . . . . . . . . 17 ((𝑘 + 1) ∈ (0...𝐽) → (𝑘 + 1) ∈ ℤ)
150149adantl 487 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → (𝑘 + 1) ∈ ℤ)
15139, 40, 41, 42, 43, 148, 150ballotlemfelz 35170 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → ((𝐹‘𝐶)‘(𝑘 + 1)) ∈ ℤ)
152151zred 12807 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑘 + 1) ∈ (0...𝐽)) → ((𝐹‘𝐶)‘(𝑘 + 1)) ∈ ℝ)
153144, 147, 152syl2anc 596 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) ∈ ℝ)
154 0red 11315 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 0 ∈ ℝ)
155 simplrr 790 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘𝑘) ≤ 0)
1566adantr 486 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 𝑘 ∈ (1...𝐽))
157156, 37syl 18 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → 𝑘 ∈ (0...𝐽))
158129imdistani 579 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) → (𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)))
15944adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → 𝐶 ∈ 𝑂)
160 elfznn 13691 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 + 1) ∈ (1...𝐽) → (𝑘 + 1) ∈ ℕ)
161160adantl 487 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (𝑘 + 1) ∈ ℕ)
16239, 40, 41, 42, 43, 159, 161ballotlemfp1 35171 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → ((¬ (𝑘 + 1) ∈ 𝐶 → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) − 1)) ∧ ((𝑘 + 1) ∈ 𝐶 → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) + 1))))
163162simpld 500 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → (¬ (𝑘 + 1) ∈ 𝐶 → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) − 1)))
164163imp 412 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) − 1))
165158, 164sylan 592 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) − 1))
166 elfzelz 13660 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ ℤ)
167166zcnd 12808 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝐽) → 𝑘 ∈ ℂ)
168 1cnd 11306 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...𝐽) → 1 ∈ ℂ)
169167, 168pncand 11674 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ (1...𝐽) → ((𝑘 + 1) − 1) = 𝑘)
170169fveq2d 6890 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...𝐽) → ((𝐹‘𝐶)‘((𝑘 + 1) − 1)) = ((𝐹‘𝐶)‘𝑘))
171170oveq1d 7436 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...𝐽) → (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) − 1) = (((𝐹‘𝐶)‘𝑘) − 1))
172171eqeq2d 2771 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (1...𝐽) → (((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) − 1) ↔ ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) − 1)))
173156, 172syl 18 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) − 1) ↔ ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) − 1)))
174165, 173mpbid 235 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) − 1))
175 0z 12708 . . . . . . . . . . . . . . . . . 18 0 ∈ ℤ
176 zlem1lt 12752 . . . . . . . . . . . . . . . . . 18 ((((𝐹‘𝐶)‘𝑘) ∈ ℤ ∧ 0 ∈ ℤ) → (((𝐹‘𝐶)‘𝑘) ≤ 0 ↔ (((𝐹‘𝐶)‘𝑘) − 1) < 0))
17748, 175, 176sylancl 598 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑘 ∈ (0...𝐽)) → (((𝐹‘𝐶)‘𝑘) ≤ 0 ↔ (((𝐹‘𝐶)‘𝑘) − 1) < 0))
178177adantr 486 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑘 ∈ (0...𝐽)) ∧ ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) − 1)) → (((𝐹‘𝐶)‘𝑘) ≤ 0 ↔ (((𝐹‘𝐶)‘𝑘) − 1) < 0))
179 breq1 5105 . . . . . . . . . . . . . . . . 17 (((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) − 1) → (((𝐹‘𝐶)‘(𝑘 + 1)) < 0 ↔ (((𝐹‘𝐶)‘𝑘) − 1) < 0))
180179adantl 487 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ 𝑘 ∈ (0...𝐽)) ∧ ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) − 1)) → (((𝐹‘𝐶)‘(𝑘 + 1)) < 0 ↔ (((𝐹‘𝐶)‘𝑘) − 1) < 0))
181178, 180bitr4d 285 . . . . . . . . . . . . . . 15 (((𝜑 ∧ 𝑘 ∈ (0...𝐽)) ∧ ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) − 1)) → (((𝐹‘𝐶)‘𝑘) ≤ 0 ↔ ((𝐹‘𝐶)‘(𝑘 + 1)) < 0))
182144, 157, 174, 181syl21anc 851 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (((𝐹‘𝐶)‘𝑘) ≤ 0 ↔ ((𝐹‘𝐶)‘(𝑘 + 1)) < 0))
183155, 182mpbid 235 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) < 0)
184153, 154, 183ltled 11462 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0)
185184adantlrr 734 . . . . . . . . . . 11 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0)
186142, 143, 185, 137syl12anc 850 . . . . . . . . . 10 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → (𝑘 + 1) ≤ 𝑘)
18719adantr 486 . . . . . . . . . 10 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) ∧ ¬ (𝑘 + 1) ∈ 𝐶) → ¬ (𝑘 + 1) ≤ 𝑘)
188186, 187condan 830 . . . . . . . . 9 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → (𝑘 + 1) ∈ 𝐶)
189162simprd 501 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) → ((𝑘 + 1) ∈ 𝐶 → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) + 1)))
190189imp 412 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑘 + 1) ∈ (1...𝐽)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) + 1))
191158, 190sylan 592 . . . . . . . . . . 11 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) + 1))
1926adantr 486 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → 𝑘 ∈ (1...𝐽))
193170oveq1d 7436 . . . . . . . . . . . . 13 (𝑘 ∈ (1...𝐽) → (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) + 1) = (((𝐹‘𝐶)‘𝑘) + 1))
194193eqeq2d 2771 . . . . . . . . . . . 12 (𝑘 ∈ (1...𝐽) → (((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) + 1) ↔ ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) + 1)))
195192, 194syl 18 . . . . . . . . . . 11 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → (((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘((𝑘 + 1) − 1)) + 1) ↔ ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) + 1)))
196191, 195mpbid 235 . . . . . . . . . 10 (((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) + 1))
197196adantlrr 734 . . . . . . . . 9 (((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) ∧ (𝑘 + 1) ∈ 𝐶) → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) + 1))
198188, 197mpdan 700 . . . . . . . 8 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) + 1))
199 breq1 5105 . . . . . . . . 9 (((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) + 1) → (((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0 ↔ (((𝐹‘𝐶)‘𝑘) + 1) ≤ 0))
200199notbid 321 . . . . . . . 8 (((𝐹‘𝐶)‘(𝑘 + 1)) = (((𝐹‘𝐶)‘𝑘) + 1) → (¬ ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0 ↔ ¬ (((𝐹‘𝐶)‘𝑘) + 1) ≤ 0))
201198, 200syl 18 . . . . . . 7 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → (¬ ((𝐹‘𝐶)‘(𝑘 + 1)) ≤ 0 ↔ ¬ (((𝐹‘𝐶)‘𝑘) + 1) ≤ 0))
202141, 201mpbid 235 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ¬ (((𝐹‘𝐶)‘𝑘) + 1) ≤ 0)
2036, 37syl 18 . . . . . . . . 9 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) → 𝑘 ∈ (0...𝐽))
204203, 48syldan 603 . . . . . . . 8 ((𝜑 ∧ (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0)) → ((𝐹‘𝐶)‘𝑘) ∈ ℤ)
205204adantrr 730 . . . . . . 7 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ((𝐹‘𝐶)‘𝑘) ∈ ℤ)
206 zleltp1 12751 . . . . . . . . 9 ((0 ∈ ℤ ∧ ((𝐹‘𝐶)‘𝑘) ∈ ℤ) → (0 ≤ ((𝐹‘𝐶)‘𝑘) ↔ 0 < (((𝐹‘𝐶)‘𝑘) + 1)))
207175, 206mpan 703 . . . . . . . 8 (((𝐹‘𝐶)‘𝑘) ∈ ℤ → (0 ≤ ((𝐹‘𝐶)‘𝑘) ↔ 0 < (((𝐹‘𝐶)‘𝑘) + 1)))
208 0red 11315 . . . . . . . . 9 (((𝐹‘𝐶)‘𝑘) ∈ ℤ → 0 ∈ ℝ)
209 zre 12701 . . . . . . . . . 10 (((𝐹‘𝐶)‘𝑘) ∈ ℤ → ((𝐹‘𝐶)‘𝑘) ∈ ℝ)
210 1red 11313 . . . . . . . . . 10 (((𝐹‘𝐶)‘𝑘) ∈ ℤ → 1 ∈ ℝ)
211209, 210readdcld 11342 . . . . . . . . 9 (((𝐹‘𝐶)‘𝑘) ∈ ℤ → (((𝐹‘𝐶)‘𝑘) + 1) ∈ ℝ)
212208, 211ltnled 11461 . . . . . . . 8 (((𝐹‘𝐶)‘𝑘) ∈ ℤ → (0 < (((𝐹‘𝐶)‘𝑘) + 1) ↔ ¬ (((𝐹‘𝐶)‘𝑘) + 1) ≤ 0))
213207, 212bitrd 282 . . . . . . 7 (((𝐹‘𝐶)‘𝑘) ∈ ℤ → (0 ≤ ((𝐹‘𝐶)‘𝑘) ↔ ¬ (((𝐹‘𝐶)‘𝑘) + 1) ≤ 0))
214205, 213syl 18 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → (0 ≤ ((𝐹‘𝐶)‘𝑘) ↔ ¬ (((𝐹‘𝐶)‘𝑘) + 1) ≤ 0))
215202, 214mpbird 260 . . . . 5 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → 0 ≤ ((𝐹‘𝐶)‘𝑘))
216205zred 12807 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ((𝐹‘𝐶)‘𝑘) ∈ ℝ)
217 0red 11315 . . . . . 6 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → 0 ∈ ℝ)
218216, 217letri3d 11456 . . . . 5 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → (((𝐹‘𝐶)‘𝑘) = 0 ↔ (((𝐹‘𝐶)‘𝑘) ≤ 0 ∧ 0 ≤ ((𝐹‘𝐶)‘𝑘))))
2195, 215, 218mpbir2and 726 . . . 4 ((𝜑 ∧ ((𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) ≤ 0) ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ((𝐹‘𝐶)‘𝑘) = 0)
2204, 219sylan2b 606 . . 3 ((𝜑 ∧ (𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ∧ ∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)) → ((𝐹‘𝐶)‘𝑘) = 0)
221 ssrab2 4005 . . . . . 6 {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ⊆ (1...𝐽)
222221, 12sstri 3917 . . . . 5 {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ⊆ ℝ
223222a1i 11 . . . 4 (𝜑 → {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ⊆ ℝ)
224 fzfi 14119 . . . . . 6 (1...𝐽) ∈ Fin
225 ssfi 9192 . . . . . 6 (((1...𝐽) ∈ Fin ∧ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ⊆ (1...𝐽)) → {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ∈ Fin)
226224, 221, 225mp2an 705 . . . . 5 {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ∈ Fin
227226a1i 11 . . . 4 (𝜑 → {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ∈ Fin)
228 rabn0 4338 . . . . 5 ({𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ≠ ∅ ↔ ∃𝑖 ∈ (1...𝐽)((𝐹‘𝐶)‘𝑖) ≤ 0)
22960, 228sylibr 237 . . . 4 (𝜑 → {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ≠ ∅)
230 fimaxre 12265 . . . 4 (({𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ⊆ ℝ ∧ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ∈ Fin ∧ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ≠ ∅) → ∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)
231223, 227, 229, 230syl3anc 1398 . . 3 (𝜑 → ∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}∀𝑗 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0}𝑗 ≤ 𝑘)
232220, 231reximddv 3178 . 2 (𝜑 → ∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ((𝐹‘𝐶)‘𝑘) = 0)
233 elrabi 3640 . . . 4 (𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} → 𝑘 ∈ (1...𝐽))
234233anim1i 627 . . 3 ((𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ∧ ((𝐹‘𝐶)‘𝑘) = 0) → (𝑘 ∈ (1...𝐽) ∧ ((𝐹‘𝐶)‘𝑘) = 0))
235234reximi2 3095 . 2 (∃𝑘 ∈ {𝑖 ∈ (1...𝐽) ∣ ((𝐹‘𝐶)‘𝑖) ≤ 0} ((𝐹‘𝐶)‘𝑘) = 0 → ∃𝑘 ∈ (1...𝐽)((𝐹‘𝐶)‘𝑘) = 0)
236232, 235syl 18 1 (𝜑 → ∃𝑘 ∈ (1...𝐽)((𝐹‘𝐶)‘𝑘) = 0)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   = wceq 1569   ∈ wcel 2144   ≠ wne 2955  ∀wral 3076  ∃wrex 3086  {crab 3412   ⊆ wss 3895   ∖ cdif 4045   ∩ cin 4089  ∅c0 4278  𝒫 cpw 4556  {csn 4584   class class class wbr 5102   ↦ cmpt 5185  ‘cfv 6539  (class class class)co 7421  Fincfn 8977  ℝcr 11203  0cc0 11204  1c1 11205   + caddc 11207   < clt 11347   ≤ cle 11348   − cmin 11545   / cdiv 11977  ℕcn 12339  2c2 12401  ℤcz 12697  ℤ≥cuz 12969  ...cfz 13643  ♯chash 14478
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7752  ax-cnex 11260  ax-resscn 11261  ax-1cn 11262  ax-icn 11263  ax-addcl 11264  ax-addrcl 11265  ax-mulcl 11266  ax-mulrcl 11267  ax-mulcom 11268  ax-addass 11269  ax-mulass 11270  ax-distr 11271  ax-i2m1 11272  ax-1ne0 11273  ax-1rid 11274  ax-rnegex 11275  ax-rrecex 11276  ax-cnre 11277  ax-pre-lttri 11278  ax-pre-lttrn 11279  ax-pre-ltadd 11280  ax-pre-mulgt0 11281
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-int 4907  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6541  df-fn 6542  df-f 6543  df-f1 6544  df-fo 6545  df-f1o 6546  df-fv 6547  df-riota 7378  df-ov 7424  df-oprab 7425  df-mpo 7426  df-om 7879  df-1st 8002  df-2nd 8003  df-frecs 8303  df-wrecs 8334  df-recs 8383  df-rdg 8422  df-1o 8480  df-oadd 8484  df-er 8721  df-en 8978  df-dom 8979  df-sdom 8980  df-fin 8981  df-dju 9986  df-card 10024  df-pnf 11349  df-mnf 11350  df-xr 11351  df-ltxr 11352  df-le 11353  df-sub 11547  df-neg 11548  df-nn 12340  df-2 12409  df-n0 12611  df-z 12698  df-uz 12970  df-fz 13644  df-hash 14479
This theorem is used by:  ballotlem5  35179  ballotlemic  35186
  Copyright terms: Public domain W3C validator