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

Theorem sticksstones10 42942
Description: Establish mapping between strictly monotone functions and functions that sum to a fixed non-negative integer. (Contributed by metakunt, 6-Oct-2024.)
Hypotheses
Ref Expression
sticksstones10.1 (𝜑𝑁 ∈ ℕ0)
sticksstones10.2 (𝜑𝐾 ∈ ℕ)
sticksstones10.3 𝐺 = (𝑏𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
sticksstones10.4 𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}
sticksstones10.5 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}
Assertion
Ref Expression
sticksstones10 (𝜑𝐺:𝐵𝐴)
Distinct variable groups:   𝐴,𝑏   𝐵,𝑏,𝑖,𝑘   𝑓,𝐾,𝑥,𝑦   𝑔,𝐾,𝑖,𝑘   𝑓,𝑁   𝑔,𝑁,𝑖,𝑘   𝑓,𝑏,𝑥,𝑦   𝑔,𝑏   𝜑,𝑏,𝑖,𝑘   𝑥,𝑘,𝑦
Allowed substitution hints:   𝜑(𝑥,𝑦,𝑓,𝑔)   𝐴(𝑥,𝑦,𝑓,𝑔,𝑖,𝑘)   𝐵(𝑥,𝑦,𝑓,𝑔)   𝐺(𝑥,𝑦,𝑓,𝑔,𝑖,𝑘,𝑏)   𝐾(𝑏)   𝑁(𝑥,𝑦,𝑏)

