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 24900

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 6669	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (deg‘𝑓) = (deg‘𝐹))
3	2	eqeq2d 2832	. . . . . 6 ⊢ (𝑓 = 𝐹 → (𝑁 = (deg‘𝑓) ↔ 𝑁 = (deg‘𝐹)))
4		cnveq 5743	. . . . . . . . . 10 ⊢ (𝑓 = 𝐹 → ^◡𝑓 = ^◡𝐹)
5	4	imaeq1d 5927	. . . . . . . . 9 ⊢ (𝑓 = 𝐹 → (^◡𝑓 “ {0}) = (^◡𝐹 “ {0}))
6		vieta1.3	. . . . . . . . 9 ⊢ 𝑅 = (^◡𝐹 “ {0})
7	5, 6	syl6eqr 2874	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → (^◡𝑓 “ {0}) = 𝑅)
8	7	fveq2d 6673	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (♯‘(^◡𝑓 “ {0})) = (♯‘𝑅))
9		vieta1.2	. . . . . . . 8 ⊢ 𝑁 = (deg‘𝐹)
10	2, 9	syl6eqr 2874	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (deg‘𝑓) = 𝑁)
11	8, 10	eqeq12d 2837	. . . . . 6 ⊢ (𝑓 = 𝐹 → ((♯‘(^◡𝑓 “ {0})) = (deg‘𝑓) ↔ (♯‘𝑅) = 𝑁))
12	3, 11	anbi12d 632	. . . . 5 ⊢ (𝑓 = 𝐹 → ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑁 = (deg‘𝐹) ∧ (♯‘𝑅) = 𝑁)))
13	9	biantrur 533	. . . . 5 ⊢ ((♯‘𝑅) = 𝑁 ↔ (𝑁 = (deg‘𝐹) ∧ (♯‘𝑅) = 𝑁))
14	12, 13	syl6bbr 291	. . . 4 ⊢ (𝑓 = 𝐹 → ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (♯‘𝑅) = 𝑁))
15	7	sumeq1d 15057	. . . . 5 ⊢ (𝑓 = 𝐹 → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = Σ𝑥 ∈ 𝑅 𝑥)
16		fveq2 6669	. . . . . . . . 9 ⊢ (𝑓 = 𝐹 → (coeff‘𝑓) = (coeff‘𝐹))
17		vieta1.1	. . . . . . . . 9 ⊢ 𝐴 = (coeff‘𝐹)
18	16, 17	syl6eqr 2874	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → (coeff‘𝑓) = 𝐴)
19	10	oveq1d 7170	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → ((deg‘𝑓) − 1) = (𝑁 − 1))
20	18, 19	fveq12d 6676	. . . . . . 7 ⊢ (𝑓 = 𝐹 → ((coeff‘𝑓)‘((deg‘𝑓) − 1)) = (𝐴‘(𝑁 − 1)))
21	18, 10	fveq12d 6676	. . . . . . 7 ⊢ (𝑓 = 𝐹 → ((coeff‘𝑓)‘(deg‘𝑓)) = (𝐴‘𝑁))
22	20, 21	oveq12d 7173	. . . . . 6 ⊢ (𝑓 = 𝐹 → (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) = ((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))
23	22	negeqd 10879	. . . . 5 ⊢ (𝑓 = 𝐹 → -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))
24	15, 23	eqeq12d 2837	. . . 4 ⊢ (𝑓 = 𝐹 → (Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) ↔ Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁))))
25	14, 24	imbi12d 347	. . 3 ⊢ (𝑓 = 𝐹 → (((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((♯‘𝑅) = 𝑁 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))))
26		vieta1.6	. . . 4 ⊢ (𝜑 → 𝑁 ∈ ℕ)
27		eqeq1 2825	. . . . . . . 8 ⊢ (𝑦 = 1 → (𝑦 = (deg‘𝑓) ↔ 1 = (deg‘𝑓)))
28	27	anbi1d 631	. . . . . . 7 ⊢ (𝑦 = 1 → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
29	28	imbi1d 344	. . . . . 6 ⊢ (𝑦 = 1 → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
30	29	ralbidv 3197	. . . . 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 2825	. . . . . . . 8 ⊢ (𝑦 = 𝑑 → (𝑦 = (deg‘𝑓) ↔ 𝑑 = (deg‘𝑓)))
32	31	anbi1d 631	. . . . . . 7 ⊢ (𝑦 = 𝑑 → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
33	32	imbi1d 344	. . . . . 6 ⊢ (𝑦 = 𝑑 → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
34	33	ralbidv 3197	. . . . 5 ⊢ (𝑦 = 𝑑 → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
35		eqeq1 2825	. . . . . . . 8 ⊢ (𝑦 = (𝑑 + 1) → (𝑦 = (deg‘𝑓) ↔ (𝑑 + 1) = (deg‘𝑓)))
36	35	anbi1d 631	. . . . . . 7 ⊢ (𝑦 = (𝑑 + 1) → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ ((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
37	36	imbi1d 344	. . . . . 6 ⊢ (𝑦 = (𝑑 + 1) → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ (((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
38	37	ralbidv 3197	. . . . 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 2825	. . . . . . . 8 ⊢ (𝑦 = 𝑁 → (𝑦 = (deg‘𝑓) ↔ 𝑁 = (deg‘𝑓)))
40	39	anbi1d 631	. . . . . . 7 ⊢ (𝑦 = 𝑁 → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
41	40	imbi1d 344	. . . . . 6 ⊢ (𝑦 = 𝑁 → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
42	41	ralbidv 3197	. . . . 5 ⊢ (𝑦 = 𝑁 → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
43		eqid 2821	. . . . . . . . . . . . . . 15 ⊢ (coeff‘𝑓) = (coeff‘𝑓)
44	43	coef3 24821	. . . . . . . . . . . . . 14 ⊢ (𝑓 ∈ (Poly‘ℂ) → (coeff‘𝑓):ℕ₀⟶ℂ)
45	44	adantr 483	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (coeff‘𝑓):ℕ₀⟶ℂ)
46		0nn0 11911	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℕ₀
47		ffvelrn 6848	. . . . . . . . . . . . 13 ⊢ (((coeff‘𝑓):ℕ₀⟶ℂ ∧ 0 ∈ ℕ₀) → ((coeff‘𝑓)‘0) ∈ ℂ)
48	45, 46, 47	sylancl 588	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘0) ∈ ℂ)
49		1nn0 11912	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℕ₀
50		ffvelrn 6848	. . . . . . . . . . . . 13 ⊢ (((coeff‘𝑓):ℕ₀⟶ℂ ∧ 1 ∈ ℕ₀) → ((coeff‘𝑓)‘1) ∈ ℂ)
51	45, 49, 50	sylancl 588	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) ∈ ℂ)
52		simpr 487	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 1 = (deg‘𝑓))
53	52	fveq2d 6673	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) = ((coeff‘𝑓)‘(deg‘𝑓)))
54		ax-1ne0 10605	. . . . . . . . . . . . . . . . 17 ⊢ 1 ≠ 0
55	54	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 1 ≠ 0)
56	52, 55	eqnetrrd 3084	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (deg‘𝑓) ≠ 0)
57		fveq2 6669	. . . . . . . . . . . . . . . . 17 ⊢ (𝑓 = 0_𝑝 → (deg‘𝑓) = (deg‘0_𝑝))
58		dgr0 24851	. . . . . . . . . . . . . . . . 17 ⊢ (deg‘0_𝑝) = 0
59	57, 58	syl6eq 2872	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 = 0_𝑝 → (deg‘𝑓) = 0)
60	59	necon3i 3048	. . . . . . . . . . . . . . 15 ⊢ ((deg‘𝑓) ≠ 0 → 𝑓 ≠ 0_𝑝)
61	56, 60	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 𝑓 ≠ 0_𝑝)
62		eqid 2821	. . . . . . . . . . . . . . . . 17 ⊢ (deg‘𝑓) = (deg‘𝑓)
63	62, 43	dgreq0 24854	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 ∈ (Poly‘ℂ) → (𝑓 = 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) = 0))
64	63	necon3bid 3060	. . . . . . . . . . . . . . 15 ⊢ (𝑓 ∈ (Poly‘ℂ) → (𝑓 ≠ 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0))
65	64	adantr 483	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓 ≠ 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0))
66	61, 65	mpbid 234	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0)
67	53, 66	eqnetrd 3083	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) ≠ 0)
68	48, 51, 67	divcld 11415	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ)
69	68	negcld 10983	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ)
70		id 22	. . . . . . . . . . 11 ⊢ (𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) → 𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
71	70	sumsn 15100	. . . . . . . . . 10 ⊢ ((-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
72	69, 69, 71	syl2anc 586	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
73	72	adantrr 715	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
74		eqid 2821	. . . . . . . . . . . . . 14 ⊢ (^◡𝑓 “ {0}) = (^◡𝑓 “ {0})
75	74	fta1 24896	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 𝑓 ≠ 0_𝑝) → ((^◡𝑓 “ {0}) ∈ Fin ∧ (♯‘(^◡𝑓 “ {0})) ≤ (deg‘𝑓)))
76	61, 75	syldan 593	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((^◡𝑓 “ {0}) ∈ Fin ∧ (♯‘(^◡𝑓 “ {0})) ≤ (deg‘𝑓)))
77	76	simpld 497	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (^◡𝑓 “ {0}) ∈ Fin)
78	77	adantrr 715	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (^◡𝑓 “ {0}) ∈ Fin)
79	43, 62	coeid2 24828	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
80	69, 79	syldan 593	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
81	52	oveq2d 7171	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (0...1) = (0...(deg‘𝑓)))
82	81	sumeq1d 15057	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
83		nn0uz 12279	. . . . . . . . . . . . . . . 16 ⊢ ℕ₀ = (ℤ_≥‘0)
84		1e0p1 12139	. . . . . . . . . . . . . . . 16 ⊢ 1 = (0 + 1)
85		fveq2 6669	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 1 → ((coeff‘𝑓)‘𝑘) = ((coeff‘𝑓)‘1))
86		oveq2 7163	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 1 → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) = (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))
87	85, 86	oveq12d 7173	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 1 → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)))
88	45	ffvelrnda 6850	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → ((coeff‘𝑓)‘𝑘) ∈ ℂ)
89		expcl 13446	. . . . . . . . . . . . . . . . . 18 ⊢ ((-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) ∈ ℂ)
90	69, 89	sylan 582	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) ∈ ℂ)
91	88, 90	mulcld 10660	. . . . . . . . . . . . . . . 16 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) ∈ ℂ)
92		0z 11991	. . . . . . . . . . . . . . . . . . 19 ⊢ 0 ∈ ℤ
93	69	exp0d 13503	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0) = 1)
94	93	oveq2d 7171	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) = (((coeff‘𝑓)‘0) · 1))
95	48	mulid1d 10657	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · 1) = ((coeff‘𝑓)‘0))
96	94, 95	eqtrd 2856	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) = ((coeff‘𝑓)‘0))
97	96, 48	eqeltrd 2913	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) ∈ ℂ)
98		fveq2 6669	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → ((coeff‘𝑓)‘𝑘) = ((coeff‘𝑓)‘0))
99		oveq2 7163	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) = (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0))
100	98, 99	oveq12d 7173	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = 0 → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)))
101	100	fsum1 15101	. . . . . . . . . . . . . . . . . . 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 589	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)))
103	102, 96	eqtrd 2856	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = ((coeff‘𝑓)‘0))
104	103, 46	jctil 522	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (0 ∈ ℕ₀ ∧ Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = ((coeff‘𝑓)‘0)))
105	69	exp1d 13504	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1) = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
106	105	oveq2d 7171	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)) = (((coeff‘𝑓)‘1) · -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))))
107	51, 68	mulneg2d 11093	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = -(((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))))
108	48, 51, 67	divcan2d 11417	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = ((coeff‘𝑓)‘0))
109	108	negeqd 10879	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = -((coeff‘𝑓)‘0))
110	106, 107, 109	3eqtrd 2860	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)) = -((coeff‘𝑓)‘0))
111	110	oveq2d 7171	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))) = (((coeff‘𝑓)‘0) + -((coeff‘𝑓)‘0)))
112	48	negidd 10986	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + -((coeff‘𝑓)‘0)) = 0)
113	111, 112	eqtrd 2856	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))) = 0)
114	83, 84, 87, 91, 104, 113	fsump1i 15123	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (1 ∈ ℕ₀ ∧ Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = 0))
115	114	simprd 498	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = 0)
116	80, 82, 115	3eqtr2d 2862	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = 0)
117		plyf 24787	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 ∈ (Poly‘ℂ) → 𝑓:ℂ⟶ℂ)
118	117	ffnd 6514	. . . . . . . . . . . . . . 15 ⊢ (𝑓 ∈ (Poly‘ℂ) → 𝑓 Fn ℂ)
119	118	adantr 483	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 𝑓 Fn ℂ)
120		fniniseg 6829	. . . . . . . . . . . . . 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 711	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ (^◡𝑓 “ {0}))
123	122	snssd 4741	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}))
124	123	adantrr 715	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}))
125		hashsng 13729	. . . . . . . . . . . . . . 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 2856	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (deg‘𝑓))
128	127	adantrr 715	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (deg‘𝑓))
129		simprr 771	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))
130	128, 129	eqtr4d 2859	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})))
131		snfi 8593	. . . . . . . . . . . . 13 ⊢ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ∈ Fin
132		hashen 13706	. . . . . . . . . . . . 13 ⊢ (({-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ∈ Fin ∧ (^◡𝑓 “ {0}) ∈ Fin) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
133	131, 77, 132	sylancr 589	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
134	133	adantrr 715	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
135	130, 134	mpbid 234	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0}))
136		fisseneq 8728	. . . . . . . . . 10 ⊢ (((^◡𝑓 “ {0}) ∈ Fin ∧ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}) ∧ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} = (^◡𝑓 “ {0}))
137	78, 124, 135, 136	syl3anc 1367	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} = (^◡𝑓 “ {0}))
138	137	sumeq1d 15057	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥)
139		1m1e0 11708	. . . . . . . . . . . . 13 ⊢ (1 − 1) = 0
140	52	oveq1d 7170	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (1 − 1) = ((deg‘𝑓) − 1))
141	139, 140	syl5eqr 2870	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 0 = ((deg‘𝑓) − 1))
142	141	fveq2d 6673	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘0) = ((coeff‘𝑓)‘((deg‘𝑓) − 1)))
143	142, 53	oveq12d 7173	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
144	143	negeqd 10879	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
145	144	adantrr 715	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
146	73, 138, 145	3eqtr3d 2864	. . . . . . 7 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
147	146	ex 415	. . . . . 6 ⊢ (𝑓 ∈ (Poly‘ℂ) → ((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
148	147	rgen 3148	. . . . 5 ⊢ ∀𝑓 ∈ (Poly‘ℂ)((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
149		id 22	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑥 → 𝑦 = 𝑥)
150	149	cbvsumv 15052	. . . . . . . . . . 11 ⊢ Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥
151	150	eqeq1i 2826	. . . . . . . . . 10 ⊢ (Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) ↔ Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
152	151	imbi2i 338	. . . . . . . . 9 ⊢ (((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
153	152	ralbii 3165	. . . . . . . 8 ⊢ (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
154		eqid 2821	. . . . . . . . . 10 ⊢ (coeff‘𝑔) = (coeff‘𝑔)
155		eqid 2821	. . . . . . . . . 10 ⊢ (deg‘𝑔) = (deg‘𝑔)
156		eqid 2821	. . . . . . . . . 10 ⊢ (^◡𝑔 “ {0}) = (^◡𝑔 “ {0})
157		simp1r 1194	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → 𝑔 ∈ (Poly‘ℂ))
158		simp3r 1198	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))
159		simp1l 1193	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → 𝑑 ∈ ℕ)
160		simp3l 1197	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → (𝑑 + 1) = (deg‘𝑔))
161		simp2 1133	. . . . . . . . . . 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 220	. . . . . . . . . 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 2821	. . . . . . . . . 10 ⊢ (𝑔 quot (X_p ∘_f − (ℂ × {𝑧}))) = (𝑔 quot (X_p ∘_f − (ℂ × {𝑧})))
164	154, 155, 156, 157, 158, 159, 160, 162, 163	vieta1lem2 24899	. . . . . . . . 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 1115	. . . . . . . 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	syl5bir 245	. . . . . . 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 3189	. . . . . 6 ⊢ (𝑑 ∈ ℕ → (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) → ∀𝑔 ∈ (Poly‘ℂ)(((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))))))
168		fveq2 6669	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (deg‘𝑔) = (deg‘𝑓))
169	168	eqeq2d 2832	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → ((𝑑 + 1) = (deg‘𝑔) ↔ (𝑑 + 1) = (deg‘𝑓)))
170		cnveq 5743	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → ^◡𝑔 = ^◡𝑓)
171	170	imaeq1d 5927	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → (^◡𝑔 “ {0}) = (^◡𝑓 “ {0}))
172	171	fveq2d 6673	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (♯‘(^◡𝑔 “ {0})) = (♯‘(^◡𝑓 “ {0})))
173	172, 168	eqeq12d 2837	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → ((♯‘(^◡𝑔 “ {0})) = (deg‘𝑔) ↔ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)))
174	169, 173	anbi12d 632	. . . . . . . 8 ⊢ (𝑔 = 𝑓 → (((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) ↔ ((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
175	171	sumeq1d 15057	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥)
176		fveq2 6669	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → (coeff‘𝑔) = (coeff‘𝑓))
177	168	oveq1d 7170	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → ((deg‘𝑔) − 1) = ((deg‘𝑓) − 1))
178	176, 177	fveq12d 6676	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → ((coeff‘𝑔)‘((deg‘𝑔) − 1)) = ((coeff‘𝑓)‘((deg‘𝑓) − 1)))
179	176, 168	fveq12d 6676	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → ((coeff‘𝑔)‘(deg‘𝑔)) = ((coeff‘𝑓)‘(deg‘𝑓)))
180	178, 179	oveq12d 7173	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) = (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
181	180	negeqd 10879	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
182	175, 181	eqeq12d 2837	. . . . . . . 8 ⊢ (𝑔 = 𝑓 → (Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) ↔ Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
183	174, 182	imbi12d 347	. . . . . . 7 ⊢ (𝑔 = 𝑓 → ((((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔)))) ↔ (((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
184	183	cbvralvw 3449	. . . . . 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	syl6ib 253	. . . . 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 11655	. . . 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 24789	. . . 4 ⊢ (Poly‘𝑆) ⊆ (Poly‘ℂ)
189		vieta1.4	. . . 4 ⊢ (𝜑 → 𝐹 ∈ (Poly‘𝑆))
190	188, 189	sseldi 3964	. . 3 ⊢ (𝜑 → 𝐹 ∈ (Poly‘ℂ))
191	25, 187, 190	rspcdva 3624	. 2 ⊢ (𝜑 → ((♯‘𝑅) = 𝑁 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁))))
192	1, 191	mpd 15	1 ⊢ (𝜑 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 398 ∧ w3a 1083 = wceq 1533 ∈ wcel 2110 ≠ wne 3016 ∀wral 3138 ⊆ wss 3935 {csn 4566 class class class wbr 5065 × cxp 5552 ^◡ccnv 5553 “ cima 5557 Fn wfn 6349 ⟶wf 6350 ‘cfv 6354 (class class class)co 7155 ∘_f cof 7406 ≈ cen 8505 Fincfn 8508 ℂcc 10534 0cc0 10536 1c1 10537 + caddc 10539 · cmul 10541 ≤ cle 10675 − cmin 10869 -cneg 10870 / cdiv 11296 ℕcn 11637 ℕ₀cn0 11896 ℤcz 11980 ...cfz 12891 ↑cexp 13428 ♯chash 13689 Σcsu 15041 0_𝑝c0p 24269 Polycply 24773 X_pcidp 24774 coeffccoe 24775 degcdgr 24776 quot cquot 24878

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1907 ax-6 1966 ax-7 2011 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2157 ax-12 2173 ax-ext 2793 ax-rep 5189 ax-sep 5202 ax-nul 5209 ax-pow 5265 ax-pr 5329 ax-un 7460 ax-inf2 9103 ax-cnex 10592 ax-resscn 10593 ax-1cn 10594 ax-icn 10595 ax-addcl 10596 ax-addrcl 10597 ax-mulcl 10598 ax-mulrcl 10599 ax-mulcom 10600 ax-addass 10601 ax-mulass 10602 ax-distr 10603 ax-i2m1 10604 ax-1ne0 10605 ax-1rid 10606 ax-rnegex 10607 ax-rrecex 10608 ax-cnre 10609 ax-pre-lttri 10610 ax-pre-lttrn 10611 ax-pre-ltadd 10612 ax-pre-mulgt0 10613 ax-pre-sup 10614 ax-addf 10615

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1536 df-fal 1546 df-ex 1777 df-nf 1781 df-sb 2066 df-mo 2618 df-eu 2650 df-clab 2800 df-cleq 2814 df-clel 2893 df-nfc 2963 df-ne 3017 df-nel 3124 df-ral 3143 df-rex 3144 df-reu 3145 df-rmo 3146 df-rab 3147 df-v 3496 df-sbc 3772 df-csb 3883 df-dif 3938 df-un 3940 df-in 3942 df-ss 3951 df-pss 3953 df-nul 4291 df-if 4467 df-pw 4540 df-sn 4567 df-pr 4569 df-tp 4571 df-op 4573 df-uni 4838 df-int 4876 df-iun 4920 df-br 5066 df-opab 5128 df-mpt 5146 df-tr 5172 df-id 5459 df-eprel 5464 df-po 5473 df-so 5474 df-fr 5513 df-se 5514 df-we 5515 df-xp 5560 df-rel 5561 df-cnv 5562 df-co 5563 df-dm 5564 df-rn 5565 df-res 5566 df-ima 5567 df-pred 6147 df-ord 6193 df-on 6194 df-lim 6195 df-suc 6196 df-iota 6313 df-fun 6356 df-fn 6357 df-f 6358 df-f1 6359 df-fo 6360 df-f1o 6361 df-fv 6362 df-isom 6363 df-riota 7113 df-ov 7158 df-oprab 7159 df-mpo 7160 df-of 7408 df-om 7580 df-1st 7688 df-2nd 7689 df-wrecs 7946 df-recs 8007 df-rdg 8045 df-1o 8101 df-oadd 8105 df-er 8288 df-map 8407 df-pm 8408 df-en 8509 df-dom 8510 df-sdom 8511 df-fin 8512 df-sup 8905 df-inf 8906 df-oi 8973 df-dju 9329 df-card 9367 df-pnf 10676 df-mnf 10677 df-xr 10678 df-ltxr 10679 df-le 10680 df-sub 10871 df-neg 10872 df-div 11297 df-nn 11638 df-2 11699 df-3 11700 df-n0 11897 df-xnn0 11967 df-z 11981 df-uz 12243 df-rp 12389 df-fz 12892 df-fzo 13033 df-fl 13161 df-seq 13369 df-exp 13429 df-hash 13690 df-cj 14457 df-re 14458 df-im 14459 df-sqrt 14593 df-abs 14594 df-clim 14844 df-rlim 14845 df-sum 15042 df-0p 24270 df-ply 24777 df-idp 24778 df-coe 24779 df-dgr 24780 df-quot 24879

This theorem is referenced by: basellem5 25661

W3C validator