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 24908

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 6645	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (deg‘𝑓) = (deg‘𝐹))
3	2	eqeq2d 2809	. . . . . 6 ⊢ (𝑓 = 𝐹 → (𝑁 = (deg‘𝑓) ↔ 𝑁 = (deg‘𝐹)))
4		cnveq 5708	. . . . . . . . . 10 ⊢ (𝑓 = 𝐹 → ^◡𝑓 = ^◡𝐹)
5	4	imaeq1d 5895	. . . . . . . . 9 ⊢ (𝑓 = 𝐹 → (^◡𝑓 “ {0}) = (^◡𝐹 “ {0}))
6		vieta1.3	. . . . . . . . 9 ⊢ 𝑅 = (^◡𝐹 “ {0})
7	5, 6	eqtr4di 2851	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → (^◡𝑓 “ {0}) = 𝑅)
8	7	fveq2d 6649	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (♯‘(^◡𝑓 “ {0})) = (♯‘𝑅))
9		vieta1.2	. . . . . . . 8 ⊢ 𝑁 = (deg‘𝐹)
10	2, 9	eqtr4di 2851	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (deg‘𝑓) = 𝑁)
11	8, 10	eqeq12d 2814	. . . . . 6 ⊢ (𝑓 = 𝐹 → ((♯‘(^◡𝑓 “ {0})) = (deg‘𝑓) ↔ (♯‘𝑅) = 𝑁))
12	3, 11	anbi12d 633	. . . . 5 ⊢ (𝑓 = 𝐹 → ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑁 = (deg‘𝐹) ∧ (♯‘𝑅) = 𝑁)))
13	9	biantrur 534	. . . . 5 ⊢ ((♯‘𝑅) = 𝑁 ↔ (𝑁 = (deg‘𝐹) ∧ (♯‘𝑅) = 𝑁))
14	12, 13	syl6bbr 292	. . . 4 ⊢ (𝑓 = 𝐹 → ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (♯‘𝑅) = 𝑁))
15	7	sumeq1d 15050	. . . . 5 ⊢ (𝑓 = 𝐹 → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = Σ𝑥 ∈ 𝑅 𝑥)
16		fveq2 6645	. . . . . . . . 9 ⊢ (𝑓 = 𝐹 → (coeff‘𝑓) = (coeff‘𝐹))
17		vieta1.1	. . . . . . . . 9 ⊢ 𝐴 = (coeff‘𝐹)
18	16, 17	eqtr4di 2851	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → (coeff‘𝑓) = 𝐴)
19	10	oveq1d 7150	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → ((deg‘𝑓) − 1) = (𝑁 − 1))
20	18, 19	fveq12d 6652	. . . . . . 7 ⊢ (𝑓 = 𝐹 → ((coeff‘𝑓)‘((deg‘𝑓) − 1)) = (𝐴‘(𝑁 − 1)))
21	18, 10	fveq12d 6652	. . . . . . 7 ⊢ (𝑓 = 𝐹 → ((coeff‘𝑓)‘(deg‘𝑓)) = (𝐴‘𝑁))
22	20, 21	oveq12d 7153	. . . . . 6 ⊢ (𝑓 = 𝐹 → (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) = ((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))
23	22	negeqd 10869	. . . . 5 ⊢ (𝑓 = 𝐹 → -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))
24	15, 23	eqeq12d 2814	. . . 4 ⊢ (𝑓 = 𝐹 → (Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) ↔ Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁))))
25	14, 24	imbi12d 348	. . 3 ⊢ (𝑓 = 𝐹 → (((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((♯‘𝑅) = 𝑁 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))))
26		vieta1.6	. . . 4 ⊢ (𝜑 → 𝑁 ∈ ℕ)
27		eqeq1 2802	. . . . . . . 8 ⊢ (𝑦 = 1 → (𝑦 = (deg‘𝑓) ↔ 1 = (deg‘𝑓)))
28	27	anbi1d 632	. . . . . . 7 ⊢ (𝑦 = 1 → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
29	28	imbi1d 345	. . . . . 6 ⊢ (𝑦 = 1 → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
30	29	ralbidv 3162	. . . . 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 2802	. . . . . . . 8 ⊢ (𝑦 = 𝑑 → (𝑦 = (deg‘𝑓) ↔ 𝑑 = (deg‘𝑓)))
32	31	anbi1d 632	. . . . . . 7 ⊢ (𝑦 = 𝑑 → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
33	32	imbi1d 345	. . . . . 6 ⊢ (𝑦 = 𝑑 → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
34	33	ralbidv 3162	. . . . 5 ⊢ (𝑦 = 𝑑 → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
35		eqeq1 2802	. . . . . . . 8 ⊢ (𝑦 = (𝑑 + 1) → (𝑦 = (deg‘𝑓) ↔ (𝑑 + 1) = (deg‘𝑓)))
36	35	anbi1d 632	. . . . . . 7 ⊢ (𝑦 = (𝑑 + 1) → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ ((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
37	36	imbi1d 345	. . . . . 6 ⊢ (𝑦 = (𝑑 + 1) → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ (((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
38	37	ralbidv 3162	. . . . 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 2802	. . . . . . . 8 ⊢ (𝑦 = 𝑁 → (𝑦 = (deg‘𝑓) ↔ 𝑁 = (deg‘𝑓)))
40	39	anbi1d 632	. . . . . . 7 ⊢ (𝑦 = 𝑁 → ((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
41	40	imbi1d 345	. . . . . 6 ⊢ (𝑦 = 𝑁 → (((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
42	41	ralbidv 3162	. . . . 5 ⊢ (𝑦 = 𝑁 → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
43		eqid 2798	. . . . . . . . . . . . . . 15 ⊢ (coeff‘𝑓) = (coeff‘𝑓)
44	43	coef3 24829	. . . . . . . . . . . . . 14 ⊢ (𝑓 ∈ (Poly‘ℂ) → (coeff‘𝑓):ℕ₀⟶ℂ)
45	44	adantr 484	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (coeff‘𝑓):ℕ₀⟶ℂ)
46		0nn0 11900	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℕ₀
47		ffvelrn 6826	. . . . . . . . . . . . 13 ⊢ (((coeff‘𝑓):ℕ₀⟶ℂ ∧ 0 ∈ ℕ₀) → ((coeff‘𝑓)‘0) ∈ ℂ)
48	45, 46, 47	sylancl 589	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘0) ∈ ℂ)
49		1nn0 11901	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℕ₀
50		ffvelrn 6826	. . . . . . . . . . . . 13 ⊢ (((coeff‘𝑓):ℕ₀⟶ℂ ∧ 1 ∈ ℕ₀) → ((coeff‘𝑓)‘1) ∈ ℂ)
51	45, 49, 50	sylancl 589	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) ∈ ℂ)
52		simpr 488	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 1 = (deg‘𝑓))
53	52	fveq2d 6649	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) = ((coeff‘𝑓)‘(deg‘𝑓)))
54		ax-1ne0 10595	. . . . . . . . . . . . . . . . 17 ⊢ 1 ≠ 0
55	54	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 1 ≠ 0)
56	52, 55	eqnetrrd 3055	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (deg‘𝑓) ≠ 0)
57		fveq2 6645	. . . . . . . . . . . . . . . . 17 ⊢ (𝑓 = 0_𝑝 → (deg‘𝑓) = (deg‘0_𝑝))
58		dgr0 24859	. . . . . . . . . . . . . . . . 17 ⊢ (deg‘0_𝑝) = 0
59	57, 58	eqtrdi 2849	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 = 0_𝑝 → (deg‘𝑓) = 0)
60	59	necon3i 3019	. . . . . . . . . . . . . . 15 ⊢ ((deg‘𝑓) ≠ 0 → 𝑓 ≠ 0_𝑝)
61	56, 60	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 𝑓 ≠ 0_𝑝)
62		eqid 2798	. . . . . . . . . . . . . . . . 17 ⊢ (deg‘𝑓) = (deg‘𝑓)
63	62, 43	dgreq0 24862	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 ∈ (Poly‘ℂ) → (𝑓 = 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) = 0))
64	63	necon3bid 3031	. . . . . . . . . . . . . . 15 ⊢ (𝑓 ∈ (Poly‘ℂ) → (𝑓 ≠ 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0))
65	64	adantr 484	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓 ≠ 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0))
66	61, 65	mpbid 235	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0)
67	53, 66	eqnetrd 3054	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) ≠ 0)
68	48, 51, 67	divcld 11405	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ)
69	68	negcld 10973	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ)
70		id 22	. . . . . . . . . . 11 ⊢ (𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) → 𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
71	70	sumsn 15093	. . . . . . . . . 10 ⊢ ((-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
72	69, 69, 71	syl2anc 587	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
73	72	adantrr 716	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
74		eqid 2798	. . . . . . . . . . . . . 14 ⊢ (^◡𝑓 “ {0}) = (^◡𝑓 “ {0})
75	74	fta1 24904	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 𝑓 ≠ 0_𝑝) → ((^◡𝑓 “ {0}) ∈ Fin ∧ (♯‘(^◡𝑓 “ {0})) ≤ (deg‘𝑓)))
76	61, 75	syldan 594	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((^◡𝑓 “ {0}) ∈ Fin ∧ (♯‘(^◡𝑓 “ {0})) ≤ (deg‘𝑓)))
77	76	simpld 498	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (^◡𝑓 “ {0}) ∈ Fin)
78	77	adantrr 716	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (^◡𝑓 “ {0}) ∈ Fin)
79	43, 62	coeid2 24836	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
80	69, 79	syldan 594	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
81	52	oveq2d 7151	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (0...1) = (0...(deg‘𝑓)))
82	81	sumeq1d 15050	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
83		nn0uz 12268	. . . . . . . . . . . . . . . 16 ⊢ ℕ₀ = (ℤ_≥‘0)
84		1e0p1 12128	. . . . . . . . . . . . . . . 16 ⊢ 1 = (0 + 1)
85		fveq2 6645	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 1 → ((coeff‘𝑓)‘𝑘) = ((coeff‘𝑓)‘1))
86		oveq2 7143	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 1 → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) = (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))
87	85, 86	oveq12d 7153	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 1 → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)))
88	45	ffvelrnda 6828	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → ((coeff‘𝑓)‘𝑘) ∈ ℂ)
89		expcl 13443	. . . . . . . . . . . . . . . . . 18 ⊢ ((-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) ∈ ℂ)
90	69, 89	sylan 583	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) ∈ ℂ)
91	88, 90	mulcld 10650	. . . . . . . . . . . . . . . 16 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) ∈ ℂ)
92		0z 11980	. . . . . . . . . . . . . . . . . . 19 ⊢ 0 ∈ ℤ
93	69	exp0d 13500	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0) = 1)
94	93	oveq2d 7151	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) = (((coeff‘𝑓)‘0) · 1))
95	48	mulid1d 10647	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · 1) = ((coeff‘𝑓)‘0))
96	94, 95	eqtrd 2833	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) = ((coeff‘𝑓)‘0))
97	96, 48	eqeltrd 2890	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) ∈ ℂ)
98		fveq2 6645	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → ((coeff‘𝑓)‘𝑘) = ((coeff‘𝑓)‘0))
99		oveq2 7143	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) = (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0))
100	98, 99	oveq12d 7153	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = 0 → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)))
101	100	fsum1 15094	. . . . . . . . . . . . . . . . . . 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 590	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)))
103	102, 96	eqtrd 2833	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = ((coeff‘𝑓)‘0))
104	103, 46	jctil 523	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (0 ∈ ℕ₀ ∧ Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = ((coeff‘𝑓)‘0)))
105	69	exp1d 13501	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1) = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
106	105	oveq2d 7151	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)) = (((coeff‘𝑓)‘1) · -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))))
107	51, 68	mulneg2d 11083	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = -(((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))))
108	48, 51, 67	divcan2d 11407	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = ((coeff‘𝑓)‘0))
109	108	negeqd 10869	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = -((coeff‘𝑓)‘0))
110	106, 107, 109	3eqtrd 2837	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)) = -((coeff‘𝑓)‘0))
111	110	oveq2d 7151	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))) = (((coeff‘𝑓)‘0) + -((coeff‘𝑓)‘0)))
112	48	negidd 10976	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + -((coeff‘𝑓)‘0)) = 0)
113	111, 112	eqtrd 2833	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))) = 0)
114	83, 84, 87, 91, 104, 113	fsump1i 15116	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (1 ∈ ℕ₀ ∧ Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = 0))
115	114	simprd 499	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = 0)
116	80, 82, 115	3eqtr2d 2839	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = 0)
117		plyf 24795	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 ∈ (Poly‘ℂ) → 𝑓:ℂ⟶ℂ)
118	117	ffnd 6488	. . . . . . . . . . . . . . 15 ⊢ (𝑓 ∈ (Poly‘ℂ) → 𝑓 Fn ℂ)
119	118	adantr 484	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 𝑓 Fn ℂ)
120		fniniseg 6807	. . . . . . . . . . . . . 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 712	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ (^◡𝑓 “ {0}))
123	122	snssd 4702	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}))
124	123	adantrr 716	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}))
125		hashsng 13726	. . . . . . . . . . . . . . 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 2833	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (deg‘𝑓))
128	127	adantrr 716	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (deg‘𝑓))
129		simprr 772	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))
130	128, 129	eqtr4d 2836	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})))
131		snfi 8577	. . . . . . . . . . . . 13 ⊢ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ∈ Fin
132		hashen 13703	. . . . . . . . . . . . 13 ⊢ (({-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ∈ Fin ∧ (^◡𝑓 “ {0}) ∈ Fin) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
133	131, 77, 132	sylancr 590	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
134	133	adantrr 716	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
135	130, 134	mpbid 235	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0}))
136		fisseneq 8713	. . . . . . . . . 10 ⊢ (((^◡𝑓 “ {0}) ∈ Fin ∧ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}) ∧ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} = (^◡𝑓 “ {0}))
137	78, 124, 135, 136	syl3anc 1368	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} = (^◡𝑓 “ {0}))
138	137	sumeq1d 15050	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥)
139		1m1e0 11697	. . . . . . . . . . . . 13 ⊢ (1 − 1) = 0
140	52	oveq1d 7150	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (1 − 1) = ((deg‘𝑓) − 1))
141	139, 140	syl5eqr 2847	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 0 = ((deg‘𝑓) − 1))
142	141	fveq2d 6649	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘0) = ((coeff‘𝑓)‘((deg‘𝑓) − 1)))
143	142, 53	oveq12d 7153	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
144	143	negeqd 10869	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
145	144	adantrr 716	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
146	73, 138, 145	3eqtr3d 2841	. . . . . . 7 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
147	146	ex 416	. . . . . 6 ⊢ (𝑓 ∈ (Poly‘ℂ) → ((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
148	147	rgen 3116	. . . . 5 ⊢ ∀𝑓 ∈ (Poly‘ℂ)((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
149		id 22	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑥 → 𝑦 = 𝑥)
150	149	cbvsumv 15045	. . . . . . . . . . 11 ⊢ Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥
151	150	eqeq1i 2803	. . . . . . . . . 10 ⊢ (Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) ↔ Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
152	151	imbi2i 339	. . . . . . . . 9 ⊢ (((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
153	152	ralbii 3133	. . . . . . . 8 ⊢ (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
154		eqid 2798	. . . . . . . . . 10 ⊢ (coeff‘𝑔) = (coeff‘𝑔)
155		eqid 2798	. . . . . . . . . 10 ⊢ (deg‘𝑔) = (deg‘𝑔)
156		eqid 2798	. . . . . . . . . 10 ⊢ (^◡𝑔 “ {0}) = (^◡𝑔 “ {0})
157		simp1r 1195	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → 𝑔 ∈ (Poly‘ℂ))
158		simp3r 1199	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))
159		simp1l 1194	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → 𝑑 ∈ ℕ)
160		simp3l 1198	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → (𝑑 + 1) = (deg‘𝑔))
161		simp2 1134	. . . . . . . . . . 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 221	. . . . . . . . . 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 2798	. . . . . . . . . 10 ⊢ (𝑔 quot (X_p ∘_f − (ℂ × {𝑧}))) = (𝑔 quot (X_p ∘_f − (ℂ × {𝑧})))
164	154, 155, 156, 157, 158, 159, 160, 162, 163	vieta1lem2 24907	. . . . . . . . 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 1116	. . . . . . . 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 246	. . . . . . 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 3154	. . . . . 6 ⊢ (𝑑 ∈ ℕ → (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) → ∀𝑔 ∈ (Poly‘ℂ)(((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))))))
168		fveq2 6645	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (deg‘𝑔) = (deg‘𝑓))
169	168	eqeq2d 2809	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → ((𝑑 + 1) = (deg‘𝑔) ↔ (𝑑 + 1) = (deg‘𝑓)))
170		cnveq 5708	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → ^◡𝑔 = ^◡𝑓)
171	170	imaeq1d 5895	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → (^◡𝑔 “ {0}) = (^◡𝑓 “ {0}))
172	171	fveq2d 6649	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (♯‘(^◡𝑔 “ {0})) = (♯‘(^◡𝑓 “ {0})))
173	172, 168	eqeq12d 2814	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → ((♯‘(^◡𝑔 “ {0})) = (deg‘𝑔) ↔ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)))
174	169, 173	anbi12d 633	. . . . . . . 8 ⊢ (𝑔 = 𝑓 → (((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) ↔ ((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
175	171	sumeq1d 15050	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥)
176		fveq2 6645	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → (coeff‘𝑔) = (coeff‘𝑓))
177	168	oveq1d 7150	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → ((deg‘𝑔) − 1) = ((deg‘𝑓) − 1))
178	176, 177	fveq12d 6652	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → ((coeff‘𝑔)‘((deg‘𝑔) − 1)) = ((coeff‘𝑓)‘((deg‘𝑓) − 1)))
179	176, 168	fveq12d 6652	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → ((coeff‘𝑔)‘(deg‘𝑔)) = ((coeff‘𝑓)‘(deg‘𝑓)))
180	178, 179	oveq12d 7153	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) = (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
181	180	negeqd 10869	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
182	175, 181	eqeq12d 2814	. . . . . . . 8 ⊢ (𝑔 = 𝑓 → (Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) ↔ Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
183	174, 182	imbi12d 348	. . . . . . 7 ⊢ (𝑔 = 𝑓 → ((((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔)))) ↔ (((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
184	183	cbvralvw 3396	. . . . . 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 254	. . . . 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 11643	. . . 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 24797	. . . 4 ⊢ (Poly‘𝑆) ⊆ (Poly‘ℂ)
189		vieta1.4	. . . 4 ⊢ (𝜑 → 𝐹 ∈ (Poly‘𝑆))
190	188, 189	sseldi 3913	. . 3 ⊢ (𝜑 → 𝐹 ∈ (Poly‘ℂ))
191	25, 187, 190	rspcdva 3573	. 2 ⊢ (𝜑 → ((♯‘𝑅) = 𝑁 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁))))
192	1, 191	mpd 15	1 ⊢ (𝜑 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 209 ∧ wa 399 ∧ w3a 1084 = wceq 1538 ∈ wcel 2111 ≠ wne 2987 ∀wral 3106 ⊆ wss 3881 {csn 4525 class class class wbr 5030 × cxp 5517 ^◡ccnv 5518 “ cima 5522 Fn wfn 6319 ⟶wf 6320 ‘cfv 6324 (class class class)co 7135 ∘_f cof 7387 ≈ cen 8489 Fincfn 8492 ℂcc 10524 0cc0 10526 1c1 10527 + caddc 10529 · cmul 10531 ≤ cle 10665 − cmin 10859 -cneg 10860 / cdiv 11286 ℕcn 11625 ℕ₀cn0 11885 ℤcz 11969 ...cfz 12885 ↑cexp 13425 ♯chash 13686 Σcsu 15034 0_𝑝c0p 24273 Polycply 24781 X_pcidp 24782 coeffccoe 24783 degcdgr 24784 quot cquot 24886

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2113 ax-9 2121 ax-10 2142 ax-11 2158 ax-12 2175 ax-ext 2770 ax-rep 5154 ax-sep 5167 ax-nul 5174 ax-pow 5231 ax-pr 5295 ax-un 7441 ax-inf2 9088 ax-cnex 10582 ax-resscn 10583 ax-1cn 10584 ax-icn 10585 ax-addcl 10586 ax-addrcl 10587 ax-mulcl 10588 ax-mulrcl 10589 ax-mulcom 10590 ax-addass 10591 ax-mulass 10592 ax-distr 10593 ax-i2m1 10594 ax-1ne0 10595 ax-1rid 10596 ax-rnegex 10597 ax-rrecex 10598 ax-cnre 10599 ax-pre-lttri 10600 ax-pre-lttrn 10601 ax-pre-ltadd 10602 ax-pre-mulgt0 10603 ax-pre-sup 10604 ax-addf 10605

This theorem depends on definitions: df-bi 210 df-an 400 df-or 845 df-3or 1085 df-3an 1086 df-tru 1541 df-fal 1551 df-ex 1782 df-nf 1786 df-sb 2070 df-mo 2598 df-eu 2629 df-clab 2777 df-cleq 2791 df-clel 2870 df-nfc 2938 df-ne 2988 df-nel 3092 df-ral 3111 df-rex 3112 df-reu 3113 df-rmo 3114 df-rab 3115 df-v 3443 df-sbc 3721 df-csb 3829 df-dif 3884 df-un 3886 df-in 3888 df-ss 3898 df-pss 3900 df-nul 4244 df-if 4426 df-pw 4499 df-sn 4526 df-pr 4528 df-tp 4530 df-op 4532 df-uni 4801 df-int 4839 df-iun 4883 df-br 5031 df-opab 5093 df-mpt 5111 df-tr 5137 df-id 5425 df-eprel 5430 df-po 5438 df-so 5439 df-fr 5478 df-se 5479 df-we 5480 df-xp 5525 df-rel 5526 df-cnv 5527 df-co 5528 df-dm 5529 df-rn 5530 df-res 5531 df-ima 5532 df-pred 6116 df-ord 6162 df-on 6163 df-lim 6164 df-suc 6165 df-iota 6283 df-fun 6326 df-fn 6327 df-f 6328 df-f1 6329 df-fo 6330 df-f1o 6331 df-fv 6332 df-isom 6333 df-riota 7093 df-ov 7138 df-oprab 7139 df-mpo 7140 df-of 7389 df-om 7561 df-1st 7671 df-2nd 7672 df-wrecs 7930 df-recs 7991 df-rdg 8029 df-1o 8085 df-oadd 8089 df-er 8272 df-map 8391 df-pm 8392 df-en 8493 df-dom 8494 df-sdom 8495 df-fin 8496 df-sup 8890 df-inf 8891 df-oi 8958 df-dju 9314 df-card 9352 df-pnf 10666 df-mnf 10667 df-xr 10668 df-ltxr 10669 df-le 10670 df-sub 10861 df-neg 10862 df-div 11287 df-nn 11626 df-2 11688 df-3 11689 df-n0 11886 df-xnn0 11956 df-z 11970 df-uz 12232 df-rp 12378 df-fz 12886 df-fzo 13029 df-fl 13157 df-seq 13365 df-exp 13426 df-hash 13687 df-cj 14450 df-re 14451 df-im 14452 df-sqrt 14586 df-abs 14587 df-clim 14837 df-rlim 14838 df-sum 15035 df-0p 24274 df-ply 24785 df-idp 24786 df-coe 24787 df-dgr 24788 df-quot 24887

This theorem is referenced by: basellem5 25670

W3C validator