Proof of Theorem sticksstones10
Dummy variables 𝑠 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 sticksstones10.2 . . . . . . . 8 (𝜑𝐾 ∈ ℕ)
21nnne0d 12281 . . . . . . 7 (𝜑𝐾 ≠ 0)
32adantr 485 . . . . . 6 ((𝜑𝑏𝐵) → 𝐾 ≠ 0)
43neneqd 2963 . . . . 5 ((𝜑𝑏𝐵) → ¬ 𝐾 = 0)
54iffalsed 4498 . . . 4 ((𝜑𝑏𝐵) → if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))) = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))
65eqcomd 2769 . . 3 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) = if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
7 eleq1 2851 . . . . . . . . 9 (((𝑁 + 𝐾) − (𝑏𝐾)) = if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0 ↔ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0))
8 eleq1 2851 . . . . . . . . 9 (if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) = if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) → (if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0 ↔ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0))
9 sticksstones10.1 . . . . . . . . . . . . . . . . . 18 (𝜑𝑁 ∈ ℕ0)
109nn0zd 12611 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ ℤ)
1110adantr 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 𝑁 ∈ ℤ)
121nnzd 12612 . . . . . . . . . . . . . . . . 17 (𝜑𝐾 ∈ ℤ)
1312adantr 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 𝐾 ∈ ℤ)
1411, 13zaddcld 12699 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝑁 + 𝐾) ∈ ℤ)
15 sticksstones10.5 . . . . . . . . . . . . . . . . . . . . . 22 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}
1615eleq2i 2855 . . . . . . . . . . . . . . . . . . . . 21 (𝑏𝐵𝑏 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
17 vex 3459 . . . . . . . . . . . . . . . . . . . . . 22 𝑏 ∈ V
18 feq1 6683 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑏 → (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾))))
19 fveq1 6880 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑏 → (𝑓𝑥) = (𝑏𝑥))
20 fveq1 6880 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑏 → (𝑓𝑦) = (𝑏𝑦))
2119, 20breq12d 5122 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑏 → ((𝑓𝑥) < (𝑓𝑦) ↔ (𝑏𝑥) < (𝑏𝑦)))
2221imbi2d 343 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑏 → ((𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ (𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
23222ralbidv 3229 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑏 → (∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2418, 23anbi12d 643 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 = 𝑏 → ((𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦))) ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))))
2517, 24elab 3638 . . . . . . . . . . . . . . . . . . . . 21 (𝑏 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))} ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2616, 25bitri 278 . . . . . . . . . . . . . . . . . . . 20 (𝑏𝐵 ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2726bilani 509 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2827simpld 499 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
29 1zzd 12620 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ ℤ)
301nnge1d 12279 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ≤ 𝐾)
3130adantr 485 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ≤ 𝐾)
3213zred 12695 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → 𝐾 ∈ ℝ)
3332leidd 11775 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 𝐾𝐾)
3429, 13, 13, 31, 33elfzd 13538 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝐾 ∈ (1...𝐾))
3528, 34ffvelcdmd 7080 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ (1...(𝑁 + 𝐾)))
36 elfznn 13577 . . . . . . . . . . . . . . . . 17 ((𝑏𝐾) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝐾) ∈ ℕ)
3735, 36syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℕ)
3837nnzd 12612 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℤ)
3914, 38zsubcld 12700 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ)
4037nnred 12243 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℝ)
4140recnd 11232 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℂ)
4241addridd 11405 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((𝑏𝐾) + 0) = (𝑏𝐾))
43 elfzle2 13551 . . . . . . . . . . . . . . . . 17 ((𝑏𝐾) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝐾) ≤ (𝑁 + 𝐾))
4435, 43syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑏𝐾) ≤ (𝑁 + 𝐾))
4542, 44eqbrtrd 5133 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → ((𝑏𝐾) + 0) ≤ (𝑁 + 𝐾))
46 0red 11206 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 ∈ ℝ)
4714zred 12695 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑁 + 𝐾) ∈ ℝ)
4840, 46, 47leaddsub2d 11811 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (((𝑏𝐾) + 0) ≤ (𝑁 + 𝐾) ↔ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
4945, 48mpbid 235 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾)))
5039, 49jca 520 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ∧ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
51 elnn0z 12599 . . . . . . . . . . . . 13 (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0 ↔ (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ∧ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
5250, 51sylibr 237 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
5352adantr 485 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
54533impa 1127 . . . . . . . . . 10 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
5554adantr 485 . . . . . . . . 9 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = (𝐾 + 1)) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
56 eleq1 2851 . . . . . . . . . 10 (((𝑏‘1) − 1) = if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) → (((𝑏‘1) − 1) ∈ ℕ0 ↔ if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0))
57 eleq1 2851 . . . . . . . . . 10 ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) = if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) → ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0 ↔ if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0))
58 1red 11204 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → 1 ∈ ℝ)
5958leidd 11775 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → 1 ≤ 1)
6029, 13, 29, 59, 31elfzd 13538 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ (1...𝐾))
6128, 60ffvelcdmd 7080 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ (1...(𝑁 + 𝐾)))
62 elfznn 13577 . . . . . . . . . . . . . . . . . . 19 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘1) ∈ ℕ)
6362nnzd 12612 . . . . . . . . . . . . . . . . . 18 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘1) ∈ ℤ)
6461, 63syl 18 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℤ)
6564, 29zsubcld 12700 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((𝑏‘1) − 1) ∈ ℤ)
66 1cnd 11197 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ ℂ)
6766addridd 11405 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (1 + 0) = 1)
68 elfzle1 13550 . . . . . . . . . . . . . . . . . . 19 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → 1 ≤ (𝑏‘1))
6961, 68syl 18 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 1 ≤ (𝑏‘1))
7067, 69eqbrtrd 5133 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (1 + 0) ≤ (𝑏‘1))
7164zred 12695 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℝ)
7258, 46, 71leaddsub2d 11811 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → ((1 + 0) ≤ (𝑏‘1) ↔ 0 ≤ ((𝑏‘1) − 1)))
7370, 72mpbid 235 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 ≤ ((𝑏‘1) − 1))
7465, 73jca 520 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (((𝑏‘1) − 1) ∈ ℤ ∧ 0 ≤ ((𝑏‘1) − 1)))
75 elnn0z 12599 . . . . . . . . . . . . . . 15 (((𝑏‘1) − 1) ∈ ℕ0 ↔ (((𝑏‘1) − 1) ∈ ℤ ∧ 0 ≤ ((𝑏‘1) − 1)))
7674, 75sylibr 237 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑏‘1) − 1) ∈ ℕ0)
7776adantr 485 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ ℕ0)
78773impa 1127 . . . . . . . . . . . 12 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ ℕ0)
7978adantr 485 . . . . . . . . . . 11 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → ((𝑏‘1) − 1) ∈ ℕ0)
8079adantr 485 . . . . . . . . . 10 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ 𝑘 = 1) → ((𝑏‘1) − 1) ∈ ℕ0)
81283adant3 1150 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
8281adantr 485 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
83 1zzd 12620 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ∈ ℤ)
84133adant3 1150 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℤ)
8584adantr 485 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
86 simp3 1156 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ (1...(𝐾 + 1)))
87 elfznn 13577 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ∈ ℕ)
8886, 87syl 18 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℕ)
8988adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℕ)
9089nnzd 12612 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℤ)
9189nnge1d 12279 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ≤ 𝑘)
92 elfzle2 13551 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
9386, 92syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ≤ (𝐾 + 1))
9493adantr 485 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
95 neqne 2966 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑘 = (𝐾 + 1) → 𝑘 ≠ (𝐾 + 1))
9695adantl 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≠ (𝐾 + 1))
9796necomd 3013 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ≠ 𝑘)
9894, 97jca 520 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘))
9989nnred 12243 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℝ)
10085zred 12695 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝐾 ∈ ℝ)
101 1red 11204 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ∈ ℝ)
102100, 101readdcld 11233 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℝ)
10399, 102ltlend 11350 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 < (𝐾 + 1) ↔ (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘)))
10498, 103mpbird 260 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 < (𝐾 + 1))
10588nnzd 12612 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℤ)
106 zleltp1 12640 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑘𝐾𝑘 < (𝐾 + 1)))
107105, 84, 106syl2anc 595 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → (𝑘𝐾𝑘 < (𝐾 + 1)))
108107adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘𝐾𝑘 < (𝐾 + 1)))
109104, 108mpbird 260 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘𝐾)
11083, 85, 90, 91, 109elfzd 13538 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ (1...𝐾))
11182, 110ffvelcdmd 7080 . . . . . . . . . . . . . . . . 17 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ (1...(𝑁 + 𝐾)))
112 elfznn 13577 . . . . . . . . . . . . . . . . 17 ((𝑏𝑘) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑘) ∈ ℕ)
113111, 112syl 18 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ ℕ)
114113nnzd 12612 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ ℤ)
115114adantr 485 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏𝑘) ∈ ℤ)
11682adantr 485 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
117 1zzd 12620 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℤ)
11885adantr 485 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐾 ∈ ℤ)
11990adantr 485 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℤ)
120119, 117zsubcld 12700 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ ℤ)
12191adantr 485 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ 𝑘)
122 neqne 2966 . . . . . . . . . . . . . . . . . . . . . 22 𝑘 = 1 → 𝑘 ≠ 1)
123122adantl 486 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ≠ 1)
124121, 123jca 520 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 ≤ 𝑘𝑘 ≠ 1))
125101adantr 485 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℝ)
12699adantr 485 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℝ)
127125, 126ltlend 11350 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ (1 ≤ 𝑘𝑘 ≠ 1)))
128124, 127mpbird 260 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 < 𝑘)
129117, 119zltlem1d 12643 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ 1 ≤ (𝑘 − 1)))
130128, 129mpbid 235 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ (𝑘 − 1))
13188nnred 12243 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℝ)
132583adant3 1150 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 1 ∈ ℝ)
133323adant3 1150 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℝ)
134 lesubadd 11681 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑘 − 1) ≤ 𝐾𝑘 ≤ (𝐾 + 1)))
135131, 132, 133, 134syl3anc 1398 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑘 − 1) ≤ 𝐾𝑘 ≤ (𝐾 + 1)))
13693, 135mpbird 260 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → (𝑘 − 1) ≤ 𝐾)
137136adantr 485 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 − 1) ≤ 𝐾)
138137adantr 485 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ≤ 𝐾)
139117, 118, 120, 130, 138elfzd 13538 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ (1...𝐾))
140116, 139ffvelcdmd 7080 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ (1...(𝑁 + 𝐾)))
141 elfznn 13577 . . . . . . . . . . . . . . . 16 ((𝑏‘(𝑘 − 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑘 − 1)) ∈ ℕ)
142140, 141syl 18 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℕ)
143142nnzd 12612 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℤ)
144115, 143zsubcld 12700 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℤ)
145144, 117zsubcld 12700 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ)
146 0p1e1 12356 . . . . . . . . . . . . . . 15 (0 + 1) = 1
147146a1i 11 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (0 + 1) = 1)
148 1cnd 11197 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℂ)
149148subidd 11552 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 − 1) = 0)
150143zred 12695 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℝ)
151150recnd 11232 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℂ)
152151addridd 11405 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏‘(𝑘 − 1)) + 0) = (𝑏‘(𝑘 − 1)))
153126ltm1d 12142 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) < 𝑘)
154110adantr 485 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ (1...𝐾))
155139, 154jca 520 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑘 − 1) ∈ (1...𝐾) ∧ 𝑘 ∈ (1...𝐾)))
15627simprd 500 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
1571563adant3 1150 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
158157adantr 485 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
159158adantr 485 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
160 breq1 5112 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = (𝑘 − 1) → (𝑥 < 𝑦 ↔ (𝑘 − 1) < 𝑦))
161 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = (𝑘 − 1) → (𝑏𝑥) = (𝑏‘(𝑘 − 1)))
162161breq1d 5119 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = (𝑘 − 1) → ((𝑏𝑥) < (𝑏𝑦) ↔ (𝑏‘(𝑘 − 1)) < (𝑏𝑦)))
163160, 162imbi12d 347 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = (𝑘 − 1) → ((𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)) ↔ ((𝑘 − 1) < 𝑦 → (𝑏‘(𝑘 − 1)) < (𝑏𝑦))))
164 breq2 5113 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑘 → ((𝑘 − 1) < 𝑦 ↔ (𝑘 − 1) < 𝑘))
165 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = 𝑘 → (𝑏𝑦) = (𝑏𝑘))
166165breq2d 5121 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑘 → ((𝑏‘(𝑘 − 1)) < (𝑏𝑦) ↔ (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
167164, 166imbi12d 347 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑘 → (((𝑘 − 1) < 𝑦 → (𝑏‘(𝑘 − 1)) < (𝑏𝑦)) ↔ ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘))))
168163, 167rspc2va 3593 . . . . . . . . . . . . . . . . . . . 20 ((((𝑘 − 1) ∈ (1...𝐾) ∧ 𝑘 ∈ (1...𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))) → ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
169155, 159, 168syl2anc 595 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
170153, 169mpd 16 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) < (𝑏𝑘))
171152, 170eqbrtrd 5133 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏‘(𝑘 − 1)) + 0) < (𝑏𝑘))
172 0red 11206 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 ∈ ℝ)
173115zred 12695 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏𝑘) ∈ ℝ)
174150, 172, 173ltaddsub2d 11810 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏‘(𝑘 − 1)) + 0) < (𝑏𝑘) ↔ 0 < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
175171, 174mpbid 235 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 < ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
176149, 175eqbrtrd 5133 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
177 zlem1lt 12641 . . . . . . . . . . . . . . . 16 ((1 ∈ ℤ ∧ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℤ) → (1 ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
178117, 144, 177syl2anc 595 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
179176, 178mpbird 260 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
180147, 179eqbrtrd 5133 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (0 + 1) ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
181144zred 12695 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℝ)
182 leaddsub 11685 . . . . . . . . . . . . . 14 ((0 ∈ ℝ ∧ 1 ∈ ℝ ∧ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℝ) → ((0 + 1) ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
183172, 125, 181, 182syl3anc 1398 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((0 + 1) ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
184180, 183mpbid 235 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))
185145, 184jca 520 . . . . . . . . . . 11 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ ∧ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
186 elnn0z 12599 . . . . . . . . . . 11 ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0 ↔ ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ ∧ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
187185, 186sylibr 237 . . . . . . . . . 10 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0)
18856, 57, 80, 187ifbothda 4526 . . . . . . . . 9 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0)
1897, 8, 55, 188ifbothda 4526 . . . . . . . 8 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0)
1901893expa 1136 . . . . . . 7 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0)
191190fmpttd 7110 . . . . . 6 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))):(1...(𝐾 + 1))⟶ℕ0)
192 eqidd 2764 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))
193 simpr 489 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → 𝑘 = 𝑖)
194193eqeq1d 2765 . . . . . . . . . 10 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑘 = (𝐾 + 1) ↔ 𝑖 = (𝐾 + 1)))
195193eqeq1d 2765 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑘 = 1 ↔ 𝑖 = 1))
196193fveq2d 6885 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑏𝑘) = (𝑏𝑖))
197193fvoveq1d 7432 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑏‘(𝑘 − 1)) = (𝑏‘(𝑖 − 1)))
198196, 197oveq12d 7428 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
199198oveq1d 7425 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
200195, 199ifbieq2d 4514 . . . . . . . . . 10 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
201194, 200ifbieq2d 4514 . . . . . . . . 9 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
202 simpr 489 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ (1...(𝐾 + 1)))
203 ovexd 7445 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ V)
204 ovexd 7445 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ V)
205 ovexd 7445 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ V)
206204, 205ifcld 4534 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ V)
207203, 206ifcld 4534 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ V)
208192, 201, 202, 207fvmptd 6997 . . . . . . . 8 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
209208sumeq2dv 15749 . . . . . . 7 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = Σ𝑖 ∈ (1...(𝐾 + 1))if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
2101adantr 485 . . . . . . . . . 10 ((𝜑𝑏𝐵) → 𝐾 ∈ ℕ)
211 nnuz 12896 . . . . . . . . . 10 ℕ = (ℤ‘1)
212210, 211eleqtrdi 2873 . . . . . . . . 9 ((𝜑𝑏𝐵) → 𝐾 ∈ (ℤ‘1))
213 eleq1 2851 . . . . . . . . . . . 12 (((𝑁 + 𝐾) − (𝑏𝐾)) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ↔ if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ))
214 eleq1 2851 . . . . . . . . . . . 12 (if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) → (if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ ↔ if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ))
215113adant3 1150 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑁 ∈ ℤ)
216215adantr 485 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → 𝑁 ∈ ℤ)
217133adant3 1150 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℤ)
218217adantr 485 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
219216, 218zaddcld 12699 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑁 + 𝐾) ∈ ℤ)
220373adant3 1150 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → (𝑏𝐾) ∈ ℕ)
221220adantr 485 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑏𝐾) ∈ ℕ)
222221nnzd 12612 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑏𝐾) ∈ ℤ)
223219, 222zsubcld 12700 . . . . . . . . . . . 12 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ)
224 eleq1 2851 . . . . . . . . . . . . 13 (((𝑏‘1) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → (((𝑏‘1) − 1) ∈ ℤ ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ))
225 eleq1 2851 . . . . . . . . . . . . 13 ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ ℤ ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ))
226643adant3 1150 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → (𝑏‘1) ∈ ℤ)
227226adantr 485 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑏‘1) ∈ ℤ)
228227adantr 485 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → (𝑏‘1) ∈ ℤ)
229 1zzd 12620 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → 1 ∈ ℤ)
230228, 229zsubcld 12700 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) ∈ ℤ)
231283adant3 1150 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
232231adantr 485 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
233232adantr 485 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
234 1zzd 12620 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ∈ ℤ)
235217adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
236 elfznn 13577 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 ∈ (1...(𝐾 + 1)) → 𝑖 ∈ ℕ)
237236adantl 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℕ)
2382373impa 1127 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℕ)
239238nnzd 12612 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℤ)
240239adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ ℤ)
241238nnge1d 12279 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 1 ≤ 𝑖)
242241adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ≤ 𝑖)
243 simp3 1156 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ (1...(𝐾 + 1)))
244 elfzle2 13551 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 ∈ (1...(𝐾 + 1)) → 𝑖 ≤ (𝐾 + 1))
245243, 244syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ≤ (𝐾 + 1))
246245adantr 485 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ≤ (𝐾 + 1))
247 neqne 2966 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑖 = (𝐾 + 1) → 𝑖 ≠ (𝐾 + 1))
248247adantl 486 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ≠ (𝐾 + 1))
249248necomd 3013 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝐾 + 1) ≠ 𝑖)
250246, 249jca 520 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑖))
251240zred 12695 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ ℝ)
252235zred 12695 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℝ)
253 1red 11204 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ∈ ℝ)
254252, 253readdcld 11233 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℝ)
255251, 254ltlend 11350 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖 < (𝐾 + 1) ↔ (𝑖 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑖)))
256250, 255mpbird 260 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 < (𝐾 + 1))
257 zleltp1 12640 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑖𝐾𝑖 < (𝐾 + 1)))
258240, 235, 257syl2anc 595 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖𝐾𝑖 < (𝐾 + 1)))
259256, 258mpbird 260 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖𝐾)
260234, 235, 240, 242, 259elfzd 13538 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ (1...𝐾))
261260adantr 485 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ (1...𝐾))
262233, 261ffvelcdmd 7080 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ (1...(𝑁 + 𝐾)))
263 elfznn 13577 . . . . . . . . . . . . . . . . 17 ((𝑏𝑖) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑖) ∈ ℕ)
264262, 263syl 18 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℕ)
265264nnzd 12612 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℤ)
266 1zzd 12620 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℤ)
267235adantr 485 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℤ)
268240adantr 485 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℤ)
269268, 266zsubcld 12700 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ ℤ)
270242adantr 485 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ≤ 𝑖)
271 neqne 2966 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑖 = 1 → 𝑖 ≠ 1)
272271adantl 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ≠ 1)
273270, 272jca 520 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 ≤ 𝑖𝑖 ≠ 1))
274 1red 11204 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℝ)
275268zred 12695 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℝ)
276274, 275ltlend 11350 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 ≤ 𝑖𝑖 ≠ 1)))
277273, 276mpbird 260 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 < 𝑖)
278 zltp1le 12639 . . . . . . . . . . . . . . . . . . . . . 22 ((1 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (1 < 𝑖 ↔ (1 + 1) ≤ 𝑖))
279266, 268, 278syl2anc 595 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 + 1) ≤ 𝑖))
280277, 279mpbid 235 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 + 1) ≤ 𝑖)
281 leaddsub 11685 . . . . . . . . . . . . . . . . . . . . 21 ((1 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝑖 ∈ ℝ) → ((1 + 1) ≤ 𝑖 ↔ 1 ≤ (𝑖 − 1)))
282274, 274, 275, 281syl3anc 1398 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → ((1 + 1) ≤ 𝑖 ↔ 1 ≤ (𝑖 − 1)))
283280, 282mpbid 235 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ≤ (𝑖 − 1))
284246adantr 485 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ≤ (𝐾 + 1))
285252adantr 485 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℝ)
286 lesubadd 11681 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑖 − 1) ≤ 𝐾𝑖 ≤ (𝐾 + 1)))
287275, 274, 285, 286syl3anc 1398 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → ((𝑖 − 1) ≤ 𝐾𝑖 ≤ (𝐾 + 1)))
288284, 287mpbird 260 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ≤ 𝐾)
289266, 267, 269, 283, 288elfzd 13538 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ (1...𝐾))
290233, 289ffvelcdmd 7080 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)))
291 elfznn 13577 . . . . . . . . . . . . . . . . 17 ((𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
292290, 291syl 18 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
293292nnzd 12612 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℤ)
294265, 293zsubcld 12700 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ)
295294, 266zsubcld 12700 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ ℤ)
296224, 225, 230, 295ifbothda 4526 . . . . . . . . . . . 12 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ)
297213, 214, 223, 296ifbothda 4526 . . . . . . . . . . 11 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ)
2982973expa 1136 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ)
299298zcnd 12696 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℂ)
300 eqeq1 2767 . . . . . . . . . 10 (𝑖 = (𝐾 + 1) → (𝑖 = (𝐾 + 1) ↔ (𝐾 + 1) = (𝐾 + 1)))
301 eqeq1 2767 . . . . . . . . . . 11 (𝑖 = (𝐾 + 1) → (𝑖 = 1 ↔ (𝐾 + 1) = 1))
302 fveq2 6881 . . . . . . . . . . . . 13 (𝑖 = (𝐾 + 1) → (𝑏𝑖) = (𝑏‘(𝐾 + 1)))
303 fvoveq1 7433 . . . . . . . . . . . . 13 (𝑖 = (𝐾 + 1) → (𝑏‘(𝑖 − 1)) = (𝑏‘((𝐾 + 1) − 1)))
304302, 303oveq12d 7428 . . . . . . . . . . . 12 (𝑖 = (𝐾 + 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = ((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))))
305304oveq1d 7425 . . . . . . . . . . 11 (𝑖 = (𝐾 + 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))
306301, 305ifbieq2d 4514 . . . . . . . . . 10 (𝑖 = (𝐾 + 1) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))
307300, 306ifbieq2d 4514 . . . . . . . . 9 (𝑖 = (𝐾 + 1) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))))
308212, 299, 307fsump1 15803 . . . . . . . 8 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))))
309 eqidd 2764 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (𝐾 + 1) = (𝐾 + 1))
310309iftrued 4495 . . . . . . . . . 10 ((𝜑𝑏𝐵) → if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))) = ((𝑁 + 𝐾) − (𝑏𝐾)))
311310oveq2d 7426 . . . . . . . . 9 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + ((𝑁 + 𝐾) − (𝑏𝐾))))
312 elfznn 13577 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝐾) → 𝑖 ∈ ℕ)
313312adantl 486 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℕ)
314313nnred 12243 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℝ)
31532adantr 485 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝐾 ∈ ℝ)
316 1red 11204 . . . . . . . . . . . . . . . . 17 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℝ)
317315, 316readdcld 11233 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝐾 + 1) ∈ ℝ)
318 elfzle2 13551 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝐾) → 𝑖𝐾)
319318adantl 486 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖𝐾)
320315ltp1d 12140 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝐾 < (𝐾 + 1))
321314, 315, 317, 319, 320lelttrd 11363 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 < (𝐾 + 1))
322314, 321ltned 11341 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ≠ (𝐾 + 1))
323322neneqd 2963 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → ¬ 𝑖 = (𝐾 + 1))
324323iffalsed 4498 . . . . . . . . . . . 12 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
325324sumeq2dv 15749 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
326325oveq1d 7425 . . . . . . . . . 10 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + ((𝑁 + 𝐾) − (𝑏𝐾))) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))))
327 eqeq1 2767 . . . . . . . . . . . . . 14 (((𝑏‘1) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → (((𝑏‘1) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1)))
328 eqeq1 2767 . . . . . . . . . . . . . 14 ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1)))
329 eqidd 2764 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = ((𝑏‘1) − 1))
330 simpr 489 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → 𝑖 = 1)
331330iftrued 4495 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏‘1))
332331eqcomd 2769 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → (𝑏‘1) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
333332oveq1d 7425 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
334329, 333eqtrd 2798 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
335 eqidd 2764 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
336 simpr 489 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → ¬ 𝑖 = 1)
337336iffalsed 4498 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
338337oveq1d 7425 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
339338eqcomd 2769 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
340335, 339eqtrd 2798 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
341327, 328, 334, 340ifbothda 4526 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
342341sumeq2dv 15749 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
343342oveq1d 7425 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))) = (Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) + ((𝑁 + 𝐾) − (𝑏𝐾))))
344 fzfid 14005 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (1...𝐾) ∈ Fin)
345 eleq1 2851 . . . . . . . . . . . . . . . . . . . . 21 ((𝑏‘1) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) → ((𝑏‘1) ∈ ℤ ↔ if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ))
346 eleq1 2851 . . . . . . . . . . . . . . . . . . . . 21 (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ ↔ if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ))
34764ad2antrr 738 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → (𝑏‘1) ∈ ℤ)
34828adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
349 simpr 489 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ (1...𝐾))
350348, 349ffvelcdmd 7080 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑏𝑖) ∈ (1...(𝑁 + 𝐾)))
351263nnzd 12612 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑏𝑖) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑖) ∈ ℤ)
352350, 351syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑏𝑖) ∈ ℤ)
353352adantr 485 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℤ)
354348adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
355 1zzd 12620 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℤ)
35613ad2antrr 738 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℤ)
357313nnzd 12612 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℤ)
358357adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℤ)
359358, 355zsubcld 12700 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ ℤ)
360313nnge1d 12279 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ≤ 𝑖)
361360adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ≤ 𝑖)
362336, 271syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ≠ 1)
363361, 362jca 520 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 ≤ 𝑖𝑖 ≠ 1))
364316adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℝ)
365314adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℝ)
366364, 365ltlend 11350 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 ≤ 𝑖𝑖 ≠ 1)))
367363, 366mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 < 𝑖)
368 zltlem1 12642 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((1 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (1 < 𝑖 ↔ 1 ≤ (𝑖 − 1)))
369355, 358, 368syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ 1 ≤ (𝑖 − 1)))
370367, 369mpbid 235 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ≤ (𝑖 − 1))
371314, 316resubcld 11637 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ∈ ℝ)
372314lem1d 12143 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ≤ 𝑖)
373371, 314, 315, 372, 319letrd 11362 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ≤ 𝐾)
374373adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ≤ 𝐾)
375355, 356, 359, 370, 374elfzd 13538 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ (1...𝐾))
376354, 375ffvelcdmd 7080 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)))
377376, 291syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
378377nnzd 12612 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℤ)
379353, 378zsubcld 12700 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ)
380345, 346, 347, 379ifbothda 4526 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ)
381380zcnd 12696 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℂ)
38266adantr 485 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℂ)
383344, 381, 382fsumsub 15835 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − Σ𝑖 ∈ (1...𝐾)1))
384 id 23 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 1 → 𝑖 = 1)
385384iftrued 4495 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 1 → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏‘1))
386212, 381, 385fsum1p 15800 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))))
38758adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ∈ ℝ)
388 elfzle1 13550 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑖 ∈ ((1 + 1)...𝐾) → (1 + 1) ≤ 𝑖)
389388adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → (1 + 1) ≤ 𝑖)
39029adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ∈ ℤ)
391 elfzelz 13547 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑖 ∈ ((1 + 1)...𝐾) → 𝑖 ∈ ℤ)
392391adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 𝑖 ∈ ℤ)
393390, 392, 278syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → (1 < 𝑖 ↔ (1 + 1) ≤ 𝑖))
394389, 393mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 < 𝑖)
395387, 394ltned 11341 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ≠ 𝑖)
396395necomd 3013 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 𝑖 ≠ 1)
397396neneqd 2963 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → ¬ 𝑖 = 1)
398397iffalsed 4498 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
399398sumeq2dv 15749 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
400399oveq2d 7426 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
40132recnd 11232 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → 𝐾 ∈ ℂ)
402401, 66npcand 11568 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝐾 − 1) + 1) = 𝐾)
403402eqcomd 2769 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → 𝐾 = ((𝐾 − 1) + 1))
404403oveq2d 7426 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((1 + 1)...𝐾) = ((1 + 1)...((𝐾 − 1) + 1)))
405404sumeq1d 15747 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
406405oveq2d 7426 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
407 elfzelz 13547 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1)) → 𝑖 ∈ ℤ)
408407adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 ∈ ℤ)
409408zcnd 12696 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 ∈ ℂ)
410 1cnd 11197 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 1 ∈ ℂ)
411409, 410npcand 11568 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → ((𝑖 − 1) + 1) = 𝑖)
412411eqcomd 2769 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 = ((𝑖 − 1) + 1))
413412fveq2d 6885 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → (𝑏𝑖) = (𝑏‘((𝑖 − 1) + 1)))
414 eqidd 2764 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → (𝑏‘(𝑖 − 1)) = (𝑏‘(𝑖 − 1)))
415413, 414oveq12d 7428 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = ((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
416415sumeq2dv 15749 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
417416oveq2d 7426 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))))
41813, 29zsubcld 12700 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → (𝐾 − 1) ∈ ℤ)
41928adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
420 1zzd 12620 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ∈ ℤ)
42113adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝐾 ∈ ℤ)
422 elfznn 13577 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (𝑠 ∈ (1...(𝐾 − 1)) → 𝑠 ∈ ℕ)
423422adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℕ)
424423nnzd 12612 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℤ)
425424peano2zd 12698 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ ℤ)
426 1red 11204 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ∈ ℝ)
427423nnred 12243 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℝ)
428427, 426readdcld 11233 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ ℝ)
429423nnge1d 12279 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ≤ 𝑠)
430427lep1d 12141 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ≤ (𝑠 + 1))
431426, 427, 428, 429, 430letrd 11362 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ≤ (𝑠 + 1))
432 elfzle2 13551 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑠 ∈ (1...(𝐾 − 1)) → 𝑠 ≤ (𝐾 − 1))
433432adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ≤ (𝐾 − 1))
43432adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝐾 ∈ ℝ)
435 leaddsub 11685 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑠 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑠 + 1) ≤ 𝐾𝑠 ≤ (𝐾 − 1)))
436427, 426, 434, 435syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑠 + 1) ≤ 𝐾𝑠 ≤ (𝐾 − 1)))
437433, 436mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ≤ 𝐾)
438420, 421, 425, 431, 437elfzd 13538 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ (1...𝐾))
439419, 438ffvelcdmd 7080 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ (1...(𝑁 + 𝐾)))
440 elfznn 13577 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑏‘(𝑠 + 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑠 + 1)) ∈ ℕ)
441439, 440syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ ℕ)
442441nnzd 12612 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ ℤ)
443434, 426resubcld 11637 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝐾 − 1) ∈ ℝ)
444434lem1d 12143 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝐾 − 1) ≤ 𝐾)
445427, 443, 434, 433, 444letrd 11362 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠𝐾)
446420, 421, 424, 429, 445elfzd 13538 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ (1...𝐾))
447419, 446ffvelcdmd 7080 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏𝑠) ∈ (1...(𝑁 + 𝐾)))
448 elfznn 13577 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑏𝑠) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑠) ∈ ℕ)
449448nnzd 12612 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑏𝑠) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑠) ∈ ℤ)
450447, 449syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏𝑠) ∈ ℤ)
451442, 450zsubcld 12700 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) ∈ ℤ)
452451zcnd 12696 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) ∈ ℂ)
453 fvoveq1 7433 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = (𝑖 − 1) → (𝑏‘(𝑠 + 1)) = (𝑏‘((𝑖 − 1) + 1)))
454 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = (𝑖 − 1) → (𝑏𝑠) = (𝑏‘(𝑖 − 1)))
455453, 454oveq12d 7428 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑠 = (𝑖 − 1) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = ((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
45629, 29, 418, 452, 455fsumshft 15827 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
457456oveq2d 7426 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))))
458457eqcomd 2769 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))))
459 fvoveq1 7433 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = 𝑖 → (𝑏‘(𝑠 + 1)) = (𝑏‘(𝑖 + 1)))
460 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = 𝑖 → (𝑏𝑠) = (𝑏𝑖))
461459, 460oveq12d 7428 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = 𝑖 → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = ((𝑏‘(𝑖 + 1)) − (𝑏𝑖)))
462 nfcv 2925 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑖((𝑏‘(𝑠 + 1)) − (𝑏𝑠))
463 nfcv 2925 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑠((𝑏‘(𝑖 + 1)) − (𝑏𝑖))
464461, 462, 463cbvsum 15742 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))
465464a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖)))
466465oveq2d 7426 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))))
467 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = 𝑖 → (𝑏𝑤) = (𝑏𝑖))
468 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = (𝑖 + 1) → (𝑏𝑤) = (𝑏‘(𝑖 + 1)))
469 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = 1 → (𝑏𝑤) = (𝑏‘1))
470 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = ((𝐾 − 1) + 1) → (𝑏𝑤) = (𝑏‘((𝐾 − 1) + 1)))
471402, 212eqeltrd 2863 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → ((𝐾 − 1) + 1) ∈ (ℤ‘1))
47228adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
473 1zzd 12620 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 1 ∈ ℤ)
47413adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝐾 ∈ ℤ)
475 elfzelz 13547 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 𝑤 ∈ ℤ)
476475adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ∈ ℤ)
477 elfzle1 13550 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 1 ≤ 𝑤)
478477adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 1 ≤ 𝑤)
479 elfzle2 13551 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 𝑤 ≤ ((𝐾 − 1) + 1))
480479adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ≤ ((𝐾 − 1) + 1))
481402adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → ((𝐾 − 1) + 1) = 𝐾)
482480, 481breqtrd 5137 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤𝐾)
483473, 474, 476, 478, 482elfzd 13538 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ∈ (1...𝐾))
484472, 483ffvelcdmd 7080 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → (𝑏𝑤) ∈ (1...(𝑁 + 𝐾)))
485 elfznn 13577 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑏𝑤) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑤) ∈ ℕ)
486485nncnd 12244 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑏𝑤) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑤) ∈ ℂ)
487484, 486syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → (𝑏𝑤) ∈ ℂ)
488467, 468, 469, 470, 418, 471, 487telfsum2 15853 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖)) = ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1)))
489488oveq2d 7426 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))) = ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))))
49071recnd 11232 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℂ)
49137nncnd 12244 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℂ)
492402fveq2d 6885 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝜑𝑏𝐵) → (𝑏‘((𝐾 − 1) + 1)) = (𝑏𝐾))
493492eleq1d 2848 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑏𝐵) → ((𝑏‘((𝐾 − 1) + 1)) ∈ ℂ ↔ (𝑏𝐾) ∈ ℂ))
494491, 493mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → (𝑏‘((𝐾 − 1) + 1)) ∈ ℂ)
495490, 494pncan3d 11567 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))) = (𝑏‘((𝐾 − 1) + 1)))
496495, 492eqtrd 2798 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))) = (𝑏𝐾))
497489, 496eqtrd 2798 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))) = (𝑏𝐾))
498466, 497eqtrd 2798 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = (𝑏𝐾))
499458, 498eqtrd 2798 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
500417, 499eqtrd 2798 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
501406, 500eqtrd 2798 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
502400, 501eqtrd 2798 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))) = (𝑏𝐾))
503386, 502eqtrd 2798 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
504 fsumconst 15837 . . . . . . . . . . . . . . . . . . . . 21 (((1...𝐾) ∈ Fin ∧ 1 ∈ ℂ) → Σ𝑖 ∈ (1...𝐾)1 = ((♯‘(1...𝐾)) · 1))
505344, 66, 504syl2anc 595 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)1 = ((♯‘(1...𝐾)) · 1))
506210nnnn0d 12560 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → 𝐾 ∈ ℕ0)
507 hashfz1 14378 . . . . . . . . . . . . . . . . . . . . . . 23 (𝐾 ∈ ℕ0 → (♯‘(1...𝐾)) = 𝐾)
508506, 507syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → (♯‘(1...𝐾)) = 𝐾)
509508oveq1d 7425 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((♯‘(1...𝐾)) · 1) = (𝐾 · 1))
510401mulridd 11221 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → (𝐾 · 1) = 𝐾)
511509, 510eqtrd 2798 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → ((♯‘(1...𝐾)) · 1) = 𝐾)
512505, 511eqtrd 2798 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)1 = 𝐾)
513503, 512oveq12d 7428 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − Σ𝑖 ∈ (1...𝐾)1) = ((𝑏𝐾) − 𝐾))
514383, 513eqtrd 2798 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((𝑏𝐾) − 𝐾))
51541addlidd 11406 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (0 + (𝑏𝐾)) = (𝑏𝐾))
516515eqcomd 2769 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏𝐾) = (0 + (𝑏𝐾)))
517516oveq1d 7425 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → ((𝑏𝐾) − 𝐾) = ((0 + (𝑏𝐾)) − 𝐾))
518514, 517eqtrd 2798 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((0 + (𝑏𝐾)) − 𝐾))
519 0cnd 11194 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 0 ∈ ℂ)
520519, 401, 41subsub3d 11594 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (0 − (𝐾 − (𝑏𝐾))) = ((0 + (𝑏𝐾)) − 𝐾))
521520eqcomd 2769 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((0 + (𝑏𝐾)) − 𝐾) = (0 − (𝐾 − (𝑏𝐾))))
522518, 521eqtrd 2798 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (0 − (𝐾 − (𝑏𝐾))))
52311zcnd 12696 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝑁 ∈ ℂ)
524523subidd 11552 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑁𝑁) = 0)
525524eqcomd 2769 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 = (𝑁𝑁))
526525oveq1d 7425 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (0 − (𝐾 − (𝑏𝐾))) = ((𝑁𝑁) − (𝐾 − (𝑏𝐾))))
527522, 526eqtrd 2798 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((𝑁𝑁) − (𝐾 − (𝑏𝐾))))
528401, 41subcld 11564 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝐾 − (𝑏𝐾)) ∈ ℂ)
529523, 523, 528subsub4d 11595 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑁𝑁) − (𝐾 − (𝑏𝐾))) = (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))))
530527, 529eqtrd 2798 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))))
531523, 401, 41addsubassd 11584 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) = (𝑁 + (𝐾 − (𝑏𝐾))))
532531eqcomd 2769 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → (𝑁 + (𝐾 − (𝑏𝐾))) = ((𝑁 + 𝐾) − (𝑏𝐾)))
533532oveq2d 7426 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾))))
534530, 533eqtrd 2798 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾))))
535 1zzd 12620 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℤ)
536380, 535zsubcld 12700 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℤ)
537344, 536fsumzcl 15782 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℤ)
538537zcnd 12696 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℂ)
53952nn0cnd 12562 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℂ)
540538, 539, 523addlsub 11625 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → ((Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁 ↔ Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾)))))
541534, 540mpbird 260 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
542343, 541eqtrd 2798 . . . . . . . . . 10 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
543326, 542eqtrd 2798 . . . . . . . . 9 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
544311, 543eqtrd 2798 . . . . . . . 8 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))) = 𝑁)
545308, 544eqtrd 2798 . . . . . . 7 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = 𝑁)
546209, 545eqtrd 2798 . . . . . 6 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = 𝑁)
547191, 546jca 520 . . . . 5 ((𝜑𝑏𝐵) → ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))):(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = 𝑁))
548 ovex 7443 . . . . . . 7 (1...(𝐾 + 1)) ∈ V
549548mptex 7221 . . . . . 6 (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ V
550 feq1 6683 . . . . . . 7 (𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) → (𝑔:(1...(𝐾 + 1))⟶ℕ0 ↔ (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))):(1...(𝐾 + 1))⟶ℕ0))
551 simpl 487 . . . . . . . . . 10 ((𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))
552551fveq1d 6883 . . . . . . . . 9 ((𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (𝑔𝑖) = ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖))
553552sumeq2dv 15749 . . . . . . . 8 (𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖))
554553eqeq1d 2765 . . . . . . 7 (𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) → (Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁 ↔ Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = 𝑁))
555550, 554anbi12d 643 . . . . . 6 (𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) → ((𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁) ↔ ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))):(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = 𝑁)))
556549, 555elab 3638 . . . . 5 ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)} ↔ ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))):(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = 𝑁))
557547, 556sylibr 237 . . . 4 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
558 sticksstones10.4 . . . . 5 𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}
559558a1i 11 . . . 4 ((𝜑𝑏𝐵) → 𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
560557, 559eleqtrrd 2866 . . 3 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ 𝐴)
5616, 560eqeltrrd 2864 . 2 ((𝜑𝑏𝐵) → if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))) ∈ 𝐴)
562 sticksstones10.3 . 2 𝐺 = (𝑏𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
563561, 562fmptd 7109 1 (𝜑𝐺:𝐵𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  w3a 1103   = wceq 1570  wcel 2143  {cab 2741  wne 2958  wral 3079  Vcvv 3455  ifcif 4487  {csn 4589  cop 4595   class class class wbr 5109  cmpt 5192  wf 6532  cfv 6536  (class class class)co 7410  Fincfn 8939  cc 11093  cr 11094  0cc0 11095  1c1 11096   + caddc 11098   · cmul 11100   < clt 11238  cle 11239  cmin 11436  cn 12228  0cn0 12499  cz 12586  cuz 12857  ...cfz 13530  chash 14362  Σcsu 15733
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-inf2 9606  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172  ax-pre-sup 11173
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-er 8690  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-sup 9398  df-oi 9468  df-card 9921  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-div 11867  df-nn 12229  df-2 12298  df-3 12299  df-n0 12500  df-z 12587  df-uz 12858  df-rp 13012  df-fz 13531  df-fzo 13679  df-seq 14034  df-exp 14094  df-hash 14363  df-cj 15146  df-re 15147  df-im 15148  df-sqrt 15282  df-abs 15283  df-clim 15535  df-sum 15734
This theorem is referenced by:  sticksstones12  42945
  Copyright terms: Public domain W3C validator