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 42982
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 12303 . . . . . . 7 (𝜑𝐾 ≠ 0)
32adantr 486 . . . . . 6 ((𝜑𝑏𝐵) → 𝐾 ≠ 0)
43neneqd 2965 . . . . 5 ((𝜑𝑏𝐵) → ¬ 𝐾 = 0)
54iffalsed 4500 . . . 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 2771 . . 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 2853 . . . . . . . . 9 (((𝑁 + 𝐾) − (𝑏𝐾)) = if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0 ↔ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0))
8 eleq1 2853 . . . . . . . . 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 12633 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ ℤ)
1110adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 𝑁 ∈ ℤ)
121nnzd 12634 . . . . . . . . . . . . . . . . 17 (𝜑𝐾 ∈ ℤ)
1312adantr 486 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 𝐾 ∈ ℤ)
1411, 13zaddcld 12722 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝑁 + 𝐾) ∈ ℤ)
15 sticksstones10.5 . . . . . . . . . . . . . . . . . . . . . 22 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}
1615eleq2i 2857 . . . . . . . . . . . . . . . . . . . . 21 (𝑏𝐵𝑏 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
17 vex 3461 . . . . . . . . . . . . . . . . . . . . . 22 𝑏 ∈ V
18 feq1 6687 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑏 → (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾))))
19 fveq1 6884 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑏 → (𝑓𝑥) = (𝑏𝑥))
20 fveq1 6884 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑏 → (𝑓𝑦) = (𝑏𝑦))
2119, 20breq12d 5124 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑏 → ((𝑓𝑥) < (𝑓𝑦) ↔ (𝑏𝑥) < (𝑏𝑦)))
2221imbi2d 343 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑏 → ((𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ (𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
23222ralbidv 3231 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑏 → (∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2418, 23anbi12d 644 . . . . . . . . . . . . . . . . . . . . . 22 (𝑓 = 𝑏 → ((𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦))) ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))))
2517, 24elab 3640 . . . . . . . . . . . . . . . . . . . . 21 (𝑏 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))} ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2616, 25bitri 278 . . . . . . . . . . . . . . . . . . . 20 (𝑏𝐵 ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2726bilani 510 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2827simpld 500 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
29 1zzd 12642 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ ℤ)
301nnge1d 12301 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ≤ 𝐾)
3130adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ≤ 𝐾)
3213zred 12718 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → 𝐾 ∈ ℝ)
3332leidd 11797 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 𝐾𝐾)
3429, 13, 13, 31, 33elfzd 13561 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝐾 ∈ (1...𝐾))
3528, 34ffvelcdmd 7084 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ (1...(𝑁 + 𝐾)))
36 elfznn 13600 . . . . . . . . . . . . . . . . 17 ((𝑏𝐾) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝐾) ∈ ℕ)
3735, 36syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℕ)
3837nnzd 12634 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℤ)
3914, 38zsubcld 12723 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ)
4037nnred 12265 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℝ)
4140recnd 11254 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℂ)
4241addridd 11427 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((𝑏𝐾) + 0) = (𝑏𝐾))
43 elfzle2 13574 . . . . . . . . . . . . . . . . 17 ((𝑏𝐾) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝐾) ≤ (𝑁 + 𝐾))
4435, 43syl 18 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑏𝐾) ≤ (𝑁 + 𝐾))
4542, 44eqbrtrd 5135 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → ((𝑏𝐾) + 0) ≤ (𝑁 + 𝐾))
46 0red 11228 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 ∈ ℝ)
4714zred 12718 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑁 + 𝐾) ∈ ℝ)
4840, 46, 47leaddsub2d 11833 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (((𝑏𝐾) + 0) ≤ (𝑁 + 𝐾) ↔ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
4945, 48mpbid 235 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾)))
5039, 49jca 521 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ∧ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
51 elnn0z 12621 . . . . . . . . . . . . 13 (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0 ↔ (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ∧ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
5250, 51sylibr 237 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
5352adantr 486 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
54533impa 1127 . . . . . . . . . 10 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
5554adantr 486 . . . . . . . . 9 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = (𝐾 + 1)) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
56 eleq1 2853 . . . . . . . . . 10 (((𝑏‘1) − 1) = if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) → (((𝑏‘1) − 1) ∈ ℕ0 ↔ if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0))
57 eleq1 2853 . . . . . . . . . 10 ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) = if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) → ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0 ↔ if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0))
58 1red 11226 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → 1 ∈ ℝ)
5958leidd 11797 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → 1 ≤ 1)
6029, 13, 29, 59, 31elfzd 13561 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ (1...𝐾))
6128, 60ffvelcdmd 7084 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ (1...(𝑁 + 𝐾)))
62 elfznn 13600 . . . . . . . . . . . . . . . . . . 19 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘1) ∈ ℕ)
6362nnzd 12634 . . . . . . . . . . . . . . . . . 18 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘1) ∈ ℤ)
6461, 63syl 18 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℤ)
6564, 29zsubcld 12723 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((𝑏‘1) − 1) ∈ ℤ)
66 1cnd 11219 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ ℂ)
6766addridd 11427 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (1 + 0) = 1)
68 elfzle1 13573 . . . . . . . . . . . . . . . . . . 19 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → 1 ≤ (𝑏‘1))
6961, 68syl 18 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 1 ≤ (𝑏‘1))
7067, 69eqbrtrd 5135 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (1 + 0) ≤ (𝑏‘1))
7164zred 12718 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℝ)
7258, 46, 71leaddsub2d 11833 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → ((1 + 0) ≤ (𝑏‘1) ↔ 0 ≤ ((𝑏‘1) − 1)))
7370, 72mpbid 235 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 ≤ ((𝑏‘1) − 1))
7465, 73jca 521 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (((𝑏‘1) − 1) ∈ ℤ ∧ 0 ≤ ((𝑏‘1) − 1)))
75 elnn0z 12621 . . . . . . . . . . . . . . 15 (((𝑏‘1) − 1) ∈ ℕ0 ↔ (((𝑏‘1) − 1) ∈ ℤ ∧ 0 ≤ ((𝑏‘1) − 1)))
7674, 75sylibr 237 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑏‘1) − 1) ∈ ℕ0)
7776adantr 486 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ ℕ0)
78773impa 1127 . . . . . . . . . . . 12 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ ℕ0)
7978adantr 486 . . . . . . . . . . 11 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → ((𝑏‘1) − 1) ∈ ℕ0)
8079adantr 486 . . . . . . . . . 10 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ 𝑘 = 1) → ((𝑏‘1) − 1) ∈ ℕ0)
81283adant3 1150 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
8281adantr 486 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
83 1zzd 12642 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ∈ ℤ)
84133adant3 1150 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℤ)
8584adantr 486 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
86 simp3 1156 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ (1...(𝐾 + 1)))
87 elfznn 13600 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ∈ ℕ)
8886, 87syl 18 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℕ)
8988adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℕ)
9089nnzd 12634 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℤ)
9189nnge1d 12301 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ≤ 𝑘)
92 elfzle2 13574 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
9386, 92syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ≤ (𝐾 + 1))
9493adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
95 neqne 2968 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑘 = (𝐾 + 1) → 𝑘 ≠ (𝐾 + 1))
9695adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≠ (𝐾 + 1))
9796necomd 3015 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ≠ 𝑘)
9894, 97jca 521 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘))
9989nnred 12265 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℝ)
10085zred 12718 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝐾 ∈ ℝ)
101 1red 11226 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ∈ ℝ)
102100, 101readdcld 11255 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℝ)
10399, 102ltlend 11372 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 < (𝐾 + 1) ↔ (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘)))
10498, 103mpbird 260 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 < (𝐾 + 1))
10588nnzd 12634 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℤ)
106 zleltp1 12662 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑘𝐾𝑘 < (𝐾 + 1)))
107105, 84, 106syl2anc 596 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → (𝑘𝐾𝑘 < (𝐾 + 1)))
108107adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘𝐾𝑘 < (𝐾 + 1)))
109104, 108mpbird 260 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘𝐾)
11083, 85, 90, 91, 109elfzd 13561 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ (1...𝐾))
11182, 110ffvelcdmd 7084 . . . . . . . . . . . . . . . . 17 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ (1...(𝑁 + 𝐾)))
112 elfznn 13600 . . . . . . . . . . . . . . . . 17 ((𝑏𝑘) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑘) ∈ ℕ)
113111, 112syl 18 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ ℕ)
114113nnzd 12634 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ ℤ)
115114adantr 486 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏𝑘) ∈ ℤ)
11682adantr 486 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
117 1zzd 12642 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℤ)
11885adantr 486 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐾 ∈ ℤ)
11990adantr 486 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℤ)
120119, 117zsubcld 12723 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ ℤ)
12191adantr 486 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ 𝑘)
122 neqne 2968 . . . . . . . . . . . . . . . . . . . . . 22 𝑘 = 1 → 𝑘 ≠ 1)
123122adantl 487 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ≠ 1)
124121, 123jca 521 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 ≤ 𝑘𝑘 ≠ 1))
125101adantr 486 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℝ)
12699adantr 486 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℝ)
127125, 126ltlend 11372 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ (1 ≤ 𝑘𝑘 ≠ 1)))
128124, 127mpbird 260 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 < 𝑘)
129117, 119zltlem1d 12665 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ 1 ≤ (𝑘 − 1)))
130128, 129mpbid 235 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ (𝑘 − 1))
13188nnred 12265 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℝ)
132583adant3 1150 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 1 ∈ ℝ)
133323adant3 1150 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℝ)
134 lesubadd 11703 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑘 − 1) ≤ 𝐾𝑘 ≤ (𝐾 + 1)))
135131, 132, 133, 134syl3anc 1398 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑘 − 1) ≤ 𝐾𝑘 ≤ (𝐾 + 1)))
13693, 135mpbird 260 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → (𝑘 − 1) ≤ 𝐾)
137136adantr 486 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 − 1) ≤ 𝐾)
138137adantr 486 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ≤ 𝐾)
139117, 118, 120, 130, 138elfzd 13561 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ (1...𝐾))
140116, 139ffvelcdmd 7084 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ (1...(𝑁 + 𝐾)))
141 elfznn 13600 . . . . . . . . . . . . . . . 16 ((𝑏‘(𝑘 − 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑘 − 1)) ∈ ℕ)
142140, 141syl 18 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℕ)
143142nnzd 12634 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℤ)
144115, 143zsubcld 12723 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℤ)
145144, 117zsubcld 12723 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ)
146 0p1e1 12378 . . . . . . . . . . . . . . 15 (0 + 1) = 1
147146a1i 11 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (0 + 1) = 1)
148 1cnd 11219 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℂ)
149148subidd 11574 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 − 1) = 0)
150143zred 12718 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℝ)
151150recnd 11254 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℂ)
152151addridd 11427 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏‘(𝑘 − 1)) + 0) = (𝑏‘(𝑘 − 1)))
153126ltm1d 12164 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) < 𝑘)
154110adantr 486 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ (1...𝐾))
155139, 154jca 521 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑘 − 1) ∈ (1...𝐾) ∧ 𝑘 ∈ (1...𝐾)))
15627simprd 501 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
1571563adant3 1150 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
158157adantr 486 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
159158adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
160 breq1 5114 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = (𝑘 − 1) → (𝑥 < 𝑦 ↔ (𝑘 − 1) < 𝑦))
161 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = (𝑘 − 1) → (𝑏𝑥) = (𝑏‘(𝑘 − 1)))
162161breq1d 5121 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = (𝑘 − 1) → ((𝑏𝑥) < (𝑏𝑦) ↔ (𝑏‘(𝑘 − 1)) < (𝑏𝑦)))
163160, 162imbi12d 347 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = (𝑘 − 1) → ((𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)) ↔ ((𝑘 − 1) < 𝑦 → (𝑏‘(𝑘 − 1)) < (𝑏𝑦))))
164 breq2 5115 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑘 → ((𝑘 − 1) < 𝑦 ↔ (𝑘 − 1) < 𝑘))
165 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = 𝑘 → (𝑏𝑦) = (𝑏𝑘))
166165breq2d 5123 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑘 → ((𝑏‘(𝑘 − 1)) < (𝑏𝑦) ↔ (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
167164, 166imbi12d 347 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑘 → (((𝑘 − 1) < 𝑦 → (𝑏‘(𝑘 − 1)) < (𝑏𝑦)) ↔ ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘))))
168163, 167rspc2va 3595 . . . . . . . . . . . . . . . . . . . 20 ((((𝑘 − 1) ∈ (1...𝐾) ∧ 𝑘 ∈ (1...𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))) → ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
169155, 159, 168syl2anc 596 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
170153, 169mpd 16 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) < (𝑏𝑘))
171152, 170eqbrtrd 5135 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏‘(𝑘 − 1)) + 0) < (𝑏𝑘))
172 0red 11228 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 ∈ ℝ)
173115zred 12718 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏𝑘) ∈ ℝ)
174150, 172, 173ltaddsub2d 11832 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏‘(𝑘 − 1)) + 0) < (𝑏𝑘) ↔ 0 < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
175171, 174mpbid 235 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 < ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
176149, 175eqbrtrd 5135 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
177 zlem1lt 12663 . . . . . . . . . . . . . . . 16 ((1 ∈ ℤ ∧ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℤ) → (1 ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
178117, 144, 177syl2anc 596 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
179176, 178mpbird 260 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
180147, 179eqbrtrd 5135 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (0 + 1) ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
181144zred 12718 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℝ)
182 leaddsub 11707 . . . . . . . . . . . . . 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 521 . . . . . . . . . . 11 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ ∧ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
186 elnn0z 12621 . . . . . . . . . . 11 ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0 ↔ ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ ∧ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
187185, 186sylibr 237 . . . . . . . . . 10 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0)
18856, 57, 80, 187ifbothda 4528 . . . . . . . . 9 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0)
1897, 8, 55, 188ifbothda 4528 . . . . . . . 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 7114 . . . . . 6 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))):(1...(𝐾 + 1))⟶ℕ0)
192 eqidd 2766 . . . . . . . . 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 490 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → 𝑘 = 𝑖)
194193eqeq1d 2767 . . . . . . . . . 10 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑘 = (𝐾 + 1) ↔ 𝑖 = (𝐾 + 1)))
195193eqeq1d 2767 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑘 = 1 ↔ 𝑖 = 1))
196193fveq2d 6889 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑏𝑘) = (𝑏𝑖))
197193fvoveq1d 7441 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑏‘(𝑘 − 1)) = (𝑏‘(𝑖 − 1)))
198196, 197oveq12d 7437 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
199198oveq1d 7434 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
200195, 199ifbieq2d 4516 . . . . . . . . . 10 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
201194, 200ifbieq2d 4516 . . . . . . . . 9 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
202 simpr 490 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ (1...(𝐾 + 1)))
203 ovexd 7454 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ V)
204 ovexd 7454 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ V)
205 ovexd 7454 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ V)
206204, 205ifcld 4536 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ V)
207203, 206ifcld 4536 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ V)
208192, 201, 202, 207fvmptd 7001 . . . . . . . 8 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
209208sumeq2dv 15779 . . . . . . 7 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = Σ𝑖 ∈ (1...(𝐾 + 1))if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
2101adantr 486 . . . . . . . . . 10 ((𝜑𝑏𝐵) → 𝐾 ∈ ℕ)
211 nnuz 12919 . . . . . . . . . 10 ℕ = (ℤ‘1)
212210, 211eleqtrdi 2875 . . . . . . . . 9 ((𝜑𝑏𝐵) → 𝐾 ∈ (ℤ‘1))
213 eleq1 2853 . . . . . . . . . . . 12 (((𝑁 + 𝐾) − (𝑏𝐾)) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ↔ if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ))
214 eleq1 2853 . . . . . . . . . . . 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 486 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → 𝑁 ∈ ℤ)
217133adant3 1150 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℤ)
218217adantr 486 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
219216, 218zaddcld 12722 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑁 + 𝐾) ∈ ℤ)
220373adant3 1150 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → (𝑏𝐾) ∈ ℕ)
221220adantr 486 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑏𝐾) ∈ ℕ)
222221nnzd 12634 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑏𝐾) ∈ ℤ)
223219, 222zsubcld 12723 . . . . . . . . . . . 12 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ)
224 eleq1 2853 . . . . . . . . . . . . 13 (((𝑏‘1) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → (((𝑏‘1) − 1) ∈ ℤ ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ))
225 eleq1 2853 . . . . . . . . . . . . 13 ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ ℤ ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ))
226643adant3 1150 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → (𝑏‘1) ∈ ℤ)
227226adantr 486 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑏‘1) ∈ ℤ)
228227adantr 486 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → (𝑏‘1) ∈ ℤ)
229 1zzd 12642 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → 1 ∈ ℤ)
230228, 229zsubcld 12723 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) ∈ ℤ)
231283adant3 1150 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
232231adantr 486 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
233232adantr 486 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
234 1zzd 12642 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ∈ ℤ)
235217adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
236 elfznn 13600 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 ∈ (1...(𝐾 + 1)) → 𝑖 ∈ ℕ)
237236adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℕ)
2382373impa 1127 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℕ)
239238nnzd 12634 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℤ)
240239adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ ℤ)
241238nnge1d 12301 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 1 ≤ 𝑖)
242241adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ≤ 𝑖)
243 simp3 1156 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ (1...(𝐾 + 1)))
244 elfzle2 13574 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 ∈ (1...(𝐾 + 1)) → 𝑖 ≤ (𝐾 + 1))
245243, 244syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ≤ (𝐾 + 1))
246245adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ≤ (𝐾 + 1))
247 neqne 2968 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑖 = (𝐾 + 1) → 𝑖 ≠ (𝐾 + 1))
248247adantl 487 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ≠ (𝐾 + 1))
249248necomd 3015 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝐾 + 1) ≠ 𝑖)
250246, 249jca 521 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑖))
251240zred 12718 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ ℝ)
252235zred 12718 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℝ)
253 1red 11226 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ∈ ℝ)
254252, 253readdcld 11255 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℝ)
255251, 254ltlend 11372 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖 < (𝐾 + 1) ↔ (𝑖 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑖)))
256250, 255mpbird 260 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 < (𝐾 + 1))
257 zleltp1 12662 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑖𝐾𝑖 < (𝐾 + 1)))
258240, 235, 257syl2anc 596 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖𝐾𝑖 < (𝐾 + 1)))
259256, 258mpbird 260 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖𝐾)
260234, 235, 240, 242, 259elfzd 13561 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ (1...𝐾))
261260adantr 486 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ (1...𝐾))
262233, 261ffvelcdmd 7084 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ (1...(𝑁 + 𝐾)))
263 elfznn 13600 . . . . . . . . . . . . . . . . 17 ((𝑏𝑖) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑖) ∈ ℕ)
264262, 263syl 18 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℕ)
265264nnzd 12634 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℤ)
266 1zzd 12642 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℤ)
267235adantr 486 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℤ)
268240adantr 486 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℤ)
269268, 266zsubcld 12723 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ ℤ)
270242adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ≤ 𝑖)
271 neqne 2968 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑖 = 1 → 𝑖 ≠ 1)
272271adantl 487 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ≠ 1)
273270, 272jca 521 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 ≤ 𝑖𝑖 ≠ 1))
274 1red 11226 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℝ)
275268zred 12718 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℝ)
276274, 275ltlend 11372 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 ≤ 𝑖𝑖 ≠ 1)))
277273, 276mpbird 260 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 < 𝑖)
278 zltp1le 12661 . . . . . . . . . . . . . . . . . . . . . 22 ((1 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (1 < 𝑖 ↔ (1 + 1) ≤ 𝑖))
279266, 268, 278syl2anc 596 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 + 1) ≤ 𝑖))
280277, 279mpbid 235 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 + 1) ≤ 𝑖)
281 leaddsub 11707 . . . . . . . . . . . . . . . . . . . . 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 486 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ≤ (𝐾 + 1))
285252adantr 486 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℝ)
286 lesubadd 11703 . . . . . . . . . . . . . . . . . . . . 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 13561 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ (1...𝐾))
290233, 289ffvelcdmd 7084 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)))
291 elfznn 13600 . . . . . . . . . . . . . . . . 17 ((𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
292290, 291syl 18 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
293292nnzd 12634 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℤ)
294265, 293zsubcld 12723 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ)
295294, 266zsubcld 12723 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ ℤ)
296224, 225, 230, 295ifbothda 4528 . . . . . . . . . . . 12 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ)
297213, 214, 223, 296ifbothda 4528 . . . . . . . . . . 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 12719 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℂ)
300 eqeq1 2769 . . . . . . . . . 10 (𝑖 = (𝐾 + 1) → (𝑖 = (𝐾 + 1) ↔ (𝐾 + 1) = (𝐾 + 1)))
301 eqeq1 2769 . . . . . . . . . . 11 (𝑖 = (𝐾 + 1) → (𝑖 = 1 ↔ (𝐾 + 1) = 1))
302 fveq2 6885 . . . . . . . . . . . . 13 (𝑖 = (𝐾 + 1) → (𝑏𝑖) = (𝑏‘(𝐾 + 1)))
303 fvoveq1 7442 . . . . . . . . . . . . 13 (𝑖 = (𝐾 + 1) → (𝑏‘(𝑖 − 1)) = (𝑏‘((𝐾 + 1) − 1)))
304302, 303oveq12d 7437 . . . . . . . . . . . 12 (𝑖 = (𝐾 + 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = ((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))))
305304oveq1d 7434 . . . . . . . . . . 11 (𝑖 = (𝐾 + 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))
306301, 305ifbieq2d 4516 . . . . . . . . . 10 (𝑖 = (𝐾 + 1) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))
307300, 306ifbieq2d 4516 . . . . . . . . 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 15832 . . . . . . . 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 2766 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (𝐾 + 1) = (𝐾 + 1))
310309iftrued 4497 . . . . . . . . . 10 ((𝜑𝑏𝐵) → if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))) = ((𝑁 + 𝐾) − (𝑏𝐾)))
311310oveq2d 7435 . . . . . . . . 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 13600 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝐾) → 𝑖 ∈ ℕ)
313312adantl 487 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℕ)
314313nnred 12265 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℝ)
31532adantr 486 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝐾 ∈ ℝ)
316 1red 11226 . . . . . . . . . . . . . . . . 17 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℝ)
317315, 316readdcld 11255 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝐾 + 1) ∈ ℝ)
318 elfzle2 13574 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝐾) → 𝑖𝐾)
319318adantl 487 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖𝐾)
320315ltp1d 12162 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝐾 < (𝐾 + 1))
321314, 315, 317, 319, 320lelttrd 11385 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 < (𝐾 + 1))
322314, 321ltned 11363 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ≠ (𝐾 + 1))
323322neneqd 2965 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → ¬ 𝑖 = (𝐾 + 1))
324323iffalsed 4500 . . . . . . . . . . . 12 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
325324sumeq2dv 15779 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
326325oveq1d 7434 . . . . . . . . . 10 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + ((𝑁 + 𝐾) − (𝑏𝐾))) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))))
327 eqeq1 2769 . . . . . . . . . . . . . 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 2769 . . . . . . . . . . . . . 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 2766 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = ((𝑏‘1) − 1))
330 simpr 490 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → 𝑖 = 1)
331330iftrued 4497 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏‘1))
332331eqcomd 2771 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → (𝑏‘1) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
333332oveq1d 7434 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
334329, 333eqtrd 2800 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
335 eqidd 2766 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
336 simpr 490 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → ¬ 𝑖 = 1)
337336iffalsed 4500 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
338337oveq1d 7434 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
339338eqcomd 2771 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
340335, 339eqtrd 2800 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
341327, 328, 334, 340ifbothda 4528 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
342341sumeq2dv 15779 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
343342oveq1d 7434 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))) = (Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) + ((𝑁 + 𝐾) − (𝑏𝐾))))
344 fzfid 14029 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (1...𝐾) ∈ Fin)
345 eleq1 2853 . . . . . . . . . . . . . . . . . . . . 21 ((𝑏‘1) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) → ((𝑏‘1) ∈ ℤ ↔ if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ))
346 eleq1 2853 . . . . . . . . . . . . . . . . . . . . 21 (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ ↔ if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ))
34764ad2antrr 739 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → (𝑏‘1) ∈ ℤ)
34828adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
349 simpr 490 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ (1...𝐾))
350348, 349ffvelcdmd 7084 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑏𝑖) ∈ (1...(𝑁 + 𝐾)))
351263nnzd 12634 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑏𝑖) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑖) ∈ ℤ)
352350, 351syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑏𝑖) ∈ ℤ)
353352adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℤ)
354348adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
355 1zzd 12642 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℤ)
35613ad2antrr 739 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℤ)
357313nnzd 12634 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℤ)
358357adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℤ)
359358, 355zsubcld 12723 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ ℤ)
360313nnge1d 12301 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ≤ 𝑖)
361360adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ≤ 𝑖)
362336, 271syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ≠ 1)
363361, 362jca 521 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 ≤ 𝑖𝑖 ≠ 1))
364316adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℝ)
365314adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℝ)
366364, 365ltlend 11372 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 ≤ 𝑖𝑖 ≠ 1)))
367363, 366mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 < 𝑖)
368 zltlem1 12664 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((1 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (1 < 𝑖 ↔ 1 ≤ (𝑖 − 1)))
369355, 358, 368syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ 1 ≤ (𝑖 − 1)))
370367, 369mpbid 235 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ≤ (𝑖 − 1))
371314, 316resubcld 11659 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ∈ ℝ)
372314lem1d 12165 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ≤ 𝑖)
373371, 314, 315, 372, 319letrd 11384 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ≤ 𝐾)
374373adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ≤ 𝐾)
375355, 356, 359, 370, 374elfzd 13561 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ (1...𝐾))
376354, 375ffvelcdmd 7084 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)))
377376, 291syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
378377nnzd 12634 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℤ)
379353, 378zsubcld 12723 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ)
380345, 346, 347, 379ifbothda 4528 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ)
381380zcnd 12719 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℂ)
38266adantr 486 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℂ)
383344, 381, 382fsumsub 15864 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − Σ𝑖 ∈ (1...𝐾)1))
384 id 23 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 1 → 𝑖 = 1)
385384iftrued 4497 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 1 → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏‘1))
386212, 381, 385fsum1p 15829 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))))
38758adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ∈ ℝ)
388 elfzle1 13573 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑖 ∈ ((1 + 1)...𝐾) → (1 + 1) ≤ 𝑖)
389388adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → (1 + 1) ≤ 𝑖)
39029adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ∈ ℤ)
391 elfzelz 13570 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑖 ∈ ((1 + 1)...𝐾) → 𝑖 ∈ ℤ)
392391adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 𝑖 ∈ ℤ)
393390, 392, 278syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → (1 < 𝑖 ↔ (1 + 1) ≤ 𝑖))
394389, 393mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 < 𝑖)
395387, 394ltned 11363 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ≠ 𝑖)
396395necomd 3015 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 𝑖 ≠ 1)
397396neneqd 2965 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → ¬ 𝑖 = 1)
398397iffalsed 4500 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
399398sumeq2dv 15779 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
400399oveq2d 7435 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
40132recnd 11254 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → 𝐾 ∈ ℂ)
402401, 66npcand 11590 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝐾 − 1) + 1) = 𝐾)
403402eqcomd 2771 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → 𝐾 = ((𝐾 − 1) + 1))
404403oveq2d 7435 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((1 + 1)...𝐾) = ((1 + 1)...((𝐾 − 1) + 1)))
405404sumeq1d 15777 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
406405oveq2d 7435 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
407 elfzelz 13570 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1)) → 𝑖 ∈ ℤ)
408407adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 ∈ ℤ)
409408zcnd 12719 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 ∈ ℂ)
410 1cnd 11219 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 1 ∈ ℂ)
411409, 410npcand 11590 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → ((𝑖 − 1) + 1) = 𝑖)
412411eqcomd 2771 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 = ((𝑖 − 1) + 1))
413412fveq2d 6889 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → (𝑏𝑖) = (𝑏‘((𝑖 − 1) + 1)))
414 eqidd 2766 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → (𝑏‘(𝑖 − 1)) = (𝑏‘(𝑖 − 1)))
415413, 414oveq12d 7437 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = ((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
416415sumeq2dv 15779 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
417416oveq2d 7435 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))))
41813, 29zsubcld 12723 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → (𝐾 − 1) ∈ ℤ)
41928adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
420 1zzd 12642 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ∈ ℤ)
42113adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝐾 ∈ ℤ)
422 elfznn 13600 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (𝑠 ∈ (1...(𝐾 − 1)) → 𝑠 ∈ ℕ)
423422adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℕ)
424423nnzd 12634 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℤ)
425424peano2zd 12721 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ ℤ)
426 1red 11226 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ∈ ℝ)
427423nnred 12265 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℝ)
428427, 426readdcld 11255 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ ℝ)
429423nnge1d 12301 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ≤ 𝑠)
430427lep1d 12163 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ≤ (𝑠 + 1))
431426, 427, 428, 429, 430letrd 11384 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ≤ (𝑠 + 1))
432 elfzle2 13574 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑠 ∈ (1...(𝐾 − 1)) → 𝑠 ≤ (𝐾 − 1))
433432adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ≤ (𝐾 − 1))
43432adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝐾 ∈ ℝ)
435 leaddsub 11707 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 13561 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ (1...𝐾))
439419, 438ffvelcdmd 7084 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ (1...(𝑁 + 𝐾)))
440 elfznn 13600 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑏‘(𝑠 + 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑠 + 1)) ∈ ℕ)
441439, 440syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ ℕ)
442441nnzd 12634 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ ℤ)
443434, 426resubcld 11659 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝐾 − 1) ∈ ℝ)
444434lem1d 12165 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝐾 − 1) ≤ 𝐾)
445427, 443, 434, 433, 444letrd 11384 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠𝐾)
446420, 421, 424, 429, 445elfzd 13561 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ (1...𝐾))
447419, 446ffvelcdmd 7084 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏𝑠) ∈ (1...(𝑁 + 𝐾)))
448 elfznn 13600 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑏𝑠) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑠) ∈ ℕ)
449448nnzd 12634 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑏𝑠) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑠) ∈ ℤ)
450447, 449syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏𝑠) ∈ ℤ)
451442, 450zsubcld 12723 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) ∈ ℤ)
452451zcnd 12719 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) ∈ ℂ)
453 fvoveq1 7442 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = (𝑖 − 1) → (𝑏‘(𝑠 + 1)) = (𝑏‘((𝑖 − 1) + 1)))
454 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = (𝑖 − 1) → (𝑏𝑠) = (𝑏‘(𝑖 − 1)))
455453, 454oveq12d 7437 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑠 = (𝑖 − 1) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = ((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
45629, 29, 418, 452, 455fsumshft 15856 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
457456oveq2d 7435 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))))
458457eqcomd 2771 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))))
459 fvoveq1 7442 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = 𝑖 → (𝑏‘(𝑠 + 1)) = (𝑏‘(𝑖 + 1)))
460 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = 𝑖 → (𝑏𝑠) = (𝑏𝑖))
461459, 460oveq12d 7437 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = 𝑖 → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = ((𝑏‘(𝑖 + 1)) − (𝑏𝑖)))
462 nfcv 2927 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑖((𝑏‘(𝑠 + 1)) − (𝑏𝑠))
463 nfcv 2927 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑠((𝑏‘(𝑖 + 1)) − (𝑏𝑖))
464461, 462, 463cbvsum 15772 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))
465464a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖)))
466465oveq2d 7435 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))))
467 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = 𝑖 → (𝑏𝑤) = (𝑏𝑖))
468 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = (𝑖 + 1) → (𝑏𝑤) = (𝑏‘(𝑖 + 1)))
469 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = 1 → (𝑏𝑤) = (𝑏‘1))
470 fveq2 6885 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = ((𝐾 − 1) + 1) → (𝑏𝑤) = (𝑏‘((𝐾 − 1) + 1)))
471402, 212eqeltrd 2865 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → ((𝐾 − 1) + 1) ∈ (ℤ‘1))
47228adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
473 1zzd 12642 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 1 ∈ ℤ)
47413adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝐾 ∈ ℤ)
475 elfzelz 13570 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 𝑤 ∈ ℤ)
476475adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ∈ ℤ)
477 elfzle1 13573 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 1 ≤ 𝑤)
478477adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 1 ≤ 𝑤)
479 elfzle2 13574 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 𝑤 ≤ ((𝐾 − 1) + 1))
480479adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ≤ ((𝐾 − 1) + 1))
481402adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → ((𝐾 − 1) + 1) = 𝐾)
482480, 481breqtrd 5139 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤𝐾)
483473, 474, 476, 478, 482elfzd 13561 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ∈ (1...𝐾))
484472, 483ffvelcdmd 7084 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → (𝑏𝑤) ∈ (1...(𝑁 + 𝐾)))
485 elfznn 13600 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑏𝑤) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑤) ∈ ℕ)
486485nncnd 12266 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑏𝑤) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑤) ∈ ℂ)
487484, 486syl 18 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → (𝑏𝑤) ∈ ℂ)
488467, 468, 469, 470, 418, 471, 487telfsum2 15882 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖)) = ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1)))
489488oveq2d 7435 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))) = ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))))
49071recnd 11254 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℂ)
49137nncnd 12266 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℂ)
492402fveq2d 6889 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝜑𝑏𝐵) → (𝑏‘((𝐾 − 1) + 1)) = (𝑏𝐾))
493492eleq1d 2850 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑏𝐵) → ((𝑏‘((𝐾 − 1) + 1)) ∈ ℂ ↔ (𝑏𝐾) ∈ ℂ))
494491, 493mpbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → (𝑏‘((𝐾 − 1) + 1)) ∈ ℂ)
495490, 494pncan3d 11589 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))) = (𝑏‘((𝐾 − 1) + 1)))
496495, 492eqtrd 2800 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))) = (𝑏𝐾))
497489, 496eqtrd 2800 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))) = (𝑏𝐾))
498466, 497eqtrd 2800 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = (𝑏𝐾))
499458, 498eqtrd 2800 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
500417, 499eqtrd 2800 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
501406, 500eqtrd 2800 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
502400, 501eqtrd 2800 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))) = (𝑏𝐾))
503386, 502eqtrd 2800 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
504 fsumconst 15866 . . . . . . . . . . . . . . . . . . . . 21 (((1...𝐾) ∈ Fin ∧ 1 ∈ ℂ) → Σ𝑖 ∈ (1...𝐾)1 = ((♯‘(1...𝐾)) · 1))
505344, 66, 504syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)1 = ((♯‘(1...𝐾)) · 1))
506210nnnn0d 12582 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → 𝐾 ∈ ℕ0)
507 hashfz1 14402 . . . . . . . . . . . . . . . . . . . . . . 23 (𝐾 ∈ ℕ0 → (♯‘(1...𝐾)) = 𝐾)
508506, 507syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → (♯‘(1...𝐾)) = 𝐾)
509508oveq1d 7434 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((♯‘(1...𝐾)) · 1) = (𝐾 · 1))
510401mulridd 11243 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → (𝐾 · 1) = 𝐾)
511509, 510eqtrd 2800 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → ((♯‘(1...𝐾)) · 1) = 𝐾)
512505, 511eqtrd 2800 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)1 = 𝐾)
513503, 512oveq12d 7437 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − Σ𝑖 ∈ (1...𝐾)1) = ((𝑏𝐾) − 𝐾))
514383, 513eqtrd 2800 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((𝑏𝐾) − 𝐾))
51541addlidd 11428 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (0 + (𝑏𝐾)) = (𝑏𝐾))
516515eqcomd 2771 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏𝐾) = (0 + (𝑏𝐾)))
517516oveq1d 7434 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → ((𝑏𝐾) − 𝐾) = ((0 + (𝑏𝐾)) − 𝐾))
518514, 517eqtrd 2800 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((0 + (𝑏𝐾)) − 𝐾))
519 0cnd 11216 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 0 ∈ ℂ)
520519, 401, 41subsub3d 11616 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (0 − (𝐾 − (𝑏𝐾))) = ((0 + (𝑏𝐾)) − 𝐾))
521520eqcomd 2771 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((0 + (𝑏𝐾)) − 𝐾) = (0 − (𝐾 − (𝑏𝐾))))
522518, 521eqtrd 2800 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (0 − (𝐾 − (𝑏𝐾))))
52311zcnd 12719 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝑁 ∈ ℂ)
524523subidd 11574 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑁𝑁) = 0)
525524eqcomd 2771 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 = (𝑁𝑁))
526525oveq1d 7434 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (0 − (𝐾 − (𝑏𝐾))) = ((𝑁𝑁) − (𝐾 − (𝑏𝐾))))
527522, 526eqtrd 2800 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((𝑁𝑁) − (𝐾 − (𝑏𝐾))))
528401, 41subcld 11586 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝐾 − (𝑏𝐾)) ∈ ℂ)
529523, 523, 528subsub4d 11617 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑁𝑁) − (𝐾 − (𝑏𝐾))) = (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))))
530527, 529eqtrd 2800 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))))
531523, 401, 41addsubassd 11606 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) = (𝑁 + (𝐾 − (𝑏𝐾))))
532531eqcomd 2771 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → (𝑁 + (𝐾 − (𝑏𝐾))) = ((𝑁 + 𝐾) − (𝑏𝐾)))
533532oveq2d 7435 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾))))
534530, 533eqtrd 2800 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾))))
535 1zzd 12642 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℤ)
536380, 535zsubcld 12723 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℤ)
537344, 536fsumzcl 15811 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℤ)
538537zcnd 12719 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℂ)
53952nn0cnd 12584 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℂ)
540538, 539, 523addlsub 11647 . . . . . . . . . . . 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 2800 . . . . . . . . . 10 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
543326, 542eqtrd 2800 . . . . . . . . 9 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
544311, 543eqtrd 2800 . . . . . . . 8 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))) = 𝑁)
545308, 544eqtrd 2800 . . . . . . 7 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = 𝑁)
546209, 545eqtrd 2800 . . . . . 6 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = 𝑁)
547191, 546jca 521 . . . . 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 7452 . . . . . . 7 (1...(𝐾 + 1)) ∈ V
549548mptex 7228 . . . . . 6 (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ V
550 feq1 6687 . . . . . . 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 488 . . . . . . . . . 10 ((𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))
552551fveq1d 6887 . . . . . . . . 9 ((𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (𝑔𝑖) = ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖))
553552sumeq2dv 15779 . . . . . . . 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 2767 . . . . . . 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 644 . . . . . 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 3640 . . . . 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 2868 . . 3 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ 𝐴)
5616, 560eqeltrrd 2866 . 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 7113 1 (𝜑𝐺:𝐵𝐴)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wcel 2146  {cab 2743  wne 2960  wral 3081  Vcvv 3457  ifcif 4489  {csn 4591  cop 4597   class class class wbr 5111  cmpt 5194  wf 6536  cfv 6540  (class class class)co 7419  Fincfn 8949  cc 11115  cr 11116  0cc0 11117  1c1 11118   + caddc 11120   · cmul 11122   < clt 11260  cle 11261  cmin 11458  cn 12250  0cn0 12521  cz 12608  cuz 12880  ...cfz 13553  chash 14386  Σcsu 15763
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7742  ax-inf2 9617  ax-cnex 11173  ax-resscn 11174  ax-1cn 11175  ax-icn 11176  ax-addcl 11177  ax-addrcl 11178  ax-mulcl 11179  ax-mulrcl 11180  ax-mulcom 11181  ax-addass 11182  ax-mulass 11183  ax-distr 11184  ax-i2m1 11185  ax-1ne0 11186  ax-1rid 11187  ax-rnegex 11188  ax-rrecex 11189  ax-cnre 11190  ax-pre-lttri 11191  ax-pre-lttrn 11192  ax-pre-ltadd 11193  ax-pre-mulgt0 11194  ax-pre-sup 11195
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-rmo 3371  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4875  df-int 4915  df-iun 4960  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7376  df-ov 7422  df-oprab 7423  df-mpo 7424  df-om 7869  df-1st 7992  df-2nd 7993  df-frecs 8284  df-wrecs 8315  df-recs 8364  df-rdg 8403  df-1o 8459  df-er 8700  df-en 8950  df-dom 8951  df-sdom 8952  df-fin 8953  df-sup 9409  df-oi 9479  df-card 9941  df-pnf 11262  df-mnf 11263  df-xr 11264  df-ltxr 11265  df-le 11266  df-sub 11460  df-neg 11461  df-div 11889  df-nn 12251  df-2 12320  df-3 12321  df-n0 12522  df-z 12609  df-uz 12881  df-rp 13035  df-fz 13554  df-fzo 13702  df-seq 14058  df-exp 14118  df-hash 14387  df-cj 15176  df-re 15177  df-im 15178  df-sqrt 15312  df-abs 15313  df-clim 15565  df-sum 15764
This theorem is used by:  sticksstones12  42985
  Copyright terms: Public domain W3C validator