sticksstones12 - Mathbox for metakunt

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

Theorem sticksstones12 43032

Description: Establish bijective mapping between strictly monotone functions and functions that sum to a fixed non-negative integer. (Contributed by metakunt, 6-Oct-2024.)

**Hypotheses**
Ref	Expression
sticksstones12.1	⊢ (𝜑 → 𝑁 ∈ ℕ₀)
sticksstones12.2	⊢ (𝜑 → 𝐾 ∈ ℕ)
sticksstones12.3	⊢ 𝐹 = (𝑎 ∈ 𝐴 ↦ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙))))
sticksstones12.4	⊢ 𝐺 = (𝑏 ∈ 𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
sticksstones12.5	⊢ 𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = 𝑁)}
sticksstones12.6	⊢ 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓‘𝑥) < (𝑓‘𝑦)))}

**Assertion**
Ref	Expression
sticksstones12	⊢ (𝜑 → 𝐹:𝐴–1-1-onto→𝐵)

Distinct variable groups: 𝐴,𝑎,𝑗,𝑘,𝑙 𝐴,𝑏,𝑘,𝑥,𝑦 𝑥,𝑎,𝑦,𝑗,𝑘,𝑙 𝐵,𝑎,𝑖,𝑘,𝑙 𝐵,𝑏 𝐵,𝑗 𝐹,𝑏,𝑘 𝐾,𝑎,𝑓,𝑗,𝑙,𝑥,𝑦 𝐾,𝑏,𝑘,𝑔,𝑖 𝑔,𝑎,𝑖,𝑘,𝑁 𝑓,𝑁,𝑗,𝑙 𝑁,𝑏,𝑘,𝑔,𝑖 𝜑,𝑎,𝑖,𝑘,𝑙 𝜑,𝑏 𝜑,𝑗,𝑥,𝑦 𝑖,𝑏 𝑓,𝑏,𝑥,𝑦 𝑔,𝑏 Allowed substitution hints: 𝜑(𝑓, 𝑔) 𝐴(𝑓, 𝑔, 𝑖) 𝐵(𝑥, 𝑦, 𝑓, 𝑔) 𝐹(𝑥, 𝑦, 𝑓, 𝑔, 𝑖, 𝑗, 𝑎, 𝑙) 𝐺(𝑥, 𝑦, 𝑓, 𝑔, 𝑖, 𝑗, 𝑘, 𝑎, 𝑏, 𝑙) 𝑁(𝑥, 𝑦)

