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 40039
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 11953 . . . . . . 7 (𝜑𝐾 ≠ 0)
32adantr 480 . . . . . 6 ((𝜑𝑏𝐵) → 𝐾 ≠ 0)
43neneqd 2947 . . . . 5 ((𝜑𝑏𝐵) → ¬ 𝐾 = 0)
54iffalsed 4467 . . . 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 2744 . . 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 2826 . . . . . . . . 9 (((𝑁 + 𝐾) − (𝑏𝐾)) = if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0 ↔ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0))
8 eleq1 2826 . . . . . . . . 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 12353 . . . . . . . . . . . . . . . . 17 (𝜑𝑁 ∈ ℤ)
1110adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 𝑁 ∈ ℤ)
121nnzd 12354 . . . . . . . . . . . . . . . . 17 (𝜑𝐾 ∈ ℤ)
1312adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 𝐾 ∈ ℤ)
1411, 13zaddcld 12359 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝑁 + 𝐾) ∈ ℤ)
15 sticksstones10.5 . . . . . . . . . . . . . . . . . . . . . . 23 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))}
1615eleq2i 2830 . . . . . . . . . . . . . . . . . . . . . 22 (𝑏𝐵𝑏 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))})
17 vex 3426 . . . . . . . . . . . . . . . . . . . . . . 23 𝑏 ∈ V
18 feq1 6565 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑏 → (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ↔ 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾))))
19 fveq1 6755 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑓 = 𝑏 → (𝑓𝑥) = (𝑏𝑥))
20 fveq1 6755 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑓 = 𝑏 → (𝑓𝑦) = (𝑏𝑦))
2119, 20breq12d 5083 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 = 𝑏 → ((𝑓𝑥) < (𝑓𝑦) ↔ (𝑏𝑥) < (𝑏𝑦)))
2221imbi2d 340 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓 = 𝑏 → ((𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ (𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
23222ralbidv 3122 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑓 = 𝑏 → (∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)) ↔ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2418, 23anbi12d 630 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 = 𝑏 → ((𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦))) ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))))
2517, 24elab 3602 . . . . . . . . . . . . . . . . . . . . . 22 (𝑏 ∈ {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓𝑥) < (𝑓𝑦)))} ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2616, 25bitri 274 . . . . . . . . . . . . . . . . . . . . 21 (𝑏𝐵 ↔ (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2726biimpi 215 . . . . . . . . . . . . . . . . . . . 20 (𝑏𝐵 → (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2827adantl 481 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))))
2928simpld 494 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
30 1zzd 12281 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ ℤ)
311nnge1d 11951 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ≤ 𝐾)
3231adantr 480 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ≤ 𝐾)
3313zred 12355 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → 𝐾 ∈ ℝ)
3433leidd 11471 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 𝐾𝐾)
3530, 13, 13, 32, 34elfzd 13176 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝐾 ∈ (1...𝐾))
3629, 35ffvelrnd 6944 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ (1...(𝑁 + 𝐾)))
37 elfznn 13214 . . . . . . . . . . . . . . . . 17 ((𝑏𝐾) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝐾) ∈ ℕ)
3836, 37syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℕ)
3938nnzd 12354 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℤ)
4014, 39zsubcld 12360 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ)
4138nnred 11918 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℝ)
4241recnd 10934 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℂ)
4342addid1d 11105 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((𝑏𝐾) + 0) = (𝑏𝐾))
44 elfzle2 13189 . . . . . . . . . . . . . . . . 17 ((𝑏𝐾) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝐾) ≤ (𝑁 + 𝐾))
4536, 44syl 17 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑏𝐾) ≤ (𝑁 + 𝐾))
4643, 45eqbrtrd 5092 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → ((𝑏𝐾) + 0) ≤ (𝑁 + 𝐾))
47 0red 10909 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 ∈ ℝ)
4814zred 12355 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → (𝑁 + 𝐾) ∈ ℝ)
4941, 47, 48leaddsub2d 11507 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (((𝑏𝐾) + 0) ≤ (𝑁 + 𝐾) ↔ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
5046, 49mpbid 231 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾)))
5140, 50jca 511 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ∧ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
52 elnn0z 12262 . . . . . . . . . . . . 13 (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0 ↔ (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ∧ 0 ≤ ((𝑁 + 𝐾) − (𝑏𝐾))))
5351, 52sylibr 233 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
5453adantr 480 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
55543impa 1108 . . . . . . . . . 10 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
5655adantr 480 . . . . . . . . 9 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = (𝐾 + 1)) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℕ0)
57 eleq1 2826 . . . . . . . . . 10 (((𝑏‘1) − 1) = if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) → (((𝑏‘1) − 1) ∈ ℕ0 ↔ if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0))
58 eleq1 2826 . . . . . . . . . 10 ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) = if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) → ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0 ↔ if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0))
59 1red 10907 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → 1 ∈ ℝ)
6059leidd 11471 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → 1 ≤ 1)
6130, 13, 30, 60, 32elfzd 13176 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ (1...𝐾))
6229, 61ffvelrnd 6944 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ (1...(𝑁 + 𝐾)))
63 elfznn 13214 . . . . . . . . . . . . . . . . . . 19 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘1) ∈ ℕ)
6463nnzd 12354 . . . . . . . . . . . . . . . . . 18 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘1) ∈ ℤ)
6562, 64syl 17 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℤ)
6665, 30zsubcld 12360 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((𝑏‘1) − 1) ∈ ℤ)
67 1cnd 10901 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → 1 ∈ ℂ)
6867addid1d 11105 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (1 + 0) = 1)
69 elfzle1 13188 . . . . . . . . . . . . . . . . . . 19 ((𝑏‘1) ∈ (1...(𝑁 + 𝐾)) → 1 ≤ (𝑏‘1))
7062, 69syl 17 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 1 ≤ (𝑏‘1))
7168, 70eqbrtrd 5092 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (1 + 0) ≤ (𝑏‘1))
7265zred 12355 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℝ)
7359, 47, 72leaddsub2d 11507 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → ((1 + 0) ≤ (𝑏‘1) ↔ 0 ≤ ((𝑏‘1) − 1)))
7471, 73mpbid 231 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 ≤ ((𝑏‘1) − 1))
7566, 74jca 511 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (((𝑏‘1) − 1) ∈ ℤ ∧ 0 ≤ ((𝑏‘1) − 1)))
76 elnn0z 12262 . . . . . . . . . . . . . . 15 (((𝑏‘1) − 1) ∈ ℕ0 ↔ (((𝑏‘1) − 1) ∈ ℤ ∧ 0 ≤ ((𝑏‘1) − 1)))
7775, 76sylibr 233 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑏‘1) − 1) ∈ ℕ0)
7877adantr 480 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ ℕ0)
79783impa 1108 . . . . . . . . . . . 12 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ ℕ0)
8079adantr 480 . . . . . . . . . . 11 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → ((𝑏‘1) − 1) ∈ ℕ0)
8180adantr 480 . . . . . . . . . 10 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ 𝑘 = 1) → ((𝑏‘1) − 1) ∈ ℕ0)
82293adant3 1130 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
8382adantr 480 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
84 1zzd 12281 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ∈ ℤ)
85133adant3 1130 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℤ)
8685adantr 480 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
87 simp3 1136 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ (1...(𝐾 + 1)))
88 elfznn 13214 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ∈ ℕ)
8987, 88syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℕ)
9089adantr 480 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℕ)
9190nnzd 12354 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℤ)
9290nnge1d 11951 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ≤ 𝑘)
93 elfzle2 13189 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
9487, 93syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ≤ (𝐾 + 1))
9594adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
96 neqne 2950 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑘 = (𝐾 + 1) → 𝑘 ≠ (𝐾 + 1))
9796adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≠ (𝐾 + 1))
9897necomd 2998 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ≠ 𝑘)
9995, 98jca 511 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘))
10090nnred 11918 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℝ)
10186zred 12355 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝐾 ∈ ℝ)
102 1red 10907 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ∈ ℝ)
103101, 102readdcld 10935 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℝ)
104100, 103ltlend 11050 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 < (𝐾 + 1) ↔ (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘)))
10599, 104mpbird 256 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 < (𝐾 + 1))
10689nnzd 12354 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℤ)
107 zleltp1 12301 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑘𝐾𝑘 < (𝐾 + 1)))
108106, 85, 107syl2anc 583 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → (𝑘𝐾𝑘 < (𝐾 + 1)))
109108adantr 480 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘𝐾𝑘 < (𝐾 + 1)))
110105, 109mpbird 256 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘𝐾)
11184, 86, 91, 92, 110elfzd 13176 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ (1...𝐾))
11283, 111ffvelrnd 6944 . . . . . . . . . . . . . . . . 17 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ (1...(𝑁 + 𝐾)))
113 elfznn 13214 . . . . . . . . . . . . . . . . 17 ((𝑏𝑘) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑘) ∈ ℕ)
114112, 113syl 17 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ ℕ)
115114nnzd 12354 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑏𝑘) ∈ ℤ)
116115adantr 480 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏𝑘) ∈ ℤ)
11783adantr 480 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
118 1zzd 12281 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℤ)
11986adantr 480 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐾 ∈ ℤ)
12091adantr 480 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℤ)
121120, 118zsubcld 12360 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ ℤ)
12292adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ 𝑘)
123 neqne 2950 . . . . . . . . . . . . . . . . . . . . . 22 𝑘 = 1 → 𝑘 ≠ 1)
124123adantl 481 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ≠ 1)
125122, 124jca 511 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 ≤ 𝑘𝑘 ≠ 1))
126102adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℝ)
127100adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℝ)
128126, 127ltlend 11050 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ (1 ≤ 𝑘𝑘 ≠ 1)))
129125, 128mpbird 256 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 < 𝑘)
130118, 120zltlem1d 39915 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ 1 ≤ (𝑘 − 1)))
131129, 130mpbid 231 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ (𝑘 − 1))
13289nnred 11918 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℝ)
133593adant3 1130 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 1 ∈ ℝ)
134333adant3 1130 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℝ)
135 lesubadd 11377 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑘 − 1) ≤ 𝐾𝑘 ≤ (𝐾 + 1)))
136132, 133, 134, 135syl3anc 1369 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ((𝑘 − 1) ≤ 𝐾𝑘 ≤ (𝐾 + 1)))
13794, 136mpbird 256 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → (𝑘 − 1) ≤ 𝐾)
138137adantr 480 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 − 1) ≤ 𝐾)
139138adantr 480 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ≤ 𝐾)
140118, 119, 121, 131, 139elfzd 13176 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ (1...𝐾))
141117, 140ffvelrnd 6944 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ (1...(𝑁 + 𝐾)))
142 elfznn 13214 . . . . . . . . . . . . . . . 16 ((𝑏‘(𝑘 − 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑘 − 1)) ∈ ℕ)
143141, 142syl 17 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℕ)
144143nnzd 12354 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℤ)
145116, 144zsubcld 12360 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℤ)
146145, 118zsubcld 12360 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ)
147 0p1e1 12025 . . . . . . . . . . . . . . 15 (0 + 1) = 1
148147a1i 11 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (0 + 1) = 1)
149 1cnd 10901 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℂ)
150149subidd 11250 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 − 1) = 0)
151144zred 12355 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℝ)
152151recnd 10934 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) ∈ ℂ)
153152addid1d 11105 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏‘(𝑘 − 1)) + 0) = (𝑏‘(𝑘 − 1)))
154127ltm1d 11837 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) < 𝑘)
155111adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ (1...𝐾))
156140, 155jca 511 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑘 − 1) ∈ (1...𝐾) ∧ 𝑘 ∈ (1...𝐾)))
15728simprd 495 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
1581573adant3 1130 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
159158adantr 480 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
160159adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)))
161 breq1 5073 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = (𝑘 − 1) → (𝑥 < 𝑦 ↔ (𝑘 − 1) < 𝑦))
162 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = (𝑘 − 1) → (𝑏𝑥) = (𝑏‘(𝑘 − 1)))
163162breq1d 5080 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = (𝑘 − 1) → ((𝑏𝑥) < (𝑏𝑦) ↔ (𝑏‘(𝑘 − 1)) < (𝑏𝑦)))
164161, 163imbi12d 344 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = (𝑘 − 1) → ((𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦)) ↔ ((𝑘 − 1) < 𝑦 → (𝑏‘(𝑘 − 1)) < (𝑏𝑦))))
165 breq2 5074 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑘 → ((𝑘 − 1) < 𝑦 ↔ (𝑘 − 1) < 𝑘))
166 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑦 = 𝑘 → (𝑏𝑦) = (𝑏𝑘))
167166breq2d 5082 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 = 𝑘 → ((𝑏‘(𝑘 − 1)) < (𝑏𝑦) ↔ (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
168165, 167imbi12d 344 . . . . . . . . . . . . . . . . . . . . 21 (𝑦 = 𝑘 → (((𝑘 − 1) < 𝑦 → (𝑏‘(𝑘 − 1)) < (𝑏𝑦)) ↔ ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘))))
169164, 168rspc2va 3563 . . . . . . . . . . . . . . . . . . . 20 ((((𝑘 − 1) ∈ (1...𝐾) ∧ 𝑘 ∈ (1...𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑏𝑥) < (𝑏𝑦))) → ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
170156, 160, 169syl2anc 583 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑘 − 1) < 𝑘 → (𝑏‘(𝑘 − 1)) < (𝑏𝑘)))
171154, 170mpd 15 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏‘(𝑘 − 1)) < (𝑏𝑘))
172153, 171eqbrtrd 5092 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏‘(𝑘 − 1)) + 0) < (𝑏𝑘))
173 0red 10909 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 ∈ ℝ)
174116zred 12355 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑏𝑘) ∈ ℝ)
175151, 173, 174ltaddsub2d 11506 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏‘(𝑘 − 1)) + 0) < (𝑏𝑘) ↔ 0 < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
176172, 175mpbid 231 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 < ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
177150, 176eqbrtrd 5092 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
178 zlem1lt 12302 . . . . . . . . . . . . . . . 16 ((1 ∈ ℤ ∧ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℤ) → (1 ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
179118, 145, 178syl2anc 583 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ (1 − 1) < ((𝑏𝑘) − (𝑏‘(𝑘 − 1)))))
180177, 179mpbird 256 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
181148, 180eqbrtrd 5092 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (0 + 1) ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))))
182145zred 12355 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℝ)
183 leaddsub 11381 . . . . . . . . . . . . . 14 ((0 ∈ ℝ ∧ 1 ∈ ℝ ∧ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ∈ ℝ) → ((0 + 1) ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
184173, 126, 182, 183syl3anc 1369 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((0 + 1) ≤ ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) ↔ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
185181, 184mpbid 231 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))
186146, 185jca 511 . . . . . . . . . . 11 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ ∧ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
187 elnn0z 12262 . . . . . . . . . . 11 ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0 ↔ ((((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℤ ∧ 0 ≤ (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))
188186, 187sylibr 233 . . . . . . . . . 10 ((((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) ∈ ℕ0)
18957, 58, 81, 188ifbothda 4494 . . . . . . . . 9 (((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) ∈ ℕ0)
1907, 8, 56, 189ifbothda 4494 . . . . . . . 8 ((𝜑𝑏𝐵𝑘 ∈ (1...(𝐾 + 1))) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0)
1911903expa 1116 . . . . . . 7 (((𝜑𝑏𝐵) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) ∈ ℕ0)
192191fmpttd 6971 . . . . . 6 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))):(1...(𝐾 + 1))⟶ℕ0)
193 eqidd 2739 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))
194 simpr 484 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → 𝑘 = 𝑖)
195194eqeq1d 2740 . . . . . . . . . 10 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑘 = (𝐾 + 1) ↔ 𝑖 = (𝐾 + 1)))
196194eqeq1d 2740 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑘 = 1 ↔ 𝑖 = 1))
197194fveq2d 6760 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑏𝑘) = (𝑏𝑖))
198194fvoveq1d 7277 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (𝑏‘(𝑘 − 1)) = (𝑏‘(𝑖 − 1)))
199197, 198oveq12d 7273 . . . . . . . . . . . 12 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → ((𝑏𝑘) − (𝑏‘(𝑘 − 1))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
200199oveq1d 7270 . . . . . . . . . . 11 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
201196, 200ifbieq2d 4482 . . . . . . . . . 10 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
202195, 201ifbieq2d 4482 . . . . . . . . 9 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = 𝑖) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
203 simpr 484 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ (1...(𝐾 + 1)))
204 ovexd 7290 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ V)
205 ovexd 7290 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑏‘1) − 1) ∈ V)
206 ovexd 7290 . . . . . . . . . . 11 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ V)
207205, 206ifcld 4502 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ V)
208204, 207ifcld 4502 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ V)
209193, 202, 203, 208fvmptd 6864 . . . . . . . 8 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
210209sumeq2dv 15343 . . . . . . 7 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = Σ𝑖 ∈ (1...(𝐾 + 1))if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))))
2111adantr 480 . . . . . . . . . 10 ((𝜑𝑏𝐵) → 𝐾 ∈ ℕ)
212 nnuz 12550 . . . . . . . . . 10 ℕ = (ℤ‘1)
213211, 212eleqtrdi 2849 . . . . . . . . 9 ((𝜑𝑏𝐵) → 𝐾 ∈ (ℤ‘1))
214 eleq1 2826 . . . . . . . . . . . 12 (((𝑁 + 𝐾) − (𝑏𝐾)) = if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) → (((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ ↔ if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ))
215 eleq1 2826 . . . . . . . . . . . 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))) ∈ ℤ))
216113adant3 1130 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑁 ∈ ℤ)
217216adantr 480 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → 𝑁 ∈ ℤ)
218133adant3 1130 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℤ)
219218adantr 480 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
220217, 219zaddcld 12359 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑁 + 𝐾) ∈ ℤ)
221383adant3 1130 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → (𝑏𝐾) ∈ ℕ)
222221adantr 480 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑏𝐾) ∈ ℕ)
223222nnzd 12354 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → (𝑏𝐾) ∈ ℤ)
224220, 223zsubcld 12360 . . . . . . . . . . . 12 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ 𝑖 = (𝐾 + 1)) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℤ)
225 eleq1 2826 . . . . . . . . . . . . 13 (((𝑏‘1) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → (((𝑏‘1) − 1) ∈ ℤ ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ))
226 eleq1 2826 . . . . . . . . . . . . 13 ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) → ((((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ ℤ ↔ if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ))
227653adant3 1130 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → (𝑏‘1) ∈ ℤ)
228227adantr 480 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑏‘1) ∈ ℤ)
229228adantr 480 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → (𝑏‘1) ∈ ℤ)
230 1zzd 12281 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → 1 ∈ ℤ)
231229, 230zsubcld 12360 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) ∈ ℤ)
232293adant3 1130 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
233232adantr 480 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
234233adantr 480 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
235 1zzd 12281 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ∈ ℤ)
236218adantr 480 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
237 elfznn 13214 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑖 ∈ (1...(𝐾 + 1)) → 𝑖 ∈ ℕ)
238237adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℕ)
2392383impa 1108 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℕ)
240239nnzd 12354 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ ℤ)
241240adantr 480 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ ℤ)
242239nnge1d 11951 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 1 ≤ 𝑖)
243242adantr 480 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ≤ 𝑖)
244 simp3 1136 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ∈ (1...(𝐾 + 1)))
245 elfzle2 13189 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 ∈ (1...(𝐾 + 1)) → 𝑖 ≤ (𝐾 + 1))
246244, 245syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → 𝑖 ≤ (𝐾 + 1))
247246adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ≤ (𝐾 + 1))
248 neqne 2950 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑖 = (𝐾 + 1) → 𝑖 ≠ (𝐾 + 1))
249248adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ≠ (𝐾 + 1))
250249necomd 2998 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝐾 + 1) ≠ 𝑖)
251247, 250jca 511 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑖))
252241zred 12355 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ ℝ)
253236zred 12355 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝐾 ∈ ℝ)
254 1red 10907 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 1 ∈ ℝ)
255253, 254readdcld 10935 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℝ)
256252, 255ltlend 11050 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖 < (𝐾 + 1) ↔ (𝑖 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑖)))
257251, 256mpbird 256 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 < (𝐾 + 1))
258 zleltp1 12301 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑖𝐾𝑖 < (𝐾 + 1)))
259241, 236, 258syl2anc 583 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → (𝑖𝐾𝑖 < (𝐾 + 1)))
260257, 259mpbird 256 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖𝐾)
261235, 236, 241, 243, 260elfzd 13176 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → 𝑖 ∈ (1...𝐾))
262261adantr 480 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ (1...𝐾))
263234, 262ffvelrnd 6944 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ (1...(𝑁 + 𝐾)))
264 elfznn 13214 . . . . . . . . . . . . . . . . 17 ((𝑏𝑖) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑖) ∈ ℕ)
265263, 264syl 17 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℕ)
266265nnzd 12354 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℤ)
267 1zzd 12281 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℤ)
268236adantr 480 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℤ)
269241adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℤ)
270269, 267zsubcld 12360 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ ℤ)
271243adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ≤ 𝑖)
272 neqne 2950 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑖 = 1 → 𝑖 ≠ 1)
273272adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ≠ 1)
274271, 273jca 511 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 ≤ 𝑖𝑖 ≠ 1))
275 1red 10907 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℝ)
276269zred 12355 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℝ)
277275, 276ltlend 11050 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 ≤ 𝑖𝑖 ≠ 1)))
278274, 277mpbird 256 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 < 𝑖)
279 zltp1le 12300 . . . . . . . . . . . . . . . . . . . . . 22 ((1 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (1 < 𝑖 ↔ (1 + 1) ≤ 𝑖))
280267, 269, 279syl2anc 583 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 + 1) ≤ 𝑖))
281278, 280mpbid 231 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (1 + 1) ≤ 𝑖)
282 leaddsub 11381 . . . . . . . . . . . . . . . . . . . . 21 ((1 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝑖 ∈ ℝ) → ((1 + 1) ≤ 𝑖 ↔ 1 ≤ (𝑖 − 1)))
283275, 275, 276, 282syl3anc 1369 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → ((1 + 1) ≤ 𝑖 ↔ 1 ≤ (𝑖 − 1)))
284281, 283mpbid 231 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 1 ≤ (𝑖 − 1))
285247adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝑖 ≤ (𝐾 + 1))
286253adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℝ)
287 lesubadd 11377 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑖 − 1) ≤ 𝐾𝑖 ≤ (𝐾 + 1)))
288276, 275, 286, 287syl3anc 1369 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → ((𝑖 − 1) ≤ 𝐾𝑖 ≤ (𝐾 + 1)))
289285, 288mpbird 256 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ≤ 𝐾)
290267, 268, 270, 284, 289elfzd 13176 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ (1...𝐾))
291234, 290ffvelrnd 6944 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)))
292 elfznn 13214 . . . . . . . . . . . . . . . . 17 ((𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
293291, 292syl 17 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
294293nnzd 12354 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℤ)
295266, 294zsubcld 12360 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ)
296295, 267zsubcld 12360 . . . . . . . . . . . . 13 ((((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) ∈ ℤ)
297225, 226, 231, 296ifbothda 4494 . . . . . . . . . . . 12 (((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑖 = (𝐾 + 1)) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) ∈ ℤ)
298214, 215, 224, 297ifbothda 4494 . . . . . . . . . . 11 ((𝜑𝑏𝐵𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ)
2992983expa 1116 . . . . . . . . . 10 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℤ)
300299zcnd 12356 . . . . . . . . 9 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) ∈ ℂ)
301 eqeq1 2742 . . . . . . . . . 10 (𝑖 = (𝐾 + 1) → (𝑖 = (𝐾 + 1) ↔ (𝐾 + 1) = (𝐾 + 1)))
302 eqeq1 2742 . . . . . . . . . . 11 (𝑖 = (𝐾 + 1) → (𝑖 = 1 ↔ (𝐾 + 1) = 1))
303 fveq2 6756 . . . . . . . . . . . . 13 (𝑖 = (𝐾 + 1) → (𝑏𝑖) = (𝑏‘(𝐾 + 1)))
304 fvoveq1 7278 . . . . . . . . . . . . 13 (𝑖 = (𝐾 + 1) → (𝑏‘(𝑖 − 1)) = (𝑏‘((𝐾 + 1) − 1)))
305303, 304oveq12d 7273 . . . . . . . . . . . 12 (𝑖 = (𝐾 + 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = ((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))))
306305oveq1d 7270 . . . . . . . . . . 11 (𝑖 = (𝐾 + 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))
307302, 306ifbieq2d 4482 . . . . . . . . . 10 (𝑖 = (𝐾 + 1) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))
308301, 307ifbieq2d 4482 . . . . . . . . 9 (𝑖 = (𝐾 + 1) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))))
309213, 300, 308fsump1 15396 . . . . . . . 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)))))
310 eqidd 2739 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (𝐾 + 1) = (𝐾 + 1))
311310iftrued 4464 . . . . . . . . . 10 ((𝜑𝑏𝐵) → if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1))) = ((𝑁 + 𝐾) − (𝑏𝐾)))
312311oveq2d 7271 . . . . . . . . 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))) + ((𝑁 + 𝐾) − (𝑏𝐾))))
313 elfznn 13214 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝐾) → 𝑖 ∈ ℕ)
314313adantl 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℕ)
315314nnred 11918 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℝ)
31633adantr 480 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝐾 ∈ ℝ)
317 1red 10907 . . . . . . . . . . . . . . . . 17 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℝ)
318316, 317readdcld 10935 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝐾 + 1) ∈ ℝ)
319 elfzle2 13189 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝐾) → 𝑖𝐾)
320319adantl 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖𝐾)
321316ltp1d 11835 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝐾 < (𝐾 + 1))
322315, 316, 318, 320, 321lelttrd 11063 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 < (𝐾 + 1))
323315, 322ltned 11041 . . . . . . . . . . . . . 14 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ≠ (𝐾 + 1))
324323neneqd 2947 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → ¬ 𝑖 = (𝐾 + 1))
325324iffalsed 4467 . . . . . . . . . . . 12 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
326325sumeq2dv 15343 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)))
327326oveq1d 7270 . . . . . . . . . 10 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + ((𝑁 + 𝐾) − (𝑏𝐾))) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))))
328 eqeq1 2742 . . . . . . . . . . . . . 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 eqeq1 2742 . . . . . . . . . . . . . 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)))
330 eqidd 2739 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = ((𝑏‘1) − 1))
331 simpr 484 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → 𝑖 = 1)
332331iftrued 4464 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏‘1))
333332eqcomd 2744 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → (𝑏‘1) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
334333oveq1d 7270 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
335330, 334eqtrd 2778 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → ((𝑏‘1) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
336 eqidd 2739 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
337 simpr 484 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → ¬ 𝑖 = 1)
338337iffalsed 4467 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
339338oveq1d 7270 . . . . . . . . . . . . . . . 16 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))
340339eqcomd 2744 . . . . . . . . . . . . . . 15 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
341336, 340eqtrd 2778 . . . . . . . . . . . . . 14 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
342328, 329, 335, 341ifbothda 4494 . . . . . . . . . . . . 13 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
343342sumeq2dv 15343 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) = Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1))
344343oveq1d 7270 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))) = (Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) + ((𝑁 + 𝐾) − (𝑏𝐾))))
345 fzfid 13621 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (1...𝐾) ∈ Fin)
346 eleq1 2826 . . . . . . . . . . . . . . . . . . . . 21 ((𝑏‘1) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) → ((𝑏‘1) ∈ ℤ ↔ if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ))
347 eleq1 2826 . . . . . . . . . . . . . . . . . . . . 21 (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) → (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ ↔ if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ))
34865ad2antrr 722 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ 𝑖 = 1) → (𝑏‘1) ∈ ℤ)
34929adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
350 simpr 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ (1...𝐾))
351349, 350ffvelrnd 6944 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑏𝑖) ∈ (1...(𝑁 + 𝐾)))
352264nnzd 12354 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑏𝑖) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑖) ∈ ℤ)
353351, 352syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑏𝑖) ∈ ℤ)
354353adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏𝑖) ∈ ℤ)
355349adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
356 1zzd 12281 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℤ)
35713ad2antrr 722 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝐾 ∈ ℤ)
358314nnzd 12354 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 𝑖 ∈ ℤ)
359358adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℤ)
360359, 356zsubcld 12360 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ ℤ)
361314nnge1d 11951 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ≤ 𝑖)
362361adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ≤ 𝑖)
363337, 272syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ≠ 1)
364362, 363jca 511 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 ≤ 𝑖𝑖 ≠ 1))
365317adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ∈ ℝ)
366315adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 𝑖 ∈ ℝ)
367365, 366ltlend 11050 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ (1 ≤ 𝑖𝑖 ≠ 1)))
368364, 367mpbird 256 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 < 𝑖)
369 zltlem1 12303 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((1 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (1 < 𝑖 ↔ 1 ≤ (𝑖 − 1)))
370356, 359, 369syl2anc 583 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (1 < 𝑖 ↔ 1 ≤ (𝑖 − 1)))
371368, 370mpbid 231 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → 1 ≤ (𝑖 − 1))
372315, 317resubcld 11333 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ∈ ℝ)
373315lem1d 11838 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ≤ 𝑖)
374372, 315, 316, 373, 320letrd 11062 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (𝑖 − 1) ≤ 𝐾)
375374adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ≤ 𝐾)
376356, 357, 360, 371, 375elfzd 13176 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑖 − 1) ∈ (1...𝐾))
377355, 376ffvelrnd 6944 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ (1...(𝑁 + 𝐾)))
378377, 292syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℕ)
379378nnzd 12354 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → (𝑏‘(𝑖 − 1)) ∈ ℤ)
380354, 379zsubcld 12360 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) ∧ ¬ 𝑖 = 1) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) ∈ ℤ)
381346, 347, 348, 380ifbothda 4494 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℤ)
382381zcnd 12356 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) ∈ ℂ)
38367adantr 480 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℂ)
384345, 382, 383fsumsub 15428 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − Σ𝑖 ∈ (1...𝐾)1))
385 id 22 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖 = 1 → 𝑖 = 1)
386385iftrued 4464 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = 1 → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏‘1))
387213, 382, 386fsum1p 15393 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))))
38859adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ∈ ℝ)
389 elfzle1 13188 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑖 ∈ ((1 + 1)...𝐾) → (1 + 1) ≤ 𝑖)
390389adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → (1 + 1) ≤ 𝑖)
39130adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ∈ ℤ)
392 elfzelz 13185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑖 ∈ ((1 + 1)...𝐾) → 𝑖 ∈ ℤ)
393392adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 𝑖 ∈ ℤ)
394391, 393, 279syl2anc 583 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → (1 < 𝑖 ↔ (1 + 1) ≤ 𝑖))
395390, 394mpbird 256 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 < 𝑖)
396388, 395ltned 11041 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 1 ≠ 𝑖)
397396necomd 2998 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → 𝑖 ≠ 1)
398397neneqd 2947 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → ¬ 𝑖 = 1)
399398iffalsed 4467 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...𝐾)) → if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
400399sumeq2dv 15343 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
401400oveq2d 7271 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
40233recnd 10934 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → 𝐾 ∈ ℂ)
403402, 67npcand 11266 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝐾 − 1) + 1) = 𝐾)
404403eqcomd 2744 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → 𝐾 = ((𝐾 − 1) + 1))
405404oveq2d 7271 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((1 + 1)...𝐾) = ((1 + 1)...((𝐾 − 1) + 1)))
406405sumeq1d 15341 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1))))
407406oveq2d 7271 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))))
408 elfzelz 13185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1)) → 𝑖 ∈ ℤ)
409408adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 ∈ ℤ)
410409zcnd 12356 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 ∈ ℂ)
411 1cnd 10901 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 1 ∈ ℂ)
412410, 411npcand 11266 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → ((𝑖 − 1) + 1) = 𝑖)
413412eqcomd 2744 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → 𝑖 = ((𝑖 − 1) + 1))
414413fveq2d 6760 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → (𝑏𝑖) = (𝑏‘((𝑖 − 1) + 1)))
415 eqidd 2739 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → (𝑏‘(𝑖 − 1)) = (𝑏‘(𝑖 − 1)))
416414, 415oveq12d 7273 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))) → ((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = ((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
417416sumeq2dv 15343 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1))) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
418417oveq2d 7271 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))))
41913, 30zsubcld 12360 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → (𝐾 − 1) ∈ ℤ)
42029adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
421 1zzd 12281 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ∈ ℤ)
42213adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝐾 ∈ ℤ)
423 elfznn 13214 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (𝑠 ∈ (1...(𝐾 − 1)) → 𝑠 ∈ ℕ)
424423adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℕ)
425424nnzd 12354 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℤ)
426425peano2zd 12358 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ ℤ)
427 1red 10907 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ∈ ℝ)
428424nnred 11918 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ ℝ)
429428, 427readdcld 10935 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ ℝ)
430424nnge1d 11951 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ≤ 𝑠)
431428lep1d 11836 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ≤ (𝑠 + 1))
432427, 428, 429, 430, 431letrd 11062 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 1 ≤ (𝑠 + 1))
433 elfzle2 13189 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (𝑠 ∈ (1...(𝐾 − 1)) → 𝑠 ≤ (𝐾 − 1))
434433adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ≤ (𝐾 − 1))
43533adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝐾 ∈ ℝ)
436 leaddsub 11381 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑠 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((𝑠 + 1) ≤ 𝐾𝑠 ≤ (𝐾 − 1)))
437428, 427, 435, 436syl3anc 1369 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑠 + 1) ≤ 𝐾𝑠 ≤ (𝐾 − 1)))
438434, 437mpbird 256 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ≤ 𝐾)
439421, 422, 426, 432, 438elfzd 13176 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑠 + 1) ∈ (1...𝐾))
440420, 439ffvelrnd 6944 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ (1...(𝑁 + 𝐾)))
441 elfznn 13214 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑏‘(𝑠 + 1)) ∈ (1...(𝑁 + 𝐾)) → (𝑏‘(𝑠 + 1)) ∈ ℕ)
442440, 441syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ ℕ)
443442nnzd 12354 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏‘(𝑠 + 1)) ∈ ℤ)
444435, 427resubcld 11333 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝐾 − 1) ∈ ℝ)
445435lem1d 11838 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝐾 − 1) ≤ 𝐾)
446428, 444, 435, 434, 445letrd 11062 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠𝐾)
447421, 422, 425, 430, 446elfzd 13176 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → 𝑠 ∈ (1...𝐾))
448420, 447ffvelrnd 6944 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏𝑠) ∈ (1...(𝑁 + 𝐾)))
449 elfznn 13214 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑏𝑠) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑠) ∈ ℕ)
450449nnzd 12354 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑏𝑠) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑠) ∈ ℤ)
451448, 450syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → (𝑏𝑠) ∈ ℤ)
452443, 451zsubcld 12360 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) ∈ ℤ)
453452zcnd 12356 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑏𝐵) ∧ 𝑠 ∈ (1...(𝐾 − 1))) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) ∈ ℂ)
454 fvoveq1 7278 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = (𝑖 − 1) → (𝑏‘(𝑠 + 1)) = (𝑏‘((𝑖 − 1) + 1)))
455 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = (𝑖 − 1) → (𝑏𝑠) = (𝑏‘(𝑖 − 1)))
456454, 455oveq12d 7273 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑠 = (𝑖 − 1) → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = ((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
45730, 30, 419, 453, 456fsumshft 15420 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1))))
458457oveq2d 7271 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))))
459458eqcomd 2744 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))) = ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))))
460 fvoveq1 7278 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = 𝑖 → (𝑏‘(𝑠 + 1)) = (𝑏‘(𝑖 + 1)))
461 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑠 = 𝑖 → (𝑏𝑠) = (𝑏𝑖))
462460, 461oveq12d 7273 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑠 = 𝑖 → ((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = ((𝑏‘(𝑖 + 1)) − (𝑏𝑖)))
463 nfcv 2906 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑖(1...(𝐾 − 1))
464 nfcv 2906 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑠(1...(𝐾 − 1))
465 nfcv 2906 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑖((𝑏‘(𝑠 + 1)) − (𝑏𝑠))
466 nfcv 2906 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 𝑠((𝑏‘(𝑖 + 1)) − (𝑏𝑖))
467462, 463, 464, 465, 466cbvsum 15335 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))
468467a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠)) = Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖)))
469468oveq2d 7271 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))))
470 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = 𝑖 → (𝑏𝑤) = (𝑏𝑖))
471 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = (𝑖 + 1) → (𝑏𝑤) = (𝑏‘(𝑖 + 1)))
472 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = 1 → (𝑏𝑤) = (𝑏‘1))
473 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑤 = ((𝐾 − 1) + 1) → (𝑏𝑤) = (𝑏‘((𝐾 − 1) + 1)))
474403, 213eqeltrd 2839 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → ((𝐾 − 1) + 1) ∈ (ℤ‘1))
47529adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑏:(1...𝐾)⟶(1...(𝑁 + 𝐾)))
476 1zzd 12281 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 1 ∈ ℤ)
47713adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝐾 ∈ ℤ)
478 elfzelz 13185 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 𝑤 ∈ ℤ)
479478adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ∈ ℤ)
480 elfzle1 13188 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 1 ≤ 𝑤)
481480adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 1 ≤ 𝑤)
482 elfzle2 13189 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑤 ∈ (1...((𝐾 − 1) + 1)) → 𝑤 ≤ ((𝐾 − 1) + 1))
483482adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ≤ ((𝐾 − 1) + 1))
484403adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → ((𝐾 − 1) + 1) = 𝐾)
485483, 484breqtrd 5096 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤𝐾)
486476, 477, 479, 481, 485elfzd 13176 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → 𝑤 ∈ (1...𝐾))
487475, 486ffvelrnd 6944 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → (𝑏𝑤) ∈ (1...(𝑁 + 𝐾)))
488 elfznn 13214 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑏𝑤) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑤) ∈ ℕ)
489488nncnd 11919 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑏𝑤) ∈ (1...(𝑁 + 𝐾)) → (𝑏𝑤) ∈ ℂ)
490487, 489syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑏𝐵) ∧ 𝑤 ∈ (1...((𝐾 − 1) + 1))) → (𝑏𝑤) ∈ ℂ)
491470, 471, 472, 473, 419, 474, 490telfsum2 15445 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖)) = ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1)))
492491oveq2d 7271 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))) = ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))))
49372recnd 10934 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → (𝑏‘1) ∈ ℂ)
49438nncnd 11919 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑏𝐵) → (𝑏𝐾) ∈ ℂ)
495403fveq2d 6760 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝜑𝑏𝐵) → (𝑏‘((𝐾 − 1) + 1)) = (𝑏𝐾))
496495eleq1d 2823 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑏𝐵) → ((𝑏‘((𝐾 − 1) + 1)) ∈ ℂ ↔ (𝑏𝐾) ∈ ℂ))
497494, 496mpbird 256 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑏𝐵) → (𝑏‘((𝐾 − 1) + 1)) ∈ ℂ)
498493, 497pncan3d 11265 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑏𝐵) → ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))) = (𝑏‘((𝐾 − 1) + 1)))
499498, 495eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑏𝐵) → ((𝑏‘1) + ((𝑏‘((𝐾 − 1) + 1)) − (𝑏‘1))) = (𝑏𝐾))
500492, 499eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ (1...(𝐾 − 1))((𝑏‘(𝑖 + 1)) − (𝑏𝑖))) = (𝑏𝐾))
501469, 500eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑠 ∈ (1...(𝐾 − 1))((𝑏‘(𝑠 + 1)) − (𝑏𝑠))) = (𝑏𝐾))
502459, 501eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏‘((𝑖 − 1) + 1)) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
503418, 502eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...((𝐾 − 1) + 1))((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
504407, 503eqtrd 2778 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
505401, 504eqtrd 2778 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → ((𝑏‘1) + Σ𝑖 ∈ ((1 + 1)...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1))))) = (𝑏𝐾))
506387, 505eqtrd 2778 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) = (𝑏𝐾))
507 fsumconst 15430 . . . . . . . . . . . . . . . . . . . . 21 (((1...𝐾) ∈ Fin ∧ 1 ∈ ℂ) → Σ𝑖 ∈ (1...𝐾)1 = ((♯‘(1...𝐾)) · 1))
508345, 67, 507syl2anc 583 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)1 = ((♯‘(1...𝐾)) · 1))
509211nnnn0d 12223 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑏𝐵) → 𝐾 ∈ ℕ0)
510 hashfz1 13988 . . . . . . . . . . . . . . . . . . . . . . 23 (𝐾 ∈ ℕ0 → (♯‘(1...𝐾)) = 𝐾)
511509, 510syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑏𝐵) → (♯‘(1...𝐾)) = 𝐾)
512511oveq1d 7270 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → ((♯‘(1...𝐾)) · 1) = (𝐾 · 1))
513402mulid1d 10923 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑏𝐵) → (𝐾 · 1) = 𝐾)
514512, 513eqtrd 2778 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑏𝐵) → ((♯‘(1...𝐾)) · 1) = 𝐾)
515508, 514eqtrd 2778 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)1 = 𝐾)
516506, 515oveq12d 7273 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − Σ𝑖 ∈ (1...𝐾)1) = ((𝑏𝐾) − 𝐾))
517384, 516eqtrd 2778 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((𝑏𝐾) − 𝐾))
51842addid2d 11106 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑏𝐵) → (0 + (𝑏𝐾)) = (𝑏𝐾))
519518eqcomd 2744 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → (𝑏𝐾) = (0 + (𝑏𝐾)))
520519oveq1d 7270 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → ((𝑏𝐾) − 𝐾) = ((0 + (𝑏𝐾)) − 𝐾))
521517, 520eqtrd 2778 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((0 + (𝑏𝐾)) − 𝐾))
522 0cnd 10899 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 0 ∈ ℂ)
523522, 402, 42subsub3d 11292 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (0 − (𝐾 − (𝑏𝐾))) = ((0 + (𝑏𝐾)) − 𝐾))
524523eqcomd 2744 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → ((0 + (𝑏𝐾)) − 𝐾) = (0 − (𝐾 − (𝑏𝐾))))
525521, 524eqtrd 2778 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (0 − (𝐾 − (𝑏𝐾))))
52611zcnd 12356 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑏𝐵) → 𝑁 ∈ ℂ)
527526subidd 11250 . . . . . . . . . . . . . . . . 17 ((𝜑𝑏𝐵) → (𝑁𝑁) = 0)
528527eqcomd 2744 . . . . . . . . . . . . . . . 16 ((𝜑𝑏𝐵) → 0 = (𝑁𝑁))
529528oveq1d 7270 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (0 − (𝐾 − (𝑏𝐾))) = ((𝑁𝑁) − (𝐾 − (𝑏𝐾))))
530525, 529eqtrd 2778 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = ((𝑁𝑁) − (𝐾 − (𝑏𝐾))))
531402, 42subcld 11262 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → (𝐾 − (𝑏𝐾)) ∈ ℂ)
532526, 526, 531subsub4d 11293 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → ((𝑁𝑁) − (𝐾 − (𝑏𝐾))) = (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))))
533530, 532eqtrd 2778 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))))
534526, 402, 42addsubassd 11282 . . . . . . . . . . . . . . 15 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) = (𝑁 + (𝐾 − (𝑏𝐾))))
535534eqcomd 2744 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → (𝑁 + (𝐾 − (𝑏𝐾))) = ((𝑁 + 𝐾) − (𝑏𝐾)))
536535oveq2d 7271 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → (𝑁 − (𝑁 + (𝐾 − (𝑏𝐾)))) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾))))
537533, 536eqtrd 2778 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾))))
538 1zzd 12281 . . . . . . . . . . . . . . . 16 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → 1 ∈ ℤ)
539381, 538zsubcld 12360 . . . . . . . . . . . . . . 15 (((𝜑𝑏𝐵) ∧ 𝑖 ∈ (1...𝐾)) → (if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℤ)
540345, 539fsumzcl 15375 . . . . . . . . . . . . . 14 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℤ)
541540zcnd 12356 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) ∈ ℂ)
54253nn0cnd 12225 . . . . . . . . . . . . 13 ((𝜑𝑏𝐵) → ((𝑁 + 𝐾) − (𝑏𝐾)) ∈ ℂ)
543541, 542, 526addlsub 11321 . . . . . . . . . . . 12 ((𝜑𝑏𝐵) → ((Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁 ↔ Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) = (𝑁 − ((𝑁 + 𝐾) − (𝑏𝐾)))))
544537, 543mpbird 256 . . . . . . . . . . 11 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)(if(𝑖 = 1, (𝑏‘1), ((𝑏𝑖) − (𝑏‘(𝑖 − 1)))) − 1) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
545344, 544eqtrd 2778 . . . . . . . . . 10 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1)) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
546327, 545eqtrd 2778 . . . . . . . . 9 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + ((𝑁 + 𝐾) − (𝑏𝐾))) = 𝑁)
547312, 546eqtrd 2778 . . . . . . . 8 ((𝜑𝑏𝐵) → (Σ𝑖 ∈ (1...𝐾)if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) + if((𝐾 + 1) = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if((𝐾 + 1) = 1, ((𝑏‘1) − 1), (((𝑏‘(𝐾 + 1)) − (𝑏‘((𝐾 + 1) − 1))) − 1)))) = 𝑁)
548309, 547eqtrd 2778 . . . . . . 7 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))if(𝑖 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑖 = 1, ((𝑏‘1) − 1), (((𝑏𝑖) − (𝑏‘(𝑖 − 1))) − 1))) = 𝑁)
549210, 548eqtrd 2778 . . . . . 6 ((𝜑𝑏𝐵) → Σ𝑖 ∈ (1...(𝐾 + 1))((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖) = 𝑁)
550192, 549jca 511 . . . . 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))))‘𝑖) = 𝑁))
551 ovex 7288 . . . . . . 7 (1...(𝐾 + 1)) ∈ V
552551mptex 7081 . . . . . 6 (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ V
553 feq1 6565 . . . . . . 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))
554 simpl 482 . . . . . . . . . 10 ((𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))
555554fveq1d 6758 . . . . . . . . 9 ((𝑔 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (𝑔𝑖) = ((𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))‘𝑖))
556555sumeq2dv 15343 . . . . . . . 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))))‘𝑖))
557556eqeq1d 2740 . . . . . . 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))))‘𝑖) = 𝑁))
558553, 557anbi12d 630 . . . . . 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))))‘𝑖) = 𝑁)))
559552, 558elab 3602 . . . . 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))))‘𝑖) = 𝑁))
560550, 559sylibr 233 . . . 4 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
561 sticksstones10.4 . . . . 5 𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)}
562561a1i 11 . . . 4 ((𝜑𝑏𝐵) → 𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ0 ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔𝑖) = 𝑁)})
563560, 562eleqtrrd 2842 . . 3 ((𝜑𝑏𝐵) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) ∈ 𝐴)
5646, 563eqeltrrd 2840 . 2 ((𝜑𝑏𝐵) → if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))) ∈ 𝐴)
565 sticksstones10.3 . 2 𝐺 = (𝑏𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
566564, 565fmptd 6970 1 (𝜑𝐺:𝐵𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 395  w3a 1085   = wceq 1539  wcel 2108  {cab 2715  wne 2942  wral 3063  Vcvv 3422  ifcif 4456  {csn 4558  cop 4564   class class class wbr 5070  cmpt 5153  wf 6414  cfv 6418  (class class class)co 7255  Fincfn 8691  cc 10800  cr 10801  0cc0 10802  1c1 10803   + caddc 10805   · cmul 10807   < clt 10940  cle 10941  cmin 11135  cn 11903  0cn0 12163  cz 12249  cuz 12511  ...cfz 13168  chash 13972  Σcsu 15325
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-inf2 9329  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879  ax-pre-sup 10880
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-se 5536  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-isom 6427  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-1o 8267  df-er 8456  df-en 8692  df-dom 8693  df-sdom 8694  df-fin 8695  df-sup 9131  df-oi 9199  df-card 9628  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-div 11563  df-nn 11904  df-2 11966  df-3 11967  df-n0 12164  df-z 12250  df-uz 12512  df-rp 12660  df-fz 13169  df-fzo 13312  df-seq 13650  df-exp 13711  df-hash 13973  df-cj 14738  df-re 14739  df-im 14740  df-sqrt 14874  df-abs 14875  df-clim 15125  df-sum 15326
This theorem is referenced by:  sticksstones12  40042
  Copyright terms: Public domain W3C validator