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 42846
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 12286 . . . . . . 7 (𝜑𝐾 ≠ 0)
32adantr 485 . . . . . 6 ((𝜑𝑏𝐵) → 𝐾 ≠ 0)
43neneqd 2969 . . . . 5 ((𝜑𝑏𝐵) → ¬ 𝐾 = 0)
54iffalsed 4503 . . . 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 2775 . . 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 2857 . . . . . . . . 9 (((𝑁 + 𝐾) − (𝑏𝐾)) = if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0 ↔ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0))
8 eleq1 2857 . . . . . . . . 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 12616 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ ℤ)
1110adantr 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 𝑁 ∈ ℤ)
121nnzd 12617 . . . . . . . . . . . . . . . . 17 (𝜑𝐾 ∈ ℤ)
1312adantr 485 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 𝐾 ∈ ℤ)
1411, 13zaddcld 12704 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝑁 + 𝐾) ∈ ℤ)
15 sticksstones10.5 . . . . . . . . . . . . . . . . . . . . . 22 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}
1615eleq2i 2861 . . . . . . . . . . . . . . . . . . . . 21 (𝑏𝐵𝑏 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
17 vex 3467 . . . . . . . . . . . . . . . . . . . . . 22 𝑏 ∈ V
18 feq1 6684 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑏 → (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾))))
19 fveq1 6881 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑏 → (𝑓𝑥) = (𝑏𝑥))
20 fveq1 6881 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑏 → (𝑓𝑦) = (𝑏𝑦))
2119, 20breq12d 5126 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑏 → ((𝑓𝑥) < (𝑓𝑦) ↔ (𝑏𝑥) < (𝑏𝑦)))
2221imbi2d 343 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑏 → ((𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ (𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
23222ralbidv 3235 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑏 → (∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2418, 23anbi12d 643 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 = 𝑏 → ((𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦))) ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))))
2517, 24elab 3647 . . . . . . . . . . . . . . . . . . . . 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 12625 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ ℤ)
301nnge1d 12284 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ≤ 𝐾)
3130adantr 485 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ≤ 𝐾)
3213zred 12700 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → 𝐾 ∈ ℝ)
3332leidd 11780 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 𝐾𝐾)
3429, 13, 13, 31, 33elfzd 13543 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝐾 ∈ (1...𝐾))
3528, 34ffvelcdmd 7081 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ (1...(𝑁 + 𝐾)))
36 elfznn 13581 . . . . . . . . . . . . . . . . 17 ((𝑏𝐾) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝐾) ∈ ℕ)
3735, 36syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℕ)
3837nnzd 12617 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℤ)
3914, 38zsubcld 12705 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ)
4037nnred 12248 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℝ)
4140recnd 11237 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℂ)
4241addridd 11410 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((𝑏𝐾) + 0) = (𝑏𝐾))
43 elfzle2 13556 . . . . . . . . . . . . . . . . 17 ((𝑏𝐾) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝐾) ≤ (𝑁 + 𝐾))
4435, 43syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑏𝐾) ≤ (𝑁 + 𝐾))
4542, 44eqbrtrd 5137 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → ((𝑏𝐾) + 0) ≤ (𝑁 + 𝐾))
46 0red 11211 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 ∈ ℝ)
4714zred 12700 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑁 + 𝐾) ∈ ℝ)
4840, 46, 47leaddsub2d 11816 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (((𝑏𝐾) + 0) ≤ (𝑁 + 𝐾) ↔ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
4945, 48mpbid 235 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾)))
5039, 49jca 520 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ∧ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
51 elnn0z 12604 . . . . . . . . . . . . 13 (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0 ↔ (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ∧ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
5250, 51sylibr 237 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
5352adantr 485 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
54533impa 1125 . . . . . . . . . 10 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
5554adantr 485 . . . . . . . . 9 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = (𝐾 + 1)) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
56 eleq1 2857 . . . . . . . . . 10 (((𝑏‘1) − 1) = if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) → (((𝑏‘1) − 1) ∈ ℕ0 ↔ if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0))
57 eleq1 2857 . . . . . . . . . 10 ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) = if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) → ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0 ↔ if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0))
58 1red 11209 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → 1 ∈ ℝ)
5958leidd 11780 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → 1 ≤ 1)
6029, 13, 29, 59, 31elfzd 13543 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ (1...𝐾))
6128, 60ffvelcdmd 7081 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ (1...(𝑁 + 𝐾)))
62 elfznn 13581 . . . . . . . . . . . . . . . . . . 19 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘1) ∈ ℕ)
6362nnzd 12617 . . . . . . . . . . . . . . . . . 18 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘1) ∈ ℤ)
6461, 63syl 18 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℤ)
6564, 29zsubcld 12705 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((𝑏‘1) − 1) ∈ ℤ)
66 1cnd 11202 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ ℂ)
6766addridd 11410 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (1 + 0) = 1)
68 elfzle1 13555 . . . . . . . . . . . . . . . . . . 19 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → 1 ≤ (𝑏‘1))
6961, 68syl 18 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 1 ≤ (𝑏‘1))
7067, 69eqbrtrd 5137 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (1 + 0) ≤ (𝑏‘1))
7164zred 12700 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℝ)
7258, 46, 71leaddsub2d 11816 . . . . . . . . . . . . . . . . 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 12604 . . . . . . . . . . . . . . 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 1125 . . . . . . . . . . . 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 1148 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
8281adantr 485 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
83 1zzd 12625 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ∈ ℤ)
84133adant3 1148 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℤ)
8584adantr 485 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
86 simp3 1154 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ (1...(𝐾 + 1)))
87 elfznn 13581 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ∈ ℕ)
8886, 87syl 18 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℕ)
8988adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℕ)
9089nnzd 12617 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℤ)
9189nnge1d 12284 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ≤ 𝑘)
92 elfzle2 13556 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
9386, 92syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ≤ (𝐾 + 1))
9493adantr 485 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
95 neqne 2972 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑘 = (𝐾 + 1) → 𝑘 ≠ (𝐾 + 1))
9695adantl 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≠ (𝐾 + 1))
9796necomd 3019 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ≠ 𝑘)
9894, 97jca 520 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘))
9989nnred 12248 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℝ)
10085zred 12700 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝐾 ∈ ℝ)
101 1red 11209 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ∈ ℝ)
102100, 101readdcld 11238 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℝ)
10399, 102ltlend 11355 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 < (𝐾 + 1) ↔ (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘)))
10498, 103mpbird 260 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 < (𝐾 + 1))
10588nnzd 12617 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℤ)
106 zleltp1 12645 . . . . . . . . . . . . . . . . . . . . . 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 13543 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ (1...𝐾))
11182, 110ffvelcdmd 7081 . . . . . . . . . . . . . . . . 17 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ (1...(𝑁 + 𝐾)))
112 elfznn 13581 . . . . . . . . . . . . . . . . 17 ((𝑏𝑘) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑘) ∈ ℕ)
113111, 112syl 18 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ ℕ)
114113nnzd 12617 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ ℤ)
115114adantr 485 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏𝑘) ∈ ℤ)
11682adantr 485 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
117 1zzd 12625 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℤ)
11885adantr 485 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐾 ∈ ℤ)
11990adantr 485 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℤ)
120119, 117zsubcld 12705 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ ℤ)
12191adantr 485 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ 𝑘)
122 neqne 2972 . . . . . . . . . . . . . . . . . . . . . 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 11355 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ (1 ≤ 𝑘𝑘 ≠ 1)))
128124, 127mpbird 260 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 < 𝑘)
129117, 119zltlem1d 12648 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ 1 ≤ (𝑘 − 1)))
130128, 129mpbid 235 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ (𝑘 − 1))
13188nnred 12248 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℝ)
132583adant3 1148 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 1 ∈ ℝ)
133323adant3 1148 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℝ)
134 lesubadd 11686 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑘 − 1) ≤ 𝐾𝑘 ≤ (𝐾 + 1)))
135131, 132, 133, 134syl3anc 1396 . . . . . . . . . . . . . . . . . . . . 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 13543 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ (1...𝐾))
140116, 139ffvelcdmd 7081 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ (1...(𝑁 + 𝐾)))
141 elfznn 13581 . . . . . . . . . . . . . . . 16 ((𝑏‘(𝑘 − 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑘 − 1)) ∈ ℕ)
142140, 141syl 18 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℕ)
143142nnzd 12617 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℤ)
144115, 143zsubcld 12705 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℤ)
145144, 117zsubcld 12705 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ)
146 0p1e1 12361 . . . . . . . . . . . . . . 15 (0 + 1) = 1
147146a1i 11 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (0 + 1) = 1)
148 1cnd 11202 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℂ)
149148subidd 11557 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 − 1) = 0)
150143zred 12700 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℝ)
151150recnd 11237 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℂ)
152151addridd 11410 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏‘(𝑘 − 1)) + 0) = (𝑏‘(𝑘 − 1)))
153126ltm1d 12147 . . . . . . . . . . . . . . . . . . 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 1148 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
158157adantr 485 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
159158adantr 485 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
160 breq1 5116 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = (𝑘 − 1) → (𝑥 < 𝑦 ↔ (𝑘 − 1) < 𝑦))
161 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = (𝑘 − 1) → (𝑏𝑥) = (𝑏‘(𝑘 − 1)))
162161breq1d 5123 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = (𝑘 − 1) → ((𝑏𝑥) < (𝑏𝑦) ↔ (𝑏‘(𝑘 − 1)) < (𝑏𝑦)))
163160, 162imbi12d 347 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = (𝑘 − 1) → ((𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)) ↔ ((𝑘 − 1) < 𝑦 → (𝑏‘(𝑘 − 1)) < (𝑏𝑦))))
164 breq2 5117 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑘 → ((𝑘 − 1) < 𝑦 ↔ (𝑘 − 1) < 𝑘))
165 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = 𝑘 → (𝑏𝑦) = (𝑏𝑘))
166165breq2d 5125 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑘 → ((𝑏‘(𝑘 − 1)) < (𝑏𝑦) ↔ (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
167164, 166imbi12d 347 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑘 → (((𝑘 − 1) < 𝑦 → (𝑏‘(𝑘 − 1)) < (𝑏𝑦)) ↔ ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘))))
168163, 167rspc2va 3602 . . . . . . . . . . . . . . . . . . . 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 5137 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏‘(𝑘 − 1)) + 0) < (𝑏𝑘))
172 0red 11211 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 ∈ ℝ)
173115zred 12700 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏𝑘) ∈ ℝ)
174150, 172, 173ltaddsub2d 11815 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏‘(𝑘 − 1)) + 0) < (𝑏𝑘) ↔ 0 < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
175171, 174mpbid 235 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 < ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
176149, 175eqbrtrd 5137 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
177 zlem1lt 12646 . . . . . . . . . . . . . . . 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 5137 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (0 + 1) ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
181144zred 12700 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℝ)
182 leaddsub 11690 . . . . . . . . . . . . . 14 ((0 ∈ ℝ ∧ 1 ∈ ℝ ∧ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℝ) → ((0 + 1) ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
183172, 125, 181, 182syl3anc 1396 . . . . . . . . . . . . 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 12604 . . . . . . . . . . 11 ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0 ↔ ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ ∧ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
187185, 186sylibr 237 . . . . . . . . . 10 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0)
18856, 57, 80, 187ifbothda 4531 . . . . . . . . 9 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0)
1897, 8, 55, 188ifbothda 4531 . . . . . . . 8 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0)
1901893expa 1134 . . . . . . 7 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0)
191190fmpttd 7111 . . . . . 6 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))):(1...(𝐾 + 1))⟶ℕ0)
192 eqidd 2770 . . . . . . . . 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 2771 . . . . . . . . . 10 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑘 = (𝐾 + 1) ↔ 𝑖 = (𝐾 + 1)))
195193eqeq1d 2771 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑘 = 1 ↔ 𝑖 = 1))
196193fveq2d 6886 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑏𝑘) = (𝑏𝑖))
197193fvoveq1d 7433 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑏‘(𝑘 − 1)) = (𝑏‘(𝑖 − 1)))
198196, 197oveq12d 7429 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
199198oveq1d 7426 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
200195, 199ifbieq2d 4519 . . . . . . . . . 10 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
201194, 200ifbieq2d 4519 . . . . . . . . 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 7446 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ V)
204 ovexd 7446 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ V)
205 ovexd 7446 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ V)
206204, 205ifcld 4539 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ V)
207203, 206ifcld 4539 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ V)
208192, 201, 202, 207fvmptd 6998 . . . . . . . 8 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
209208sumeq2dv 15753 . . . . . . 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 12901 . . . . . . . . . 10 ℕ = (ℤ‘1)
212210, 211eleqtrdi 2879 . . . . . . . . 9 ((𝜑𝑏𝐵) → 𝐾 ∈ (ℤ‘1))
213 eleq1 2857 . . . . . . . . . . . 12 (((𝑁 + 𝐾) − (𝑏𝐾)) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ↔ if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ))
214 eleq1 2857 . . . . . . . . . . . 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 1148 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑁 ∈ ℤ)
216215adantr 485 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → 𝑁 ∈ ℤ)
217133adant3 1148 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℤ)
218217adantr 485 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
219216, 218zaddcld 12704 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑁 + 𝐾) ∈ ℤ)
220373adant3 1148 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → (𝑏𝐾) ∈ ℕ)
221220adantr 485 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑏𝐾) ∈ ℕ)
222221nnzd 12617 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑏𝐾) ∈ ℤ)
223219, 222zsubcld 12705 . . . . . . . . . . . 12 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ)
224 eleq1 2857 . . . . . . . . . . . . 13 (((𝑏‘1) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → (((𝑏‘1) − 1) ∈ ℤ ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ))
225 eleq1 2857 . . . . . . . . . . . . 13 ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ ℤ ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ))
226643adant3 1148 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → (𝑏‘1) ∈ ℤ)
227226adantr 485 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑏‘1) ∈ ℤ)
228227adantr 485 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → (𝑏‘1) ∈ ℤ)
229 1zzd 12625 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → 1 ∈ ℤ)
230228, 229zsubcld 12705 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) ∈ ℤ)
231283adant3 1148 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
232231adantr 485 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
233232adantr 485 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
234 1zzd 12625 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ∈ ℤ)
235217adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
236 elfznn 13581 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 ∈ (1...(𝐾 + 1)) → 𝑖 ∈ ℕ)
237236adantl 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℕ)
2382373impa 1125 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℕ)
239238nnzd 12617 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℤ)
240239adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ ℤ)
241238nnge1d 12284 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 1 ≤ 𝑖)
242241adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ≤ 𝑖)
243 simp3 1154 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ (1...(𝐾 + 1)))
244 elfzle2 13556 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 ∈ (1...(𝐾 + 1)) → 𝑖 ≤ (𝐾 + 1))
245243, 244syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ≤ (𝐾 + 1))
246245adantr 485 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ≤ (𝐾 + 1))
247 neqne 2972 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑖 = (𝐾 + 1) → 𝑖 ≠ (𝐾 + 1))
248247adantl 486 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ≠ (𝐾 + 1))
249248necomd 3019 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝐾 + 1) ≠ 𝑖)
250246, 249jca 520 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑖))
251240zred 12700 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ ℝ)
252235zred 12700 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℝ)
253 1red 11209 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ∈ ℝ)
254252, 253readdcld 11238 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℝ)
255251, 254ltlend 11355 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖 < (𝐾 + 1) ↔ (𝑖 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑖)))
256250, 255mpbird 260 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 < (𝐾 + 1))
257 zleltp1 12645 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑖𝐾𝑖 < (𝐾 + 1)))
258240, 235, 257syl2anc 595 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖𝐾𝑖 < (𝐾 + 1)))
259256, 258mpbird 260 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖𝐾)
260234, 235, 240, 242, 259elfzd 13543 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ (1...𝐾))
261260adantr 485 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ (1...𝐾))
262233, 261ffvelcdmd 7081 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ (1...(𝑁 + 𝐾)))
263 elfznn 13581 . . . . . . . . . . . . . . . . 17 ((𝑏𝑖) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑖) ∈ ℕ)
264262, 263syl 18 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℕ)
265264nnzd 12617 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℤ)
266 1zzd 12625 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℤ)
267235adantr 485 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℤ)
268240adantr 485 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℤ)
269268, 266zsubcld 12705 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ ℤ)
270242adantr 485 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ≤ 𝑖)
271 neqne 2972 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑖 = 1 → 𝑖 ≠ 1)
272271adantl 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ≠ 1)
273270, 272jca 520 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 ≤ 𝑖𝑖 ≠ 1))
274 1red 11209 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℝ)
275268zred 12700 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℝ)
276274, 275ltlend 11355 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 ≤ 𝑖𝑖 ≠ 1)))
277273, 276mpbird 260 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 < 𝑖)
278 zltp1le 12644 . . . . . . . . . . . . . . . . . . . . . 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 11690 . . . . . . . . . . . . . . . . . . . . 21 ((1 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝑖 ∈ ℝ) → ((1 + 1) ≤ 𝑖 ↔ 1 ≤ (𝑖 − 1)))
282274, 274, 275, 281syl3anc 1396 . . . . . . . . . . . . . . . . . . . 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 11686 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑖 − 1) ≤ 𝐾𝑖 ≤ (𝐾 + 1)))
287275, 274, 285, 286syl3anc 1396 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → ((𝑖 − 1) ≤ 𝐾𝑖 ≤ (𝐾 + 1)))
288284, 287mpbird 260 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ≤ 𝐾)
289266, 267, 269, 283, 288elfzd 13543 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ (1...𝐾))
290233, 289ffvelcdmd 7081 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)))
291 elfznn 13581 . . . . . . . . . . . . . . . . 17 ((𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
292290, 291syl 18 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
293292nnzd 12617 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℤ)
294265, 293zsubcld 12705 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ)
295294, 266zsubcld 12705 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ ℤ)
296224, 225, 230, 295ifbothda 4531 . . . . . . . . . . . 12 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ)
297213, 214, 223, 296ifbothda 4531 . . . . . . . . . . 11 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ)
2982973expa 1134 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ)
299298zcnd 12701 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℂ)
300 eqeq1 2773 . . . . . . . . . 10 (𝑖 = (𝐾 + 1) → (𝑖 = (𝐾 + 1) ↔ (𝐾 + 1) = (𝐾 + 1)))
301 eqeq1 2773 . . . . . . . . . . 11 (𝑖 = (𝐾 + 1) → (𝑖 = 1 ↔ (𝐾 + 1) = 1))
302 fveq2 6882 . . . . . . . . . . . . 13 (𝑖 = (𝐾 + 1) → (𝑏𝑖) = (𝑏‘(𝐾 + 1)))
303 fvoveq1 7434 . . . . . . . . . . . . 13 (𝑖 = (𝐾 + 1) → (𝑏‘(𝑖 − 1)) = (𝑏‘((𝐾 + 1) − 1)))
304302, 303oveq12d 7429 . . . . . . . . . . . 12 (𝑖 = (𝐾 + 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = ((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))))
305304oveq1d 7426 . . . . . . . . . . 11 (𝑖 = (𝐾 + 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))
306301, 305ifbieq2d 4519 . . . . . . . . . 10 (𝑖 = (𝐾 + 1) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))
307300, 306ifbieq2d 4519 . . . . . . . . 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 15807 . . . . . . . 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 2770 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (𝐾 + 1) = (𝐾 + 1))
310309iftrued 4500 . . . . . . . . . 10 ((𝜑𝑏𝐵) → if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))) = ((𝑁 + 𝐾) − (𝑏𝐾)))
311310oveq2d 7427 . . . . . . . . 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 13581 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝐾) → 𝑖 ∈ ℕ)
313312adantl 486 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℕ)
314313nnred 12248 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℝ)
31532adantr 485 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝐾 ∈ ℝ)
316 1red 11209 . . . . . . . . . . . . . . . . 17 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℝ)
317315, 316readdcld 11238 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝐾 + 1) ∈ ℝ)
318 elfzle2 13556 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝐾) → 𝑖𝐾)
319318adantl 486 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖𝐾)
320315ltp1d 12145 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝐾 < (𝐾 + 1))
321314, 315, 317, 319, 320lelttrd 11368 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 < (𝐾 + 1))
322314, 321ltned 11346 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ≠ (𝐾 + 1))
323322neneqd 2969 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → ¬ 𝑖 = (𝐾 + 1))
324323iffalsed 4503 . . . . . . . . . . . 12 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
325324sumeq2dv 15753 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
326325oveq1d 7426 . . . . . . . . . 10 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + ((𝑁 + 𝐾) − (𝑏𝐾))) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))))
327 eqeq1 2773 . . . . . . . . . . . . . 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 2773 . . . . . . . . . . . . . 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 2770 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = ((𝑏‘1) − 1))
330 simpr 489 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → 𝑖 = 1)
331330iftrued 4500 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏‘1))
332331eqcomd 2775 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → (𝑏‘1) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
333332oveq1d 7426 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
334329, 333eqtrd 2804 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
335 eqidd 2770 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
336 simpr 489 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → ¬ 𝑖 = 1)
337336iffalsed 4503 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
338337oveq1d 7426 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
339338eqcomd 2775 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
340335, 339eqtrd 2804 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
341327, 328, 334, 340ifbothda 4531 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
342341sumeq2dv 15753 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
343342oveq1d 7426 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))) = (Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) + ((𝑁 + 𝐾) − (𝑏𝐾))))
344 fzfid 14009 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (1...𝐾) ∈ Fin)
345 eleq1 2857 . . . . . . . . . . . . . . . . . . . . 21 ((𝑏‘1) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) → ((𝑏‘1) ∈ ℤ ↔ if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ))
346 eleq1 2857 . . . . . . . . . . . . . . . . . . . . 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 7081 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑏𝑖) ∈ (1...(𝑁 + 𝐾)))
351263nnzd 12617 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑏𝑖) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑖) ∈ ℤ)
352350, 351syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑏𝑖) ∈ ℤ)
353352adantr 485 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℤ)
354348adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
355 1zzd 12625 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℤ)
35613ad2antrr 738 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℤ)
357313nnzd 12617 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℤ)
358357adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℤ)
359358, 355zsubcld 12705 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ ℤ)
360313nnge1d 12284 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 11355 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 ≤ 𝑖𝑖 ≠ 1)))
367363, 366mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 < 𝑖)
368 zltlem1 12647 . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 11642 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ∈ ℝ)
372314lem1d 12148 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ≤ 𝑖)
373371, 314, 315, 372, 319letrd 11367 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ≤ 𝐾)
374373adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ≤ 𝐾)
375355, 356, 359, 370, 374elfzd 13543 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ (1...𝐾))
376354, 375ffvelcdmd 7081 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)))
377376, 291syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
378377nnzd 12617 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℤ)
379353, 378zsubcld 12705 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ)
380345, 346, 347, 379ifbothda 4531 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ)
381380zcnd 12701 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℂ)
38266adantr 485 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℂ)
383344, 381, 382fsumsub 15839 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − Σ𝑖 ∈ (1...𝐾)1))
384 id 23 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 1 → 𝑖 = 1)
385384iftrued 4500 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 1 → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏‘1))
386212, 381, 385fsum1p 15804 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))))
38758adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ∈ ℝ)
388 elfzle1 13555 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑖 ∈ ((1 + 1)...𝐾) → (1 + 1) ≤ 𝑖)
389388adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → (1 + 1) ≤ 𝑖)
39029adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ∈ ℤ)
391 elfzelz 13552 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 11346 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ≠ 𝑖)
396395necomd 3019 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 𝑖 ≠ 1)
397396neneqd 2969 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → ¬ 𝑖 = 1)
398397iffalsed 4503 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
399398sumeq2dv 15753 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
400399oveq2d 7427 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
40132recnd 11237 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → 𝐾 ∈ ℂ)
402401, 66npcand 11573 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝐾 − 1) + 1) = 𝐾)
403402eqcomd 2775 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → 𝐾 = ((𝐾 − 1) + 1))
404403oveq2d 7427 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((1 + 1)...𝐾) = ((1 + 1)...((𝐾 − 1) + 1)))
405404sumeq1d 15751 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
406405oveq2d 7427 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
407 elfzelz 13552 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1)) → 𝑖 ∈ ℤ)
408407adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 ∈ ℤ)
409408zcnd 12701 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 ∈ ℂ)
410 1cnd 11202 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 1 ∈ ℂ)
411409, 410npcand 11573 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → ((𝑖 − 1) + 1) = 𝑖)
412411eqcomd 2775 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 = ((𝑖 − 1) + 1))
413412fveq2d 6886 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → (𝑏𝑖) = (𝑏‘((𝑖 − 1) + 1)))
414 eqidd 2770 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → (𝑏‘(𝑖 − 1)) = (𝑏‘(𝑖 − 1)))
415413, 414oveq12d 7429 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = ((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
416415sumeq2dv 15753 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
417416oveq2d 7427 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))))
41813, 29zsubcld 12705 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → (𝐾 − 1) ∈ ℤ)
41928adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
420 1zzd 12625 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ∈ ℤ)
42113adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝐾 ∈ ℤ)
422 elfznn 13581 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (𝑠 ∈ (1...(𝐾 − 1)) → 𝑠 ∈ ℕ)
423422adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℕ)
424423nnzd 12617 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℤ)
425424peano2zd 12703 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ ℤ)
426 1red 11209 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ∈ ℝ)
427423nnred 12248 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℝ)
428427, 426readdcld 11238 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ ℝ)
429423nnge1d 12284 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ≤ 𝑠)
430427lep1d 12146 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ≤ (𝑠 + 1))
431426, 427, 428, 429, 430letrd 11367 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ≤ (𝑠 + 1))
432 elfzle2 13556 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑠 ∈ (1...(𝐾 − 1)) → 𝑠 ≤ (𝐾 − 1))
433432adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ≤ (𝐾 − 1))
43432adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝐾 ∈ ℝ)
435 leaddsub 11690 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑠 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑠 + 1) ≤ 𝐾𝑠 ≤ (𝐾 − 1)))
436427, 426, 434, 435syl3anc 1396 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑠 + 1) ≤ 𝐾𝑠 ≤ (𝐾 − 1)))
437433, 436mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ≤ 𝐾)
438420, 421, 425, 431, 437elfzd 13543 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ (1...𝐾))
439419, 438ffvelcdmd 7081 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ (1...(𝑁 + 𝐾)))
440 elfznn 13581 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑏‘(𝑠 + 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑠 + 1)) ∈ ℕ)
441439, 440syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ ℕ)
442441nnzd 12617 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ ℤ)
443434, 426resubcld 11642 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝐾 − 1) ∈ ℝ)
444434lem1d 12148 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝐾 − 1) ≤ 𝐾)
445427, 443, 434, 433, 444letrd 11367 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠𝐾)
446420, 421, 424, 429, 445elfzd 13543 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ (1...𝐾))
447419, 446ffvelcdmd 7081 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏𝑠) ∈ (1...(𝑁 + 𝐾)))
448 elfznn 13581 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑏𝑠) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑠) ∈ ℕ)
449448nnzd 12617 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑏𝑠) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑠) ∈ ℤ)
450447, 449syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏𝑠) ∈ ℤ)
451442, 450zsubcld 12705 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) ∈ ℤ)
452451zcnd 12701 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) ∈ ℂ)
453 fvoveq1 7434 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = (𝑖 − 1) → (𝑏‘(𝑠 + 1)) = (𝑏‘((𝑖 − 1) + 1)))
454 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = (𝑖 − 1) → (𝑏𝑠) = (𝑏‘(𝑖 − 1)))
455453, 454oveq12d 7429 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑠 = (𝑖 − 1) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = ((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
45629, 29, 418, 452, 455fsumshft 15831 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
457456oveq2d 7427 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))))
458457eqcomd 2775 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))))
459 fvoveq1 7434 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = 𝑖 → (𝑏‘(𝑠 + 1)) = (𝑏‘(𝑖 + 1)))
460 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = 𝑖 → (𝑏𝑠) = (𝑏𝑖))
461459, 460oveq12d 7429 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = 𝑖 → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = ((𝑏‘(𝑖 + 1)) − (𝑏𝑖)))
462 nfcv 2931 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑖((𝑏‘(𝑠 + 1)) − (𝑏𝑠))
463 nfcv 2931 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑠((𝑏‘(𝑖 + 1)) − (𝑏𝑖))
464461, 462, 463cbvsum 15746 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))
465464a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖)))
466465oveq2d 7427 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))))
467 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = 𝑖 → (𝑏𝑤) = (𝑏𝑖))
468 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = (𝑖 + 1) → (𝑏𝑤) = (𝑏‘(𝑖 + 1)))
469 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = 1 → (𝑏𝑤) = (𝑏‘1))
470 fveq2 6882 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = ((𝐾 − 1) + 1) → (𝑏𝑤) = (𝑏‘((𝐾 − 1) + 1)))
471402, 212eqeltrd 2869 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → ((𝐾 − 1) + 1) ∈ (ℤ‘1))
47228adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
473 1zzd 12625 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 1 ∈ ℤ)
47413adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝐾 ∈ ℤ)
475 elfzelz 13552 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 𝑤 ∈ ℤ)
476475adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ∈ ℤ)
477 elfzle1 13555 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 1 ≤ 𝑤)
478477adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 1 ≤ 𝑤)
479 elfzle2 13556 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 𝑤 ≤ ((𝐾 − 1) + 1))
480479adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ≤ ((𝐾 − 1) + 1))
481402adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → ((𝐾 − 1) + 1) = 𝐾)
482480, 481breqtrd 5141 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤𝐾)
483473, 474, 476, 478, 482elfzd 13543 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ∈ (1...𝐾))
484472, 483ffvelcdmd 7081 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → (𝑏𝑤) ∈ (1...(𝑁 + 𝐾)))
485 elfznn 13581 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑏𝑤) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑤) ∈ ℕ)
486485nncnd 12249 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑏𝑤) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑤) ∈ ℂ)
487484, 486syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → (𝑏𝑤) ∈ ℂ)
488467, 468, 469, 470, 418, 471, 487telfsum2 15857 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖)) = ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1)))
489488oveq2d 7427 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))) = ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))))
49071recnd 11237 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℂ)
49137nncnd 12249 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℂ)
492402fveq2d 6886 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝜑𝑏𝐵) → (𝑏‘((𝐾 − 1) + 1)) = (𝑏𝐾))
493492eleq1d 2854 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑏𝐵) → ((𝑏‘((𝐾 − 1) + 1)) ∈ ℂ ↔ (𝑏𝐾) ∈ ℂ))
494491, 493mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → (𝑏‘((𝐾 − 1) + 1)) ∈ ℂ)
495490, 494pncan3d 11572 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))) = (𝑏‘((𝐾 − 1) + 1)))
496495, 492eqtrd 2804 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))) = (𝑏𝐾))
497489, 496eqtrd 2804 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))) = (𝑏𝐾))
498466, 497eqtrd 2804 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = (𝑏𝐾))
499458, 498eqtrd 2804 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
500417, 499eqtrd 2804 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
501406, 500eqtrd 2804 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
502400, 501eqtrd 2804 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))) = (𝑏𝐾))
503386, 502eqtrd 2804 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
504 fsumconst 15841 . . . . . . . . . . . . . . . . . . . . 21 (((1...𝐾) ∈ Fin ∧ 1 ∈ ℂ) → Σ𝑖 ∈ (1...𝐾)1 = ((♯‘(1...𝐾)) · 1))
505344, 66, 504syl2anc 595 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)1 = ((♯‘(1...𝐾)) · 1))
506210nnnn0d 12565 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → 𝐾 ∈ ℕ0)
507 hashfz1 14382 . . . . . . . . . . . . . . . . . . . . . . 23 (𝐾 ∈ ℕ0 → (♯‘(1...𝐾)) = 𝐾)
508506, 507syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → (♯‘(1...𝐾)) = 𝐾)
509508oveq1d 7426 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((♯‘(1...𝐾)) · 1) = (𝐾 · 1))
510401mulridd 11226 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → (𝐾 · 1) = 𝐾)
511509, 510eqtrd 2804 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → ((♯‘(1...𝐾)) · 1) = 𝐾)
512505, 511eqtrd 2804 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)1 = 𝐾)
513503, 512oveq12d 7429 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − Σ𝑖 ∈ (1...𝐾)1) = ((𝑏𝐾) − 𝐾))
514383, 513eqtrd 2804 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((𝑏𝐾) − 𝐾))
51541addlidd 11411 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (0 + (𝑏𝐾)) = (𝑏𝐾))
516515eqcomd 2775 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏𝐾) = (0 + (𝑏𝐾)))
517516oveq1d 7426 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → ((𝑏𝐾) − 𝐾) = ((0 + (𝑏𝐾)) − 𝐾))
518514, 517eqtrd 2804 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((0 + (𝑏𝐾)) − 𝐾))
519 0cnd 11199 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 0 ∈ ℂ)
520519, 401, 41subsub3d 11599 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (0 − (𝐾 − (𝑏𝐾))) = ((0 + (𝑏𝐾)) − 𝐾))
521520eqcomd 2775 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((0 + (𝑏𝐾)) − 𝐾) = (0 − (𝐾 − (𝑏𝐾))))
522518, 521eqtrd 2804 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (0 − (𝐾 − (𝑏𝐾))))
52311zcnd 12701 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝑁 ∈ ℂ)
524523subidd 11557 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑁𝑁) = 0)
525524eqcomd 2775 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 = (𝑁𝑁))
526525oveq1d 7426 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (0 − (𝐾 − (𝑏𝐾))) = ((𝑁𝑁) − (𝐾 − (𝑏𝐾))))
527522, 526eqtrd 2804 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((𝑁𝑁) − (𝐾 − (𝑏𝐾))))
528401, 41subcld 11569 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝐾 − (𝑏𝐾)) ∈ ℂ)
529523, 523, 528subsub4d 11600 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑁𝑁) − (𝐾 − (𝑏𝐾))) = (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))))
530527, 529eqtrd 2804 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))))
531523, 401, 41addsubassd 11589 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) = (𝑁 + (𝐾 − (𝑏𝐾))))
532531eqcomd 2775 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → (𝑁 + (𝐾 − (𝑏𝐾))) = ((𝑁 + 𝐾) − (𝑏𝐾)))
533532oveq2d 7427 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾))))
534530, 533eqtrd 2804 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾))))
535 1zzd 12625 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℤ)
536380, 535zsubcld 12705 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℤ)
537344, 536fsumzcl 15786 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℤ)
538537zcnd 12701 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℂ)
53952nn0cnd 12567 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℂ)
540538, 539, 523addlsub 11630 . . . . . . . . . . . 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 2804 . . . . . . . . . 10 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
543326, 542eqtrd 2804 . . . . . . . . 9 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
544311, 543eqtrd 2804 . . . . . . . 8 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))) = 𝑁)
545308, 544eqtrd 2804 . . . . . . 7 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = 𝑁)
546209, 545eqtrd 2804 . . . . . 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 7444 . . . . . . 7 (1...(𝐾 + 1)) ∈ V
549548mptex 7222 . . . . . 6 (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ V
550 feq1 6684 . . . . . . 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 6884 . . . . . . . . 9 ((𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (𝑔𝑖) = ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖))
553552sumeq2dv 15753 . . . . . . . 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 2771 . . . . . . 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 3647 . . . . 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 2872 . . 3 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ 𝐴)
5616, 560eqeltrrd 2870 . 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 7110 1 (𝜑𝐺:𝐵𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  w3a 1101   = wceq 1567  wcel 2149  {cab 2747  wne 2964  wral 3085  Vcvv 3463  ifcif 4492  {csn 4594  cop 4600   class class class wbr 5113  cmpt 5196  wf 6533  cfv 6537  (class class class)co 7411  Fincfn 8943  cc 11098  cr 11099  0cc0 11100  1c1 11101   + caddc 11103   · cmul 11105   < clt 11243  cle 11244  cmin 11441  cn 12233  0cn0 12504  cz 12591  cuz 12862  ...cfz 13535  chash 14366  Σcsu 15737
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-inf2 9610  ax-cnex 11156  ax-resscn 11157  ax-1cn 11158  ax-icn 11159  ax-addcl 11160  ax-addrcl 11161  ax-mulcl 11162  ax-mulrcl 11163  ax-mulcom 11164  ax-addass 11165  ax-mulass 11166  ax-distr 11167  ax-i2m1 11168  ax-1ne0 11169  ax-1rid 11170  ax-rnegex 11171  ax-rrecex 11172  ax-cnre 11173  ax-pre-lttri 11174  ax-pre-lttrn 11175  ax-pre-ltadd 11176  ax-pre-mulgt0 11177  ax-pre-sup 11178
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-int 4917  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-se 5616  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7863  df-1st 7986  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-1o 8453  df-er 8694  df-en 8944  df-dom 8945  df-sdom 8946  df-fin 8947  df-sup 9402  df-oi 9472  df-card 9925  df-pnf 11245  df-mnf 11246  df-xr 11247  df-ltxr 11248  df-le 11249  df-sub 11443  df-neg 11444  df-div 11872  df-nn 12234  df-2 12303  df-3 12304  df-n0 12505  df-z 12592  df-uz 12863  df-rp 13017  df-fz 13536  df-fzo 13683  df-seq 14038  df-exp 14098  df-hash 14367  df-cj 15150  df-re 15151  df-im 15152  df-sqrt 15286  df-abs 15287  df-clim 15539  df-sum 15738
This theorem is referenced by:  sticksstones12  42849
  Copyright terms: Public domain W3C validator