Proof of Theorem sticksstones12 Dummy variables 𝑐 𝑑 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		sticksstones12.1	. . 3 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
2		sticksstones12.2	. . . 4 ⊢ (𝜑 → 𝐾 ∈ ℕ)
3	2	nnnn0d 12593	. . 3 ⊢ (𝜑 → 𝐾 ∈ ℕ₀)
4		sticksstones12.3	. . 3 ⊢ 𝐹 = (𝑎 ∈ 𝐴 ↦ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙))))
5		sticksstones12.5	. . 3 ⊢ 𝐴 = {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = 𝑁)}
6		sticksstones12.6	. . 3 ⊢ 𝐵 = {𝑓 ∣ (𝑓:(1...𝐾)⟶(1...(𝑁 + 𝐾)) ∧ ∀𝑥 ∈ (1...𝐾)∀𝑦 ∈ (1...𝐾)(𝑥 < 𝑦 → (𝑓‘𝑥) < (𝑓‘𝑦)))}
7	1, 3, 4, 5, 6	sticksstones8 43027	. 2 ⊢ (𝜑 → 𝐹:𝐴⟶𝐵)
8		sticksstones12.4	. . 3 ⊢ 𝐺 = (𝑏 ∈ 𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
9	1, 2, 8, 5, 6	sticksstones10 43029	. 2 ⊢ (𝜑 → 𝐺:𝐵⟶𝐴)
10	8	a1i 11	. . . . . . 7 ⊢ (𝜑 → 𝐺 = (𝑏 ∈ 𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))))
11		0red 11239	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 ∈ ℝ)
12	2	nngt0d 12313	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 < 𝐾)
13	11, 12	ltned 11374	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 ≠ 𝐾)
14	13	necomd 3012	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐾 ≠ 0)
15	14	neneqd 2962	. . . . . . . . . 10 ⊢ (𝜑 → ¬ 𝐾 = 0)
16	15	iffalsed 4496	. . . . . . . . 9 ⊢ (𝜑 → if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1))))) = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))
17	16	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐵) → if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1))))) = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))
18	17	mpteq2dva 5202	. . . . . . 7 ⊢ (𝜑 → (𝑏 ∈ 𝐵 ↦ if(𝐾 = 0, {⟨1, 𝑁⟩}, (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1)))))) = (𝑏 ∈ 𝐵 ↦ (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
19	10, 18	eqtrd 2797	. . . . . 6 ⊢ (𝜑 → 𝐺 = (𝑏 ∈ 𝐵 ↦ (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
20	19	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝐺 = (𝑏 ∈ 𝐵 ↦ (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1))))))
21		fveq1 6881	. . . . . . . . . 10 ⊢ (𝑏 = (𝐹‘𝑐) → (𝑏‘𝐾) = ((𝐹‘𝑐)‘𝐾))
22	21	oveq2d 7433	. . . . . . . . 9 ⊢ (𝑏 = (𝐹‘𝑐) → ((𝑁 + 𝐾) − (𝑏‘𝐾)) = ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)))
23		fveq1 6881	. . . . . . . . . . 11 ⊢ (𝑏 = (𝐹‘𝑐) → (𝑏‘1) = ((𝐹‘𝑐)‘1))
24	23	oveq1d 7432	. . . . . . . . . 10 ⊢ (𝑏 = (𝐹‘𝑐) → ((𝑏‘1) − 1) = (((𝐹‘𝑐)‘1) − 1))
25		fveq1 6881	. . . . . . . . . . . 12 ⊢ (𝑏 = (𝐹‘𝑐) → (𝑏‘𝑘) = ((𝐹‘𝑐)‘𝑘))
26		fveq1 6881	. . . . . . . . . . . 12 ⊢ (𝑏 = (𝐹‘𝑐) → (𝑏‘(𝑘 − 1)) = ((𝐹‘𝑐)‘(𝑘 − 1)))
27	25, 26	oveq12d 7435	. . . . . . . . . . 11 ⊢ (𝑏 = (𝐹‘𝑐) → ((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) = (((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))))
28	27	oveq1d 7432	. . . . . . . . . 10 ⊢ (𝑏 = (𝐹‘𝑐) → (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1) = ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1))
29	24, 28	ifeq12d 4507	. . . . . . . . 9 ⊢ (𝑏 = (𝐹‘𝑐) → if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1)) = if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1)))
30	22, 29	ifeq12d 4507	. . . . . . . 8 ⊢ (𝑏 = (𝐹‘𝑐) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1))) = if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1))))
31	30	adantr 486	. . . . . . 7 ⊢ ((𝑏 = (𝐹‘𝑐) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1))) = if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1))))
32	31	mpteq2dva 5202	. . . . . 6 ⊢ (𝑏 = (𝐹‘𝑐) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1)))))
33	32	adantl 487	. . . . 5 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑏 = (𝐹‘𝑐)) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − (𝑏‘𝐾)), if(𝑘 = 1, ((𝑏‘1) − 1), (((𝑏‘𝑘) − (𝑏‘(𝑘 − 1))) − 1)))) = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1)))))
34	7	ffvelcdmda 7081	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝐹‘𝑐) ∈ 𝐵)
35		fzfid 14041	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (1...(𝐾 + 1)) ∈ Fin)
36	35	mptexd 7227	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1)))) ∈ V)
37	20, 33, 34, 36	fvmptd 6998	. . . 4 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝐺‘(𝐹‘𝑐)) = (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1)))))
38	4	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝐹 = (𝑎 ∈ 𝐴 ↦ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙)))))
39		simpllr 788	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑎 = 𝑐) ∧ 𝑗 ∈ (1...𝐾)) ∧ 𝑙 ∈ (1...𝑗)) → 𝑎 = 𝑐)
40	39	fveq1d 6884	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑎 = 𝑐) ∧ 𝑗 ∈ (1...𝐾)) ∧ 𝑙 ∈ (1...𝑗)) → (𝑎‘𝑙) = (𝑐‘𝑙))
41	40	sumeq2dv 15793	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑎 = 𝑐) ∧ 𝑗 ∈ (1...𝐾)) → Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙) = Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))
42	41	oveq2d 7433	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑎 = 𝑐) ∧ 𝑗 ∈ (1...𝐾)) → (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙)) = (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))
43	42	mpteq2dva 5202	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑎 = 𝑐) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙))) = (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))))
44		simpr 490	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝑐 ∈ 𝐴)
45		fzfid 14041	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (1...𝐾) ∈ Fin)
46	45	mptexd 7227	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))) ∈ V)
47	38, 43, 44, 46	fvmptd 6998	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝐹‘𝑐) = (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))))
48		simpr 490	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑗 = 𝐾) → 𝑗 = 𝐾)
49	48	oveq2d 7433	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑗 = 𝐾) → (1...𝑗) = (1...𝐾))
50	49	sumeq1d 15791	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑗 = 𝐾) → Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙) = Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙))
51	48, 50	oveq12d 7435	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑗 = 𝐾) → (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)) = (𝐾 + Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙)))
52		1zzd 12653	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 1 ∈ ℤ)
53	3	nn0zd 12644	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐾 ∈ ℤ)
54	2	nnge1d 12312	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 1 ≤ 𝐾)
55	2	nnred 12276	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐾 ∈ ℝ)
56	55	leidd 11808	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐾 ≤ 𝐾)
57	52, 53, 53, 54, 56	elfzd 13573	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐾 ∈ (1...𝐾))
58	57	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝐾 ∈ (1...𝐾))
59		ovexd 7452	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝐾 + Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙)) ∈ V)
60	47, 51, 58, 59	fvmptd 6998	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝐹‘𝑐)‘𝐾) = (𝐾 + Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙)))
61	60	oveq2d 7433	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)) = ((𝑁 + 𝐾) − (𝐾 + Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙))))
62	1	nn0cnd 12595	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑁 ∈ ℂ)
63	62	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝑁 ∈ ℂ)
64	55	recnd 11265	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐾 ∈ ℂ)
65	64	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝐾 ∈ ℂ)
66	63, 65	addcomd 11440	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑁 + 𝐾) = (𝐾 + 𝑁))
67	66	oveq1d 7432	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝑁 + 𝐾) − (𝐾 + Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙))) = ((𝐾 + 𝑁) − (𝐾 + Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙))))
68		1zzd 12653	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 1 ∈ ℤ)
69	53	ad2antrr 739	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 𝐾 ∈ ℤ)
70	69	peano2zd 12732	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → (𝐾 + 1) ∈ ℤ)
71		elfzelz 13582	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑙 ∈ (1...𝐾) → 𝑙 ∈ ℤ)
72	71	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 𝑙 ∈ ℤ)
73		elfzle1 13585	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑙 ∈ (1...𝐾) → 1 ≤ 𝑙)
74	73	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 1 ≤ 𝑙)
75	72	zred 12729	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 𝑙 ∈ ℝ)
76	55	ad2antrr 739	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 𝐾 ∈ ℝ)
77	70	zred 12729	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → (𝐾 + 1) ∈ ℝ)
78		elfzle2 13586	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑙 ∈ (1...𝐾) → 𝑙 ≤ 𝐾)
79	78	adantl 487	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 𝑙 ≤ 𝐾)
80	76	lep1d 12174	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 𝐾 ≤ (𝐾 + 1))
81	75, 76, 77, 79, 80	letrd 11395	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 𝑙 ≤ (𝐾 + 1))
82	68, 70, 72, 74, 81	elfzd 13573	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 𝑙 ∈ (1...(𝐾 + 1)))
83	5	eleq2i 2854	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑐 ∈ 𝐴 ↔ 𝑐 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = 𝑁)})
84	83	bilani 510	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝑐 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = 𝑁)})
85		vex 3457	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ 𝑐 ∈ V
86		feq1 6684	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑔 = 𝑐 → (𝑔:(1...(𝐾 + 1))⟶ℕ₀ ↔ 𝑐:(1...(𝐾 + 1))⟶ℕ₀))
87		simpl 488	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝑔 = 𝑐 ∧ 𝑖 ∈ (1...(𝐾 + 1))) → 𝑔 = 𝑐)
88	87	fveq1d 6884	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑔 = 𝑐 ∧ 𝑖 ∈ (1...(𝐾 + 1))) → (𝑔‘𝑖) = (𝑐‘𝑖))
89	88	sumeq2dv 15793	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑔 = 𝑐 → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖))
90	89	eqeq1d 2764	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑔 = 𝑐 → (Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = 𝑁 ↔ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖) = 𝑁))
91	86, 90	anbi12d 644	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑔 = 𝑐 → ((𝑔:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = 𝑁) ↔ (𝑐:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖) = 𝑁)))
92	85, 91	elab 3636	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑐 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = 𝑁)} ↔ (𝑐:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖) = 𝑁))
93	92	a1i 11	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑐 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = 𝑁)} ↔ (𝑐:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖) = 𝑁)))
94	93	biimpd 232	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑐 ∈ {𝑔 ∣ (𝑔:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑔‘𝑖) = 𝑁)} → (𝑐:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖) = 𝑁)))
95	84, 94	mpd 16	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑐:(1...(𝐾 + 1))⟶ℕ₀ ∧ Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖) = 𝑁))
96	95	simpld 500	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝑐:(1...(𝐾 + 1))⟶ℕ₀)
97	96	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → 𝑐:(1...(𝐾 + 1))⟶ℕ₀)
98	97	ffvelcdmda 7081	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) ∧ 𝑙 ∈ (1...(𝐾 + 1))) → (𝑐‘𝑙) ∈ ℕ₀)
99	82, 98	mpdan 700	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...𝐾)) → (𝑐‘𝑙) ∈ ℕ₀)
100	45, 99	fsumnn0cl 15826	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙) ∈ ℕ₀)
101	100	nn0cnd 12595	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙) ∈ ℂ)
102	65, 63, 101	pnpcand 11634	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝐾 + 𝑁) − (𝐾 + Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙))) = (𝑁 − Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙)))
103		eqid 2762	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ 1 = 1
104		1p0e1 12391	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (1 + 0) = 1
105	103, 104	eqtr4i 2788	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 1 = (1 + 0)
106	105	a1i 11	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 1 = (1 + 0))
107		1red 11237	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → 1 ∈ ℝ)
108		0le1 11765	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ 0 ≤ 1
109	108	a1i 11	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → 0 ≤ 1)
110	107, 11, 55, 107, 54, 109	le2addd 11861	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (1 + 0) ≤ (𝐾 + 1))
111	106, 110	eqbrtrd 5131	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → 1 ≤ (𝐾 + 1))
112	53	peano2zd 12732	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝐾 + 1) ∈ ℤ)
113		eluz 12905	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((1 ∈ ℤ ∧ (𝐾 + 1) ∈ ℤ) → ((𝐾 + 1) ∈ (ℤ_≥‘1) ↔ 1 ≤ (𝐾 + 1)))
114	52, 112, 113	syl2anc 596	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → ((𝐾 + 1) ∈ (ℤ_≥‘1) ↔ 1 ≤ (𝐾 + 1)))
115	111, 114	mpbird 260	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝐾 + 1) ∈ (ℤ_≥‘1))
116	115	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝐾 + 1) ∈ (ℤ_≥‘1))
117	96	ffvelcdmda 7081	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...(𝐾 + 1))) → (𝑐‘𝑙) ∈ ℕ₀)
118	117	nn0cnd 12595	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...(𝐾 + 1))) → (𝑐‘𝑙) ∈ ℂ)
119		fveq2 6882	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑙 = (𝐾 + 1) → (𝑐‘𝑙) = (𝑐‘(𝐾 + 1)))
120	116, 118, 119	fsumm1 15841	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...(𝐾 + 1))(𝑐‘𝑙) = (Σ𝑙 ∈ (1...((𝐾 + 1) − 1))(𝑐‘𝑙) + (𝑐‘(𝐾 + 1))))
121		1cnd 11230	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 1 ∈ ℂ)
122	65, 121	pncand 11598	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝐾 + 1) − 1) = 𝐾)
123	122	oveq2d 7433	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (1...((𝐾 + 1) − 1)) = (1...𝐾))
124	123	sumeq1d 15791	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...((𝐾 + 1) − 1))(𝑐‘𝑙) = Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙))
125	124	oveq1d 7432	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (Σ𝑙 ∈ (1...((𝐾 + 1) − 1))(𝑐‘𝑙) + (𝑐‘(𝐾 + 1))) = (Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙) + (𝑐‘(𝐾 + 1))))
126	120, 125	eqtrd 2797	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...(𝐾 + 1))(𝑐‘𝑙) = (Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙) + (𝑐‘(𝐾 + 1))))
127	126	eqcomd 2768	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙) + (𝑐‘(𝐾 + 1))) = Σ𝑙 ∈ (1...(𝐾 + 1))(𝑐‘𝑙))
128		fveq2 6882	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑙 = 𝑖 → (𝑐‘𝑙) = (𝑐‘𝑖))
129		nfcv 2924	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑖(𝑐‘𝑙)
130		nfcv 2924	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑙(𝑐‘𝑖)
131	128, 129, 130	cbvsum 15786	. . . . . . . . . . . . . . . . . 18 ⊢ Σ𝑙 ∈ (1...(𝐾 + 1))(𝑐‘𝑙) = Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖)
132	131	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...(𝐾 + 1))(𝑐‘𝑙) = Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖))
133	95	simprd 501	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑖 ∈ (1...(𝐾 + 1))(𝑐‘𝑖) = 𝑁)
134	132, 133	eqtrd 2797	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...(𝐾 + 1))(𝑐‘𝑙) = 𝑁)
135	127, 134	eqtrd 2797	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙) + (𝑐‘(𝐾 + 1))) = 𝑁)
136		1zzd 12653	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 1 ∈ ℤ)
137	53	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝐾 ∈ ℤ)
138	137	peano2zd 12732	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝐾 + 1) ∈ ℤ)
139		1e0p1 12787	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 1 = (0 + 1)
140	139	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 1 = (0 + 1))
141		0red 11239	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 0 ∈ ℝ)
142	55	adantr 486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝐾 ∈ ℝ)
143		1red 11237	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 1 ∈ ℝ)
144	11, 55, 12	ltled 11386	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 0 ≤ 𝐾)
145	144	adantr 486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 0 ≤ 𝐾)
146	141, 142, 143, 145	leadd1dd 11856	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (0 + 1) ≤ (𝐾 + 1))
147	140, 146	eqbrtrd 5131	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 1 ≤ (𝐾 + 1))
148	55, 55, 107, 56	leadd1dd 11856	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝐾 + 1) ≤ (𝐾 + 1))
149	148	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝐾 + 1) ≤ (𝐾 + 1))
150	136, 138, 138, 147, 149	elfzd 13573	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝐾 + 1) ∈ (1...(𝐾 + 1)))
151	96, 150	ffvelcdmd 7082	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑐‘(𝐾 + 1)) ∈ ℕ₀)
152	151	nn0cnd 12595	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑐‘(𝐾 + 1)) ∈ ℂ)
153	63, 101, 152	subaddd 11615	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝑁 − Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙)) = (𝑐‘(𝐾 + 1)) ↔ (Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙) + (𝑐‘(𝐾 + 1))) = 𝑁))
154	135, 153	mpbird 260	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑁 − Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙)) = (𝑐‘(𝐾 + 1)))
155	102, 154	eqtrd 2797	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝐾 + 𝑁) − (𝐾 + Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙))) = (𝑐‘(𝐾 + 1)))
156	67, 155	eqtrd 2797	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝑁 + 𝐾) − (𝐾 + Σ𝑙 ∈ (1...𝐾)(𝑐‘𝑙))) = (𝑐‘(𝐾 + 1)))
157	61, 156	eqtrd 2797	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)) = (𝑐‘(𝐾 + 1)))
158	157	3adant3 1150	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)) = (𝑐‘(𝐾 + 1)))
159	158	adantr 486	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = (𝐾 + 1)) → ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)) = (𝑐‘(𝐾 + 1)))
160		simpr 490	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = (𝐾 + 1)) → 𝑘 = (𝐾 + 1))
161	160	fveq2d 6886	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = (𝐾 + 1)) → (𝑐‘𝑘) = (𝑐‘(𝐾 + 1)))
162	161	eqcomd 2768	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = (𝐾 + 1)) → (𝑐‘(𝐾 + 1)) = (𝑐‘𝑘))
163	159, 162	eqtrd 2797	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ 𝑘 = (𝐾 + 1)) → ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)) = (𝑐‘𝑘))
164	47	fveq1d 6884	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝐹‘𝑐)‘1) = ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘1))
165	164	oveq1d 7432	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (((𝐹‘𝑐)‘1) − 1) = (((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘1) − 1))
166		eqidd 2763	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))) = (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))))
167		simpr 490	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑗 = 1) → 𝑗 = 1)
168	167	oveq2d 7433	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑗 = 1) → (1...𝑗) = (1...1))
169	168	sumeq1d 15791	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑗 = 1) → Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙) = Σ𝑙 ∈ (1...1)(𝑐‘𝑙))
170	167, 169	oveq12d 7435	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑗 = 1) → (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)) = (1 + Σ𝑙 ∈ (1...1)(𝑐‘𝑙)))
171	143	leidd 11808	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 1 ≤ 1)
172	54	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 1 ≤ 𝐾)
173	136, 137, 136, 171, 172	elfzd 13573	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 1 ∈ (1...𝐾))
174		ovexd 7452	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (1 + Σ𝑙 ∈ (1...1)(𝑐‘𝑙)) ∈ V)
175	166, 170, 173, 174	fvmptd 6998	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘1) = (1 + Σ𝑙 ∈ (1...1)(𝑐‘𝑙)))
176	175	oveq1d 7432	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘1) − 1) = ((1 + Σ𝑙 ∈ (1...1)(𝑐‘𝑙)) − 1))
177		fzfid 14041	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (1...1) ∈ Fin)
178		1zzd 12653	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 1 ∈ ℤ)
179	137	adantr 486	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 𝐾 ∈ ℤ)
180	179	peano2zd 12732	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → (𝐾 + 1) ∈ ℤ)
181		elfzelz 13582	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑙 ∈ (1...1) → 𝑙 ∈ ℤ)
182	181	adantl 487	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 𝑙 ∈ ℤ)
183		elfzle1 13585	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑙 ∈ (1...1) → 1 ≤ 𝑙)
184	183	adantl 487	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 1 ≤ 𝑙)
185	182	zred 12729	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 𝑙 ∈ ℝ)
186		0red 11239	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 0 ∈ ℝ)
187		1red 11237	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 1 ∈ ℝ)
188	186, 187	readdcld 11266	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → (0 + 1) ∈ ℝ)
189	180	zred 12729	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → (𝐾 + 1) ∈ ℝ)
190		elfzle2 13586	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑙 ∈ (1...1) → 𝑙 ≤ 1)
191	190	adantl 487	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 𝑙 ≤ 1)
192	139	a1i 11	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 1 = (0 + 1))
193	191, 192	breqtrd 5135	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 𝑙 ≤ (0 + 1))
194	146	adantr 486	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → (0 + 1) ≤ (𝐾 + 1))
195	185, 188, 189, 193, 194	letrd 11395	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 𝑙 ≤ (𝐾 + 1))
196	178, 180, 182, 184, 195	elfzd 13573	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → 𝑙 ∈ (1...(𝐾 + 1)))
197	117	adantlr 728	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) ∧ 𝑙 ∈ (1...(𝐾 + 1))) → (𝑐‘𝑙) ∈ ℕ₀)
198	196, 197	mpdan 700	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑙 ∈ (1...1)) → (𝑐‘𝑙) ∈ ℕ₀)
199	177, 198	fsumnn0cl 15826	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...1)(𝑐‘𝑙) ∈ ℕ₀)
200	199	nn0cnd 12595	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...1)(𝑐‘𝑙) ∈ ℂ)
201	121, 200	pncan2d 11599	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((1 + Σ𝑙 ∈ (1...1)(𝑐‘𝑙)) − 1) = Σ𝑙 ∈ (1...1)(𝑐‘𝑙))
202	136, 138, 136, 171, 147	elfzd 13573	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 1 ∈ (1...(𝐾 + 1)))
203	96, 202	ffvelcdmd 7082	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑐‘1) ∈ ℕ₀)
204	203	nn0cnd 12595	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑐‘1) ∈ ℂ)
205		fveq2 6882	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑙 = 1 → (𝑐‘𝑙) = (𝑐‘1))
206	205	fsum1 15837	. . . . . . . . . . . . . . . . 17 ⊢ ((1 ∈ ℤ ∧ (𝑐‘1) ∈ ℂ) → Σ𝑙 ∈ (1...1)(𝑐‘𝑙) = (𝑐‘1))
207	136, 204, 206	syl2anc 596	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → Σ𝑙 ∈ (1...1)(𝑐‘𝑙) = (𝑐‘1))
208	201, 207	eqtrd 2797	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → ((1 + Σ𝑙 ∈ (1...1)(𝑐‘𝑙)) − 1) = (𝑐‘1))
209	176, 208	eqtrd 2797	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘1) − 1) = (𝑐‘1))
210	165, 209	eqtrd 2797	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (((𝐹‘𝑐)‘1) − 1) = (𝑐‘1))
211	210	3adant3 1150	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → (((𝐹‘𝑐)‘1) − 1) = (𝑐‘1))
212	211	adantr 486	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (((𝐹‘𝑐)‘1) − 1) = (𝑐‘1))
213	212	adantr 486	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ 𝑘 = 1) → (((𝐹‘𝑐)‘1) − 1) = (𝑐‘1))
214		simpr 490	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ 𝑘 = 1) → 𝑘 = 1)
215	214	fveq2d 6886	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ 𝑘 = 1) → (𝑐‘𝑘) = (𝑐‘1))
216	215	eqcomd 2768	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ 𝑘 = 1) → (𝑐‘1) = (𝑐‘𝑘))
217	213, 216	eqtrd 2797	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ 𝑘 = 1) → (((𝐹‘𝑐)‘1) − 1) = (𝑐‘𝑘))
218	4	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐹 = (𝑎 ∈ 𝐴 ↦ (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙)))))
219		simpllr 788	. . . . . . . . . . . . . . . . . 18 ⊢ (((((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑎 = 𝑐) ∧ 𝑗 ∈ (1...𝐾)) ∧ 𝑙 ∈ (1...𝑗)) → 𝑎 = 𝑐)
220	219	fveq1d 6884	. . . . . . . . . . . . . . . . 17 ⊢ (((((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑎 = 𝑐) ∧ 𝑗 ∈ (1...𝐾)) ∧ 𝑙 ∈ (1...𝑗)) → (𝑎‘𝑙) = (𝑐‘𝑙))
221	220	sumeq2dv 15793	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑎 = 𝑐) ∧ 𝑗 ∈ (1...𝐾)) → Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙) = Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))
222	221	oveq2d 7433	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑎 = 𝑐) ∧ 𝑗 ∈ (1...𝐾)) → (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙)) = (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))
223	222	mpteq2dva 5202	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑎 = 𝑐) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑎‘𝑙))) = (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))))
224		simpll2 1232	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑐 ∈ 𝐴)
225		fzfid 14041	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1...𝐾) ∈ Fin)
226	225	mptexd 7227	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))) ∈ V)
227	218, 223, 224, 226	fvmptd 6998	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝐹‘𝑐) = (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))))
228	227	fveq1d 6884	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝐹‘𝑐)‘𝑘) = ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘𝑘))
229	227	fveq1d 6884	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝐹‘𝑐)‘(𝑘 − 1)) = ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘(𝑘 − 1)))
230	228, 229	oveq12d 7435	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) = (((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘𝑘) − ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘(𝑘 − 1))))
231	230	oveq1d 7432	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1) = ((((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘𝑘) − ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘(𝑘 − 1))) − 1))
232		eqidd 2763	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))) = (𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙))))
233		simpr 490	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑗 = 𝑘) → 𝑗 = 𝑘)
234	233	oveq2d 7433	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑗 = 𝑘) → (1...𝑗) = (1...𝑘))
235	234	sumeq1d 15791	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑗 = 𝑘) → Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙) = Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙))
236	233, 235	oveq12d 7435	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑗 = 𝑘) → (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)) = (𝑘 + Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙)))
237		1zzd 12653	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℤ)
238	137	3adant3 1150	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → 𝐾 ∈ ℤ)
239	238	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝐾 ∈ ℤ)
240	239	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐾 ∈ ℤ)
241		elfznn 13612	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ∈ ℕ)
242	241	3ad2ant3 1153	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℕ)
243	242	nnzd 12645	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℤ)
244	243	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℤ)
245	244	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℤ)
246	242	nnge1d 12312	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → 1 ≤ 𝑘)
247	246	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ≤ 𝑘)
248	247	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ 𝑘)
249		simpl3 1212	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ (1...(𝐾 + 1)))
250		1zzd 12653	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 1 ∈ ℤ)
251	239	peano2zd 12732	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℤ)
252		elfz 13571	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑘 ∈ ℤ ∧ 1 ∈ ℤ ∧ (𝐾 + 1) ∈ ℤ) → (𝑘 ∈ (1...(𝐾 + 1)) ↔ (1 ≤ 𝑘 ∧ 𝑘 ≤ (𝐾 + 1))))
253	244, 250, 251, 252	syl3anc 1398	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 ∈ (1...(𝐾 + 1)) ↔ (1 ≤ 𝑘 ∧ 𝑘 ≤ (𝐾 + 1))))
254	253	biimpd 232	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 ∈ (1...(𝐾 + 1)) → (1 ≤ 𝑘 ∧ 𝑘 ≤ (𝐾 + 1))))
255	249, 254	mpd 16	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (1 ≤ 𝑘 ∧ 𝑘 ≤ (𝐾 + 1)))
256	255	simprd 501	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
257		neqne 2965	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (¬ 𝑘 = (𝐾 + 1) → 𝑘 ≠ (𝐾 + 1))
258	257	adantl 487	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≠ (𝐾 + 1))
259	258	necomd 3012	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ≠ 𝑘)
260	256, 259	jca 521	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘))
261	244	zred 12729	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ ℝ)
262	251	zred 12729	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝐾 + 1) ∈ ℝ)
263	261, 262	ltlend 11383	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 < (𝐾 + 1) ↔ (𝑘 ≤ (𝐾 + 1) ∧ (𝐾 + 1) ≠ 𝑘)))
264	260, 263	mpbird 260	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 < (𝐾 + 1))
265		zleltp1 12673	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑘 ≤ 𝐾 ↔ 𝑘 < (𝐾 + 1)))
266	244, 239, 265	syl2anc 596	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑘 ≤ 𝐾 ↔ 𝑘 < (𝐾 + 1)))
267	264, 266	mpbird 260	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ≤ 𝐾)
268	267	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ≤ 𝐾)
269	237, 240, 245, 248, 268	elfzd 13573	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ (1...𝐾))
270		ovexd 7452	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 + Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙)) ∈ V)
271	232, 236, 269, 270	fvmptd 6998	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘𝑘) = (𝑘 + Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙)))
272		simpr 490	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑗 = (𝑘 − 1)) → 𝑗 = (𝑘 − 1))
273	272	oveq2d 7433	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑗 = (𝑘 − 1)) → (1...𝑗) = (1...(𝑘 − 1)))
274	273	sumeq1d 15791	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑗 = (𝑘 − 1)) → Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙) = Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))
275	272, 274	oveq12d 7435	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑗 = (𝑘 − 1)) → (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)) = ((𝑘 − 1) + Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙)))
276		1zzd 12653	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℤ)
277	53	ad2antrr 739	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = 1) → 𝐾 ∈ ℤ)
278	277	3impa 1127	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐾 ∈ ℤ)
279	241	nnzd 12645	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ∈ ℤ)
280	279	adantl 487	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ ℤ)
281	280	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℤ)
282	281	3impa 1127	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℤ)
283	282, 276	zsubcld 12734	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ ℤ)
284		neqne 2965	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (¬ 𝑘 = 1 → 𝑘 ≠ 1)
285	284	3ad2ant3 1153	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ≠ 1)
286	107	3ad2ant1 1151	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℝ)
287	282	zred 12729	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℝ)
288		simp2 1155	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ (1...(𝐾 + 1)))
289		elfzle1 13585	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑘 ∈ (1...(𝐾 + 1)) → 1 ≤ 𝑘)
290	288, 289	syl 18	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ 𝑘)
291	286, 287, 290	leltned 11391	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ 𝑘 ≠ 1))
292	285, 291	mpbird 260	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 < 𝑘)
293	276, 282	zltp1led 12677	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 < 𝑘 ↔ (1 + 1) ≤ 𝑘))
294	292, 293	mpbid 235	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1 + 1) ≤ 𝑘)
295		leaddsub 11718	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((1 ∈ ℝ ∧ 1 ∈ ℝ ∧ 𝑘 ∈ ℝ) → ((1 + 1) ≤ 𝑘 ↔ 1 ≤ (𝑘 − 1)))
296	286, 286, 287, 295	syl3anc 1398	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((1 + 1) ≤ 𝑘 ↔ 1 ≤ (𝑘 − 1)))
297	294, 296	mpbid 235	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ≤ (𝑘 − 1))
298	283	zred 12729	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ ℝ)
299	55	3ad2ant1 1151	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐾 ∈ ℝ)
300		1red 11237	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℝ)
301	299, 300	readdcld 11266	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝐾 + 1) ∈ ℝ)
302	301, 300	resubcld 11670	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝐾 + 1) − 1) ∈ ℝ)
303		elfzle2 13586	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 ∈ (1...(𝐾 + 1)) → 𝑘 ≤ (𝐾 + 1))
304	303	3ad2ant2 1152	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ≤ (𝐾 + 1))
305	287, 301, 300, 304	lesub1dd 11858	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ≤ ((𝐾 + 1) − 1))
306	64	3ad2ant1 1151	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐾 ∈ ℂ)
307		1cnd 11230	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℂ)
308	306, 307	pncand 11598	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝐾 + 1) − 1) = 𝐾)
309	56	3ad2ant1 1151	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝐾 ≤ 𝐾)
310	308, 309	eqbrtrd 5131	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝐾 + 1) − 1) ≤ 𝐾)
311	298, 302, 299, 305, 310	letrd 11395	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ≤ 𝐾)
312	276, 278, 283, 297, 311	elfzd 13573	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ (1...𝐾))
313	312	3expa 1136	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ (1...𝐾))
314	313	3adantl2 1186	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ (1...𝐾))
315	314	adantlr 728	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ (1...𝐾))
316		ovexd 7452	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑘 − 1) + Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙)) ∈ V)
317	232, 275, 315, 316	fvmptd 6998	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘(𝑘 − 1)) = ((𝑘 − 1) + Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙)))
318	271, 317	oveq12d 7435	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘𝑘) − ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘(𝑘 − 1))) = ((𝑘 + Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙)) − ((𝑘 − 1) + Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))))
319	318	oveq1d 7432	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘𝑘) − ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘(𝑘 − 1))) − 1) = (((𝑘 + Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙)) − ((𝑘 − 1) + Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) − 1))
320	245	zcnd 12730	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ ℂ)
321		fzfid 14041	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1...𝑘) ∈ Fin)
322		1zzd 12653	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 1 ∈ ℤ)
323	240	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝐾 ∈ ℤ)
324	323	peano2zd 12732	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → (𝐾 + 1) ∈ ℤ)
325		elfznn 13612	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑙 ∈ (1...𝑘) → 𝑙 ∈ ℕ)
326	325	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝑙 ∈ ℕ)
327	326	nnzd 12645	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝑙 ∈ ℤ)
328	326	nnge1d 12312	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 1 ≤ 𝑙)
329	326	nnred 12276	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝑙 ∈ ℝ)
330	261	ad2antrr 739	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝑘 ∈ ℝ)
331	262	ad2antrr 739	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → (𝐾 + 1) ∈ ℝ)
332		elfzle2 13586	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑙 ∈ (1...𝑘) → 𝑙 ≤ 𝑘)
333	332	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝑙 ≤ 𝑘)
334	256	ad2antrr 739	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝑘 ≤ (𝐾 + 1))
335	329, 330, 331, 333, 334	letrd 11395	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝑙 ≤ (𝐾 + 1))
336	322, 324, 327, 328, 335	elfzd 13573	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝑙 ∈ (1...(𝐾 + 1)))
337	96	3adant3 1150	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → 𝑐:(1...(𝐾 + 1))⟶ℕ₀)
338	337	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑐:(1...(𝐾 + 1))⟶ℕ₀)
339	338	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑐:(1...(𝐾 + 1))⟶ℕ₀)
340	339	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → 𝑐:(1...(𝐾 + 1))⟶ℕ₀)
341	340	ffvelcdmda 7081	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) ∧ 𝑙 ∈ (1...(𝐾 + 1))) → (𝑐‘𝑙) ∈ ℕ₀)
342	336, 341	mpdan 700	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → (𝑐‘𝑙) ∈ ℕ₀)
343	321, 342	fsumnn0cl 15826	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) ∈ ℕ₀)
344	343	nn0cnd 12595	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) ∈ ℂ)
345		1cnd 11230	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 1 ∈ ℂ)
346	320, 345	subcld 11597	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − 1) ∈ ℂ)
347		fzfid 14041	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (1...(𝑘 − 1)) ∈ Fin)
348		1zzd 12653	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 1 ∈ ℤ)
349	240	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝐾 ∈ ℤ)
350	349	peano2zd 12732	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → (𝐾 + 1) ∈ ℤ)
351		elfznn 13612	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑙 ∈ (1...(𝑘 − 1)) → 𝑙 ∈ ℕ)
352	351	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝑙 ∈ ℕ)
353	352	nnzd 12645	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝑙 ∈ ℤ)
354	352	nnge1d 12312	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 1 ≤ 𝑙)
355	352	nnred 12276	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝑙 ∈ ℝ)
356	261	ad2antrr 739	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝑘 ∈ ℝ)
357		1red 11237	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 1 ∈ ℝ)
358	356, 357	resubcld 11670	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → (𝑘 − 1) ∈ ℝ)
359	262	ad2antrr 739	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → (𝐾 + 1) ∈ ℝ)
360		elfzle2 13586	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑙 ∈ (1...(𝑘 − 1)) → 𝑙 ≤ (𝑘 − 1))
361	360	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝑙 ≤ (𝑘 − 1))
362	356	lem1d 12176	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → (𝑘 − 1) ≤ 𝑘)
363	256	ad2antrr 739	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝑘 ≤ (𝐾 + 1))
364	358, 356, 359, 362, 363	letrd 11395	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → (𝑘 − 1) ≤ (𝐾 + 1))
365	355, 358, 359, 361, 364	letrd 11395	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝑙 ≤ (𝐾 + 1))
366	348, 350, 353, 354, 365	elfzd 13573	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝑙 ∈ (1...(𝐾 + 1)))
367	339	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → 𝑐:(1...(𝐾 + 1))⟶ℕ₀)
368	367	ffvelcdmda 7081	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) ∧ 𝑙 ∈ (1...(𝐾 + 1))) → (𝑐‘𝑙) ∈ ℕ₀)
369	366, 368	mpdan 700	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...(𝑘 − 1))) → (𝑐‘𝑙) ∈ ℕ₀)
370	347, 369	fsumnn0cl 15826	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙) ∈ ℕ₀)
371	370	nn0cnd 12595	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙) ∈ ℂ)
372	320, 344, 346, 371	addsub4d 11644	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑘 + Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙)) − ((𝑘 − 1) + Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) = ((𝑘 − (𝑘 − 1)) + (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))))
373	372	oveq1d 7432	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑘 + Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙)) − ((𝑘 − 1) + Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) − 1) = (((𝑘 − (𝑘 − 1)) + (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) − 1))
374	320, 345	nncand 11602	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑘 − (𝑘 − 1)) = 1)
375	374	oveq1d 7432	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((𝑘 − (𝑘 − 1)) + (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) = (1 + (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))))
376	375	oveq1d 7432	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑘 − (𝑘 − 1)) + (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) − 1) = ((1 + (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) − 1))
377	344, 371	subcld 11597	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙)) ∈ ℂ)
378	345, 377	pncan2d 11599	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((1 + (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) − 1) = (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙)))
379	136	3adant3 1150	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → 1 ∈ ℤ)
380	379, 243, 246	3jca 1146	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → (1 ∈ ℤ ∧ 𝑘 ∈ ℤ ∧ 1 ≤ 𝑘))
381		eluz2 12897	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 ∈ (ℤ_≥‘1) ↔ (1 ∈ ℤ ∧ 𝑘 ∈ ℤ ∧ 1 ≤ 𝑘))
382	380, 381	sylibr 237	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ (ℤ_≥‘1))
383	382	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → 𝑘 ∈ (ℤ_≥‘1))
384	383	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → 𝑘 ∈ (ℤ_≥‘1))
385	342	nn0cnd 12595	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) ∧ 𝑙 ∈ (1...𝑘)) → (𝑐‘𝑙) ∈ ℂ)
386		fveq2 6882	. . . . . . . . . . . . . . . . 17 ⊢ (𝑙 = 𝑘 → (𝑐‘𝑙) = (𝑐‘𝑘))
387	384, 385, 386	fsumm1 15841	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) = (Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙) + (𝑐‘𝑘)))
388	387	eqcomd 2768	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙) + (𝑐‘𝑘)) = Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙))
389		simp3 1156	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → 𝑘 ∈ (1...(𝐾 + 1)))
390	337, 389	ffvelcdmd 7082	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → (𝑐‘𝑘) ∈ ℕ₀)
391	390	nn0cnd 12595	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → (𝑐‘𝑘) ∈ ℂ)
392	391	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → (𝑐‘𝑘) ∈ ℂ)
393	392	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (𝑐‘𝑘) ∈ ℂ)
394	344, 371, 393	subaddd 11615	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙)) = (𝑐‘𝑘) ↔ (Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙) + (𝑐‘𝑘)) = Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙)))
395	388, 394	mpbird 260	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙)) = (𝑐‘𝑘))
396	378, 395	eqtrd 2797	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((1 + (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) − 1) = (𝑐‘𝑘))
397	376, 396	eqtrd 2797	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑘 − (𝑘 − 1)) + (Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙) − Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) − 1) = (𝑐‘𝑘))
398	373, 397	eqtrd 2797	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → (((𝑘 + Σ𝑙 ∈ (1...𝑘)(𝑐‘𝑙)) − ((𝑘 − 1) + Σ𝑙 ∈ (1...(𝑘 − 1))(𝑐‘𝑙))) − 1) = (𝑐‘𝑘))
399	319, 398	eqtrd 2797	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘𝑘) − ((𝑗 ∈ (1...𝐾) ↦ (𝑗 + Σ𝑙 ∈ (1...𝑗)(𝑐‘𝑙)))‘(𝑘 − 1))) − 1) = (𝑐‘𝑘))
400	231, 399	eqtrd 2797	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) ∧ ¬ 𝑘 = 1) → ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1) = (𝑐‘𝑘))
401	217, 400	ifeqda 4522	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) ∧ ¬ 𝑘 = (𝐾 + 1)) → if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1)) = (𝑐‘𝑘))
402	163, 401	ifeqda 4522	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴 ∧ 𝑘 ∈ (1...(𝐾 + 1))) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1))) = (𝑐‘𝑘))
403	402	3expa 1136	. . . . . 6 ⊢ (((𝜑 ∧ 𝑐 ∈ 𝐴) ∧ 𝑘 ∈ (1...(𝐾 + 1))) → if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1))) = (𝑐‘𝑘))
404	403	mpteq2dva 5202	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1)))) = (𝑘 ∈ (1...(𝐾 + 1)) ↦ (𝑐‘𝑘)))
405	96	ffnd 6707	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝑐 Fn (1...(𝐾 + 1)))
406		dffn5 6940	. . . . . . . 8 ⊢ (𝑐 Fn (1...(𝐾 + 1)) ↔ 𝑐 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ (𝑐‘𝑘)))
407	406	biimpi 219	. . . . . . 7 ⊢ (𝑐 Fn (1...(𝐾 + 1)) → 𝑐 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ (𝑐‘𝑘)))
408	405, 407	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → 𝑐 = (𝑘 ∈ (1...(𝐾 + 1)) ↦ (𝑐‘𝑘)))
409	408	eqcomd 2768	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ (𝑐‘𝑘)) = 𝑐)
410	404, 409	eqtrd 2797	. . . 4 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝑘 ∈ (1...(𝐾 + 1)) ↦ if(𝑘 = (𝐾 + 1), ((𝑁 + 𝐾) − ((𝐹‘𝑐)‘𝐾)), if(𝑘 = 1, (((𝐹‘𝑐)‘1) − 1), ((((𝐹‘𝑐)‘𝑘) − ((𝐹‘𝑐)‘(𝑘 − 1))) − 1)))) = 𝑐)
411	37, 410	eqtrd 2797	. . 3 ⊢ ((𝜑 ∧ 𝑐 ∈ 𝐴) → (𝐺‘(𝐹‘𝑐)) = 𝑐)
412	411	ralrimiva 3156	. 2 ⊢ (𝜑 → ∀𝑐 ∈ 𝐴 (𝐺‘(𝐹‘𝑐)) = 𝑐)
413	1, 2, 4, 8, 5, 6	sticksstones12a 43031	. 2 ⊢ (𝜑 → ∀𝑑 ∈ 𝐵 (𝐹‘(𝐺‘𝑑)) = 𝑑)
414	7, 9, 412, 413	2fvidf1od 7303	1 ⊢ (𝜑 → 𝐹:𝐴–1-1-onto→𝐵)

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 2145 {cab 2740 ≠ wne 2957 ∀wral 3078 Vcvv 3453 ifcif 4485 {csn 4587 ⟨cop 4593 class class class wbr 5107 ↦ cmpt 5190 Fn wfn 6532 ⟶wf 6533 –1-1-onto→wf1o 6536 ‘cfv 6537 (class class class)co 7417 Fincfn 8956 ℂcc 11126 ℝcr 11127 0cc0 11128 1c1 11129 + caddc 11131 < clt 11271 ≤ cle 11272 − cmin 11469 ℕcn 12261 ℕ₀cn0 12532 ℤcz 12619 ℤ_≥cuz 12891 ...cfz 13565 Σcsu 15777

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 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2215 ax-ext 2734 ax-rep 5236 ax-sep 5255 ax-nul 5267 ax-pow 5334 ax-pr 5402 ax-un 7740 ax-inf2 9624 ax-cnex 11184 ax-resscn 11185 ax-1cn 11186 ax-icn 11187 ax-addcl 11188 ax-addrcl 11189 ax-mulcl 11190 ax-mulrcl 11191 ax-mulcom 11192 ax-addass 11193 ax-mulass 11194 ax-distr 11195 ax-i2m1 11196 ax-1ne0 11197 ax-1rid 11198 ax-rnegex 11199 ax-rrecex 11200 ax-cnre 11201 ax-pre-lttri 11202 ax-pre-lttrn 11203 ax-pre-ltadd 11204 ax-pre-mulgt0 11205 ax-pre-sup 11206

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 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-nel 3064 df-ral 3079 df-rex 3089 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3455 df-sbc 3743 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4283 df-if 4486 df-pw 4562 df-sn 4588 df-pr 4590 df-op 4594 df-uni 4871 df-int 4911 df-iun 4956 df-br 5108 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5554 df-eprel 5559 df-po 5567 df-so 5568 df-fr 5612 df-se 5613 df-we 5614 df-xp 5665 df-rel 5666 df-cnv 5667 df-co 5668 df-dm 5669 df-rn 5670 df-res 5671 df-ima 5672 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-isom 6546 df-riota 7374 df-ov 7420 df-oprab 7421 df-mpo 7422 df-om 7867 df-1st 7990 df-2nd 7991 df-frecs 8284 df-wrecs 8315 df-recs 8364 df-rdg 8403 df-1o 8459 df-er 8700 df-en 8957 df-dom 8958 df-sdom 8959 df-fin 8960 df-sup 9416 df-oi 9486 df-card 9948 df-pnf 11273 df-mnf 11274 df-xr 11275 df-ltxr 11276 df-le 11277 df-sub 11471 df-neg 11472 df-div 11900 df-nn 12262 df-2 12331 df-3 12332 df-n0 12533 df-z 12620 df-uz 12892 df-rp 13047 df-ico 13408 df-fz 13566 df-fzo 13714 df-seq 14070 df-exp 14130 df-hash 14399 df-cj 15190 df-re 15191 df-im 15192 df-sqrt 15326 df-abs 15327 df-clim 15579 df-sum 15778

This theorem is used by: sticksstones13 43033

W3C validator