vieta1 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > vieta1		Structured version Visualization version GIF version

Theorem vieta1 26059

Description: The first-order Vieta's formula (see http://en.wikipedia.org/wiki/Vieta%27s_formulas). If a polynomial of degree 𝑁 has 𝑁 distinct roots, then the sum over these roots can be calculated as -𝐴(𝑁 − 1) / 𝐴(𝑁). (If the roots are not distinct, then this formula is still true but must double-count some of the roots according to their multiplicities.) (Contributed by Mario Carneiro, 28-Jul-2014.)

**Hypotheses**
Ref	Expression
vieta1.1	⊢ 𝐴 = (coeff‘𝐹)
vieta1.2	⊢ 𝑁 = (deg‘𝐹)
vieta1.3	⊢ 𝑅 = (^◡𝐹 “ {0})
vieta1.4	⊢ (𝜑 → 𝐹 ∈ (Poly‘𝑆))
vieta1.5	⊢ (𝜑 → (♯‘𝑅) = 𝑁)
vieta1.6	⊢ (𝜑 → 𝑁 ∈ ℕ)

**Assertion**
Ref	Expression
vieta1	⊢ (𝜑 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))

Distinct variable groups: 𝑥,𝑅 𝜑,𝑥 Allowed substitution hints: 𝐴(𝑥) 𝑆(𝑥) 𝐹(𝑥) 𝑁(𝑥)

Proof of Theorem vieta1 Dummy variables 𝑓 𝑘 𝑦 𝑧 𝑑 𝑔 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		vieta1.5	. 2 ⊢ (𝜑 → (♯‘𝑅) = 𝑁)
2		fveq2 6892	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (deg‘𝑓) = (deg‘𝐹))
3	2	eqeq2d 2741	. . . . . 6 ⊢ (𝑓 = 𝐹 → (𝑁 = (deg‘𝑓) ↔ 𝑁 = (deg‘𝐹)))
4		cnveq 5874	. . . . . . . . . 10 ⊢ (𝑓 = 𝐹 → ^◡𝑓 = ^◡𝐹)
5	4	imaeq1d 6059	. . . . . . . . 9 ⊢ (𝑓 = 𝐹 → (^◡𝑓 “ {0}) = (^◡𝐹 “ {0}))
6		vieta1.3	. . . . . . . . 9 ⊢ 𝑅 = (^◡𝐹 “ {0})
7	5, 6	eqtr4di 2788	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → (^◡𝑓 “ {0}) = 𝑅)
8	7	fveq2d 6896	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (♯‘(^◡𝑓 “ {0})) = (♯‘𝑅))
9		vieta1.2	. . . . . . . 8 ⊢ 𝑁 = (deg‘𝐹)
10	2, 9	eqtr4di 2788	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (deg‘𝑓) = 𝑁)
11	8, 10	eqeq12d 2746	. . . . . 6 ⊢ (𝑓 = 𝐹 → ((♯‘(^◡𝑓 “ {0})) = (deg‘𝑓) ↔ (♯‘𝑅) = 𝑁))
12	3, 11	anbi12d 629	. . . . 5 ⊢ (𝑓 = 𝐹 → ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑁 = (deg‘𝐹) ∧ (♯‘𝑅) = 𝑁)))
13	9	biantrur 529	. . . . 5 ⊢ ((♯‘𝑅) = 𝑁 ↔ (𝑁 = (deg‘𝐹) ∧ (♯‘𝑅) = 𝑁))
14	12, 13	bitr4di 288	. . . 4 ⊢ (𝑓 = 𝐹 → ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (♯‘𝑅) = 𝑁))
15	7	sumeq1d 15653	. . . . 5 ⊢ (𝑓 = 𝐹 → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = Σ𝑥 ∈ 𝑅 𝑥)
16		fveq2 6892	. . . . . . . . 9 ⊢ (𝑓 = 𝐹 → (coeff‘𝑓) = (coeff‘𝐹))
17		vieta1.1	. . . . . . . . 9 ⊢ 𝐴 = (coeff‘𝐹)
18	16, 17	eqtr4di 2788	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → (coeff‘𝑓) = 𝐴)
19	10	oveq1d 7428	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → ((deg‘𝑓) − 1) = (𝑁 − 1))
20	18, 19	fveq12d 6899	. . . . . . 7 ⊢ (𝑓 = 𝐹 → ((coeff‘𝑓)‘((deg‘𝑓) − 1)) = (𝐴‘(𝑁 − 1)))
21	18, 10	fveq12d 6899	. . . . . . 7 ⊢ (𝑓 = 𝐹 → ((coeff‘𝑓)‘(deg‘𝑓)) = (𝐴‘𝑁))
22	20, 21	oveq12d 7431	. . . . . 6 ⊢ (𝑓 = 𝐹 → (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) = ((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))
23	22	negeqd 11460	. . . . 5 ⊢ (𝑓 = 𝐹 → -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))
24	15, 23	eqeq12d 2746	. . . 4 ⊢ (𝑓 = 𝐹 → (Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) ↔ Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁))))
25	14, 24	imbi12d 343	. . 3 ⊢ (𝑓 = 𝐹 → (((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((♯‘𝑅) = 𝑁 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))))
26		vieta1.6	. . . 4 ⊢ (𝜑 → 𝑁 ∈ ℕ)
27		eqeq1 2734	. . . . . . . 8 ⊢ (𝑦 = 1 → (𝑦 = (deg‘𝑓) ↔ 1 = (deg‘𝑓)))
28	27	anbi1d 628	. . . . . . 7 ⊢ (𝑦 = 1 → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
29	28	imbi1d 340	. . . . . 6 ⊢ (𝑦 = 1 → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
30	29	ralbidv 3175	. . . . 5 ⊢ (𝑦 = 1 → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
31		eqeq1 2734	. . . . . . . 8 ⊢ (𝑦 = 𝑑 → (𝑦 = (deg‘𝑓) ↔ 𝑑 = (deg‘𝑓)))
32	31	anbi1d 628	. . . . . . 7 ⊢ (𝑦 = 𝑑 → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
33	32	imbi1d 340	. . . . . 6 ⊢ (𝑦 = 𝑑 → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
34	33	ralbidv 3175	. . . . 5 ⊢ (𝑦 = 𝑑 → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
35		eqeq1 2734	. . . . . . . 8 ⊢ (𝑦 = (𝑑 + 1) → (𝑦 = (deg‘𝑓) ↔ (𝑑 + 1) = (deg‘𝑓)))
36	35	anbi1d 628	. . . . . . 7 ⊢ (𝑦 = (𝑑 + 1) → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ ((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
37	36	imbi1d 340	. . . . . 6 ⊢ (𝑦 = (𝑑 + 1) → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ (((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
38	37	ralbidv 3175	. . . . 5 ⊢ (𝑦 = (𝑑 + 1) → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)(((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
39		eqeq1 2734	. . . . . . . 8 ⊢ (𝑦 = 𝑁 → (𝑦 = (deg‘𝑓) ↔ 𝑁 = (deg‘𝑓)))
40	39	anbi1d 628	. . . . . . 7 ⊢ (𝑦 = 𝑁 → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
41	40	imbi1d 340	. . . . . 6 ⊢ (𝑦 = 𝑁 → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
42	41	ralbidv 3175	. . . . 5 ⊢ (𝑦 = 𝑁 → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
43		eqid 2730	. . . . . . . . . . . . . . 15 ⊢ (coeff‘𝑓) = (coeff‘𝑓)
44	43	coef3 25980	. . . . . . . . . . . . . 14 ⊢ (𝑓 ∈ (Poly‘ℂ) → (coeff‘𝑓):ℕ₀⟶ℂ)
45	44	adantr 479	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (coeff‘𝑓):ℕ₀⟶ℂ)
46		0nn0 12493	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℕ₀
47		ffvelcdm 7084	. . . . . . . . . . . . 13 ⊢ (((coeff‘𝑓):ℕ₀⟶ℂ ∧ 0 ∈ ℕ₀) → ((coeff‘𝑓)‘0) ∈ ℂ)
48	45, 46, 47	sylancl 584	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘0) ∈ ℂ)
49		1nn0 12494	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℕ₀
50		ffvelcdm 7084	. . . . . . . . . . . . 13 ⊢ (((coeff‘𝑓):ℕ₀⟶ℂ ∧ 1 ∈ ℕ₀) → ((coeff‘𝑓)‘1) ∈ ℂ)
51	45, 49, 50	sylancl 584	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) ∈ ℂ)
52		simpr 483	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 1 = (deg‘𝑓))
53	52	fveq2d 6896	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) = ((coeff‘𝑓)‘(deg‘𝑓)))
54		ax-1ne0 11183	. . . . . . . . . . . . . . . . 17 ⊢ 1 ≠ 0
55	54	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 1 ≠ 0)
56	52, 55	eqnetrrd 3007	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (deg‘𝑓) ≠ 0)
57		fveq2 6892	. . . . . . . . . . . . . . . . 17 ⊢ (𝑓 = 0_𝑝 → (deg‘𝑓) = (deg‘0_𝑝))
58		dgr0 26010	. . . . . . . . . . . . . . . . 17 ⊢ (deg‘0_𝑝) = 0
59	57, 58	eqtrdi 2786	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 = 0_𝑝 → (deg‘𝑓) = 0)
60	59	necon3i 2971	. . . . . . . . . . . . . . 15 ⊢ ((deg‘𝑓) ≠ 0 → 𝑓 ≠ 0_𝑝)
61	56, 60	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 𝑓 ≠ 0_𝑝)
62		eqid 2730	. . . . . . . . . . . . . . . . 17 ⊢ (deg‘𝑓) = (deg‘𝑓)
63	62, 43	dgreq0 26013	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 ∈ (Poly‘ℂ) → (𝑓 = 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) = 0))
64	63	necon3bid 2983	. . . . . . . . . . . . . . 15 ⊢ (𝑓 ∈ (Poly‘ℂ) → (𝑓 ≠ 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0))
65	64	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓 ≠ 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0))
66	61, 65	mpbid 231	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0)
67	53, 66	eqnetrd 3006	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) ≠ 0)
68	48, 51, 67	divcld 11996	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ)
69	68	negcld 11564	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ)
70		id 22	. . . . . . . . . . 11 ⊢ (𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) → 𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
71	70	sumsn 15698	. . . . . . . . . 10 ⊢ ((-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
72	69, 69, 71	syl2anc 582	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
73	72	adantrr 713	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
74		eqid 2730	. . . . . . . . . . . . . 14 ⊢ (^◡𝑓 “ {0}) = (^◡𝑓 “ {0})
75	74	fta1 26055	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 𝑓 ≠ 0_𝑝) → ((^◡𝑓 “ {0}) ∈ Fin ∧ (♯‘(^◡𝑓 “ {0})) ≤ (deg‘𝑓)))
76	61, 75	syldan 589	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((^◡𝑓 “ {0}) ∈ Fin ∧ (♯‘(^◡𝑓 “ {0})) ≤ (deg‘𝑓)))
77	76	simpld 493	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (^◡𝑓 “ {0}) ∈ Fin)
78	77	adantrr 713	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (^◡𝑓 “ {0}) ∈ Fin)
79	43, 62	coeid2 25987	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
80	69, 79	syldan 589	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
81	52	oveq2d 7429	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (0...1) = (0...(deg‘𝑓)))
82	81	sumeq1d 15653	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
83		nn0uz 12870	. . . . . . . . . . . . . . . 16 ⊢ ℕ₀ = (ℤ_≥‘0)
84		1e0p1 12725	. . . . . . . . . . . . . . . 16 ⊢ 1 = (0 + 1)
85		fveq2 6892	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 1 → ((coeff‘𝑓)‘𝑘) = ((coeff‘𝑓)‘1))
86		oveq2 7421	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 1 → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) = (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))
87	85, 86	oveq12d 7431	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 1 → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)))
88	45	ffvelcdmda 7087	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → ((coeff‘𝑓)‘𝑘) ∈ ℂ)
89		expcl 14051	. . . . . . . . . . . . . . . . . 18 ⊢ ((-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) ∈ ℂ)
90	69, 89	sylan 578	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) ∈ ℂ)
91	88, 90	mulcld 11240	. . . . . . . . . . . . . . . 16 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) ∈ ℂ)
92		0z 12575	. . . . . . . . . . . . . . . . . . 19 ⊢ 0 ∈ ℤ
93	69	exp0d 14111	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0) = 1)
94	93	oveq2d 7429	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) = (((coeff‘𝑓)‘0) · 1))
95	48	mulridd 11237	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · 1) = ((coeff‘𝑓)‘0))
96	94, 95	eqtrd 2770	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) = ((coeff‘𝑓)‘0))
97	96, 48	eqeltrd 2831	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) ∈ ℂ)
98		fveq2 6892	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → ((coeff‘𝑓)‘𝑘) = ((coeff‘𝑓)‘0))
99		oveq2 7421	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) = (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0))
100	98, 99	oveq12d 7431	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = 0 → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)))
101	100	fsum1 15699	. . . . . . . . . . . . . . . . . . 19 ⊢ ((0 ∈ ℤ ∧ (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) ∈ ℂ) → Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)))
102	92, 97, 101	sylancr 585	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)))
103	102, 96	eqtrd 2770	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = ((coeff‘𝑓)‘0))
104	103, 46	jctil 518	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (0 ∈ ℕ₀ ∧ Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = ((coeff‘𝑓)‘0)))
105	69	exp1d 14112	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1) = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
106	105	oveq2d 7429	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)) = (((coeff‘𝑓)‘1) · -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))))
107	51, 68	mulneg2d 11674	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = -(((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))))
108	48, 51, 67	divcan2d 11998	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = ((coeff‘𝑓)‘0))
109	108	negeqd 11460	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = -((coeff‘𝑓)‘0))
110	106, 107, 109	3eqtrd 2774	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)) = -((coeff‘𝑓)‘0))
111	110	oveq2d 7429	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))) = (((coeff‘𝑓)‘0) + -((coeff‘𝑓)‘0)))
112	48	negidd 11567	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + -((coeff‘𝑓)‘0)) = 0)
113	111, 112	eqtrd 2770	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))) = 0)
114	83, 84, 87, 91, 104, 113	fsump1i 15721	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (1 ∈ ℕ₀ ∧ Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = 0))
115	114	simprd 494	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = 0)
116	80, 82, 115	3eqtr2d 2776	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = 0)
117		plyf 25946	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 ∈ (Poly‘ℂ) → 𝑓:ℂ⟶ℂ)
118	117	ffnd 6719	. . . . . . . . . . . . . . 15 ⊢ (𝑓 ∈ (Poly‘ℂ) → 𝑓 Fn ℂ)
119	118	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 𝑓 Fn ℂ)
120		fniniseg 7062	. . . . . . . . . . . . . 14 ⊢ (𝑓 Fn ℂ → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ (^◡𝑓 “ {0}) ↔ (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = 0)))
121	119, 120	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ (^◡𝑓 “ {0}) ↔ (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = 0)))
122	69, 116, 121	mpbir2and 709	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ (^◡𝑓 “ {0}))
123	122	snssd 4813	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}))
124	123	adantrr 713	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}))
125		hashsng 14335	. . . . . . . . . . . . . . 15 ⊢ (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = 1)
126	69, 125	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = 1)
127	126, 52	eqtrd 2770	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (deg‘𝑓))
128	127	adantrr 713	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (deg‘𝑓))
129		simprr 769	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))
130	128, 129	eqtr4d 2773	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})))
131		snfi 9048	. . . . . . . . . . . . 13 ⊢ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ∈ Fin
132		hashen 14313	. . . . . . . . . . . . 13 ⊢ (({-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ∈ Fin ∧ (^◡𝑓 “ {0}) ∈ Fin) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
133	131, 77, 132	sylancr 585	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
134	133	adantrr 713	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
135	130, 134	mpbid 231	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0}))
136		fisseneq 9261	. . . . . . . . . 10 ⊢ (((^◡𝑓 “ {0}) ∈ Fin ∧ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}) ∧ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} = (^◡𝑓 “ {0}))
137	78, 124, 135, 136	syl3anc 1369	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} = (^◡𝑓 “ {0}))
138	137	sumeq1d 15653	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥)
139		1m1e0 12290	. . . . . . . . . . . . 13 ⊢ (1 − 1) = 0
140	52	oveq1d 7428	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (1 − 1) = ((deg‘𝑓) − 1))
141	139, 140	eqtr3id 2784	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 0 = ((deg‘𝑓) − 1))
142	141	fveq2d 6896	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘0) = ((coeff‘𝑓)‘((deg‘𝑓) − 1)))
143	142, 53	oveq12d 7431	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
144	143	negeqd 11460	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
145	144	adantrr 713	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
146	73, 138, 145	3eqtr3d 2778	. . . . . . 7 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
147	146	ex 411	. . . . . 6 ⊢ (𝑓 ∈ (Poly‘ℂ) → ((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
148	147	rgen 3061	. . . . 5 ⊢ ∀𝑓 ∈ (Poly‘ℂ)((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
149		id 22	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑥 → 𝑦 = 𝑥)
150	149	cbvsumv 15648	. . . . . . . . . . 11 ⊢ Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥
151	150	eqeq1i 2735	. . . . . . . . . 10 ⊢ (Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) ↔ Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
152	151	imbi2i 335	. . . . . . . . 9 ⊢ (((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
153	152	ralbii 3091	. . . . . . . 8 ⊢ (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
154		eqid 2730	. . . . . . . . . 10 ⊢ (coeff‘𝑔) = (coeff‘𝑔)
155		eqid 2730	. . . . . . . . . 10 ⊢ (deg‘𝑔) = (deg‘𝑔)
156		eqid 2730	. . . . . . . . . 10 ⊢ (^◡𝑔 “ {0}) = (^◡𝑔 “ {0})
157		simp1r 1196	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → 𝑔 ∈ (Poly‘ℂ))
158		simp3r 1200	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))
159		simp1l 1195	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → 𝑑 ∈ ℕ)
160		simp3l 1199	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → (𝑑 + 1) = (deg‘𝑔))
161		simp2 1135	. . . . . . . . . . 11 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
162	161, 153	sylib 217	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
163		eqid 2730	. . . . . . . . . 10 ⊢ (𝑔 quot (X_p ∘_f − (ℂ × {𝑧}))) = (𝑔 quot (X_p ∘_f − (ℂ × {𝑧})))
164	154, 155, 156, 157, 158, 159, 160, 162, 163	vieta1lem2 26058	. . . . . . . . 9 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))))
165	164	3exp 1117	. . . . . . . 8 ⊢ ((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) → (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) → (((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))))))
166	153, 165	biimtrrid 242	. . . . . . 7 ⊢ ((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) → (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) → (((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))))))
167	166	ralrimdva 3152	. . . . . 6 ⊢ (𝑑 ∈ ℕ → (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) → ∀𝑔 ∈ (Poly‘ℂ)(((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))))))
168		fveq2 6892	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (deg‘𝑔) = (deg‘𝑓))
169	168	eqeq2d 2741	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → ((𝑑 + 1) = (deg‘𝑔) ↔ (𝑑 + 1) = (deg‘𝑓)))
170		cnveq 5874	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → ^◡𝑔 = ^◡𝑓)
171	170	imaeq1d 6059	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → (^◡𝑔 “ {0}) = (^◡𝑓 “ {0}))
172	171	fveq2d 6896	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (♯‘(^◡𝑔 “ {0})) = (♯‘(^◡𝑓 “ {0})))
173	172, 168	eqeq12d 2746	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → ((♯‘(^◡𝑔 “ {0})) = (deg‘𝑔) ↔ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)))
174	169, 173	anbi12d 629	. . . . . . . 8 ⊢ (𝑔 = 𝑓 → (((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) ↔ ((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
175	171	sumeq1d 15653	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥)
176		fveq2 6892	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → (coeff‘𝑔) = (coeff‘𝑓))
177	168	oveq1d 7428	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → ((deg‘𝑔) − 1) = ((deg‘𝑓) − 1))
178	176, 177	fveq12d 6899	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → ((coeff‘𝑔)‘((deg‘𝑔) − 1)) = ((coeff‘𝑓)‘((deg‘𝑓) − 1)))
179	176, 168	fveq12d 6899	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → ((coeff‘𝑔)‘(deg‘𝑔)) = ((coeff‘𝑓)‘(deg‘𝑓)))
180	178, 179	oveq12d 7431	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) = (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
181	180	negeqd 11460	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
182	175, 181	eqeq12d 2746	. . . . . . . 8 ⊢ (𝑔 = 𝑓 → (Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) ↔ Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
183	174, 182	imbi12d 343	. . . . . . 7 ⊢ (𝑔 = 𝑓 → ((((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔)))) ↔ (((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
184	183	cbvralvw 3232	. . . . . 6 ⊢ (∀𝑔 ∈ (Poly‘ℂ)(((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)(((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
185	167, 184	imbitrdi 250	. . . . 5 ⊢ (𝑑 ∈ ℕ → (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) → ∀𝑓 ∈ (Poly‘ℂ)(((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
186	30, 34, 38, 42, 148, 185	nnind 12236	. . . 4 ⊢ (𝑁 ∈ ℕ → ∀𝑓 ∈ (Poly‘ℂ)((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
187	26, 186	syl 17	. . 3 ⊢ (𝜑 → ∀𝑓 ∈ (Poly‘ℂ)((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
188		plyssc 25948	. . . 4 ⊢ (Poly‘𝑆) ⊆ (Poly‘ℂ)
189		vieta1.4	. . . 4 ⊢ (𝜑 → 𝐹 ∈ (Poly‘𝑆))
190	188, 189	sselid 3981	. . 3 ⊢ (𝜑 → 𝐹 ∈ (Poly‘ℂ))
191	25, 187, 190	rspcdva 3614	. 2 ⊢ (𝜑 → ((♯‘𝑅) = 𝑁 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁))))
192	1, 191	mpd 15	1 ⊢ (𝜑 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 394 ∧ w3a 1085 = wceq 1539 ∈ wcel 2104 ≠ wne 2938 ∀wral 3059 ⊆ wss 3949 {csn 4629 class class class wbr 5149 × cxp 5675 ^◡ccnv 5676 “ cima 5680 Fn wfn 6539 ⟶wf 6540 ‘cfv 6544 (class class class)co 7413 ∘_f cof 7672 ≈ cen 8940 Fincfn 8943 ℂcc 11112 0cc0 11114 1c1 11115 + caddc 11117 · cmul 11119 ≤ cle 11255 − cmin 11450 -cneg 11451 / cdiv 11877 ℕcn 12218 ℕ₀cn0 12478 ℤcz 12564 ...cfz 13490 ↑cexp 14033 ♯chash 14296 Σcsu 15638 0_𝑝c0p 25420 Polycply 25932 X_pcidp 25933 coeffccoe 25934 degcdgr 25935 quot cquot 26037

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1911 ax-6 1969 ax-7 2009 ax-8 2106 ax-9 2114 ax-10 2135 ax-11 2152 ax-12 2169 ax-ext 2701 ax-rep 5286 ax-sep 5300 ax-nul 5307 ax-pow 5364 ax-pr 5428 ax-un 7729 ax-inf2 9640 ax-cnex 11170 ax-resscn 11171 ax-1cn 11172 ax-icn 11173 ax-addcl 11174 ax-addrcl 11175 ax-mulcl 11176 ax-mulrcl 11177 ax-mulcom 11178 ax-addass 11179 ax-mulass 11180 ax-distr 11181 ax-i2m1 11182 ax-1ne0 11183 ax-1rid 11184 ax-rnegex 11185 ax-rrecex 11186 ax-cnre 11187 ax-pre-lttri 11188 ax-pre-lttrn 11189 ax-pre-ltadd 11190 ax-pre-mulgt0 11191 ax-pre-sup 11192

This theorem depends on definitions: df-bi 206 df-an 395 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2532 df-eu 2561 df-clab 2708 df-cleq 2722 df-clel 2808 df-nfc 2883 df-ne 2939 df-nel 3045 df-ral 3060 df-rex 3069 df-rmo 3374 df-reu 3375 df-rab 3431 df-v 3474 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-nul 4324 df-if 4530 df-pw 4605 df-sn 4630 df-pr 4632 df-op 4636 df-uni 4910 df-int 4952 df-iun 5000 df-br 5150 df-opab 5212 df-mpt 5233 df-tr 5267 df-id 5575 df-eprel 5581 df-po 5589 df-so 5590 df-fr 5632 df-se 5633 df-we 5634 df-xp 5683 df-rel 5684 df-cnv 5685 df-co 5686 df-dm 5687 df-rn 5688 df-res 5689 df-ima 5690 df-pred 6301 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6496 df-fun 6546 df-fn 6547 df-f 6548 df-f1 6549 df-fo 6550 df-f1o 6551 df-fv 6552 df-isom 6553 df-riota 7369 df-ov 7416 df-oprab 7417 df-mpo 7418 df-of 7674 df-om 7860 df-1st 7979 df-2nd 7980 df-frecs 8270 df-wrecs 8301 df-recs 8375 df-rdg 8414 df-1o 8470 df-oadd 8474 df-er 8707 df-map 8826 df-pm 8827 df-en 8944 df-dom 8945 df-sdom 8946 df-fin 8947 df-sup 9441 df-inf 9442 df-oi 9509 df-dju 9900 df-card 9938 df-pnf 11256 df-mnf 11257 df-xr 11258 df-ltxr 11259 df-le 11260 df-sub 11452 df-neg 11453 df-div 11878 df-nn 12219 df-2 12281 df-3 12282 df-n0 12479 df-xnn0 12551 df-z 12565 df-uz 12829 df-rp 12981 df-fz 13491 df-fzo 13634 df-fl 13763 df-seq 13973 df-exp 14034 df-hash 14297 df-cj 15052 df-re 15053 df-im 15054 df-sqrt 15188 df-abs 15189 df-clim 15438 df-rlim 15439 df-sum 15639 df-0p 25421 df-ply 25936 df-idp 25937 df-coe 25938 df-dgr 25939 df-quot 26038

This theorem is referenced by: basellem5 26823

W3C validator