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 26526

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.) See also vieta 34036 for the case of polynomials over a generic ring. (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 6885	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (deg‘𝑓) = (deg‘𝐹))
3	2	eqeq2d 2776	. . . . . 6 ⊢ (𝑓 = 𝐹 → (𝑁 = (deg‘𝑓) ↔ 𝑁 = (deg‘𝐹)))
4		cnveq 5861	. . . . . . . . . 10 ⊢ (𝑓 = 𝐹 → ^◡𝑓 = ^◡𝐹)
5	4	imaeq1d 6063	. . . . . . . . 9 ⊢ (𝑓 = 𝐹 → (^◡𝑓 “ {0}) = (^◡𝐹 “ {0}))
6		vieta1.3	. . . . . . . . 9 ⊢ 𝑅 = (^◡𝐹 “ {0})
7	5, 6	eqtr4di 2818	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → (^◡𝑓 “ {0}) = 𝑅)
8	7	fveq2d 6889	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (♯‘(^◡𝑓 “ {0})) = (♯‘𝑅))
9		vieta1.2	. . . . . . . 8 ⊢ 𝑁 = (deg‘𝐹)
10	2, 9	eqtr4di 2818	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (deg‘𝑓) = 𝑁)
11	8, 10	eqeq12d 2781	. . . . . 6 ⊢ (𝑓 = 𝐹 → ((♯‘(^◡𝑓 “ {0})) = (deg‘𝑓) ↔ (♯‘𝑅) = 𝑁))
12	3, 11	anbi12d 644	. . . . 5 ⊢ (𝑓 = 𝐹 → ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (𝑁 = (deg‘𝐹) ∧ (♯‘𝑅) = 𝑁)))
13	9	biantrur 540	. . . . 5 ⊢ ((♯‘𝑅) = 𝑁 ↔ (𝑁 = (deg‘𝐹) ∧ (♯‘𝑅) = 𝑁))
14	12, 13	bitr4di 292	. . . 4 ⊢ (𝑓 = 𝐹 → ((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) ↔ (♯‘𝑅) = 𝑁))
15	7	sumeq1d 15777	. . . . 5 ⊢ (𝑓 = 𝐹 → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = Σ𝑥 ∈ 𝑅 𝑥)
16		fveq2 6885	. . . . . . . . 9 ⊢ (𝑓 = 𝐹 → (coeff‘𝑓) = (coeff‘𝐹))
17		vieta1.1	. . . . . . . . 9 ⊢ 𝐴 = (coeff‘𝐹)
18	16, 17	eqtr4di 2818	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → (coeff‘𝑓) = 𝐴)
19	10	oveq1d 7434	. . . . . . . 8 ⊢ (𝑓 = 𝐹 → ((deg‘𝑓) − 1) = (𝑁 − 1))
20	18, 19	fveq12d 6892	. . . . . . 7 ⊢ (𝑓 = 𝐹 → ((coeff‘𝑓)‘((deg‘𝑓) − 1)) = (𝐴‘(𝑁 − 1)))
21	18, 10	fveq12d 6892	. . . . . . 7 ⊢ (𝑓 = 𝐹 → ((coeff‘𝑓)‘(deg‘𝑓)) = (𝐴‘𝑁))
22	20, 21	oveq12d 7437	. . . . . 6 ⊢ (𝑓 = 𝐹 → (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) = ((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))
23	22	negeqd 11468	. . . . 5 ⊢ (𝑓 = 𝐹 → -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))) = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))
24	15, 23	eqeq12d 2781	. . . 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 2769	. . . . . . . 8 ⊢ (𝑦 = 1 → (𝑦 = (deg‘𝑓) ↔ 1 = (deg‘𝑓)))
28	27	anbi1d 643	. . . . . . 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 3190	. . . . 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 2769	. . . . . . . 8 ⊢ (𝑦 = 𝑑 → (𝑦 = (deg‘𝑓) ↔ 𝑑 = (deg‘𝑓)))
32	31	anbi1d 643	. . . . . . 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 3190	. . . . 5 ⊢ (𝑦 = 𝑑 → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
35		eqeq1 2769	. . . . . . . 8 ⊢ (𝑦 = (𝑑 + 1) → (𝑦 = (deg‘𝑓) ↔ (𝑑 + 1) = (deg‘𝑓)))
36	35	anbi1d 643	. . . . . . 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 3190	. . . . 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 2769	. . . . . . . 8 ⊢ (𝑦 = 𝑁 → (𝑦 = (deg‘𝑓) ↔ 𝑁 = (deg‘𝑓)))
40	39	anbi1d 643	. . . . . . 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 3190	. . . . 5 ⊢ (𝑦 = 𝑁 → (∀𝑓 ∈ (Poly‘ℂ)((𝑦 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))))
43		eqid 2765	. . . . . . . . . . . . . . 15 ⊢ (coeff‘𝑓) = (coeff‘𝑓)
44	43	coef3 26442	. . . . . . . . . . . . . 14 ⊢ (𝑓 ∈ (Poly‘ℂ) → (coeff‘𝑓):ℕ₀⟶ℂ)
45	44	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (coeff‘𝑓):ℕ₀⟶ℂ)
46		0nn0 12536	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℕ₀
47		ffvelcdm 7080	. . . . . . . . . . . . 13 ⊢ (((coeff‘𝑓):ℕ₀⟶ℂ ∧ 0 ∈ ℕ₀) → ((coeff‘𝑓)‘0) ∈ ℂ)
48	45, 46, 47	sylancl 598	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘0) ∈ ℂ)
49		1nn0 12537	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℕ₀
50		ffvelcdm 7080	. . . . . . . . . . . . 13 ⊢ (((coeff‘𝑓):ℕ₀⟶ℂ ∧ 1 ∈ ℕ₀) → ((coeff‘𝑓)‘1) ∈ ℂ)
51	45, 49, 50	sylancl 598	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) ∈ ℂ)
52		simpr 490	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 1 = (deg‘𝑓))
53	52	fveq2d 6889	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) = ((coeff‘𝑓)‘(deg‘𝑓)))
54		ax-1ne0 11186	. . . . . . . . . . . . . . . . 17 ⊢ 1 ≠ 0
55	54	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 1 ≠ 0)
56	52, 55	eqnetrrd 3028	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (deg‘𝑓) ≠ 0)
57		fveq2 6885	. . . . . . . . . . . . . . . . 17 ⊢ (𝑓 = 0_𝑝 → (deg‘𝑓) = (deg‘0_𝑝))
58		dgr0 26472	. . . . . . . . . . . . . . . . 17 ⊢ (deg‘0_𝑝) = 0
59	57, 58	eqtrdi 2816	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 = 0_𝑝 → (deg‘𝑓) = 0)
60	59	necon3i 2992	. . . . . . . . . . . . . . 15 ⊢ ((deg‘𝑓) ≠ 0 → 𝑓 ≠ 0_𝑝)
61	56, 60	syl 18	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 𝑓 ≠ 0_𝑝)
62		eqid 2765	. . . . . . . . . . . . . . . . 17 ⊢ (deg‘𝑓) = (deg‘𝑓)
63	62, 43	dgreq0 26475	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 ∈ (Poly‘ℂ) → (𝑓 = 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) = 0))
64	63	necon3bid 3004	. . . . . . . . . . . . . . 15 ⊢ (𝑓 ∈ (Poly‘ℂ) → (𝑓 ≠ 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0))
65	64	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓 ≠ 0_𝑝 ↔ ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0))
66	61, 65	mpbid 235	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘(deg‘𝑓)) ≠ 0)
67	53, 66	eqnetrd 3027	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘1) ≠ 0)
68	48, 51, 67	divcld 12008	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ)
69	68	negcld 11573	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ)
70		id 23	. . . . . . . . . . 11 ⊢ (𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) → 𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
71	70	sumsn 15822	. . . . . . . . . 10 ⊢ ((-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
72	69, 69, 71	syl2anc 596	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
73	72	adantrr 730	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
74		eqid 2765	. . . . . . . . . . . . . 14 ⊢ (^◡𝑓 “ {0}) = (^◡𝑓 “ {0})
75	74	fta1 26522	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 𝑓 ≠ 0_𝑝) → ((^◡𝑓 “ {0}) ∈ Fin ∧ (♯‘(^◡𝑓 “ {0})) ≤ (deg‘𝑓)))
76	61, 75	syldan 603	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((^◡𝑓 “ {0}) ∈ Fin ∧ (♯‘(^◡𝑓 “ {0})) ≤ (deg‘𝑓)))
77	76	simpld 500	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (^◡𝑓 “ {0}) ∈ Fin)
78	77	adantrr 730	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (^◡𝑓 “ {0}) ∈ Fin)
79	43, 62	coeid2 26449	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
80	69, 79	syldan 603	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
81	52	oveq2d 7435	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (0...1) = (0...(deg‘𝑓)))
82	81	sumeq1d 15777	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = Σ𝑘 ∈ (0...(deg‘𝑓))(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)))
83		nn0uz 12918	. . . . . . . . . . . . . . . 16 ⊢ ℕ₀ = (ℤ_≥‘0)
84		1e0p1 12776	. . . . . . . . . . . . . . . 16 ⊢ 1 = (0 + 1)
85		fveq2 6885	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 1 → ((coeff‘𝑓)‘𝑘) = ((coeff‘𝑓)‘1))
86		oveq2 7427	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 1 → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) = (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))
87	85, 86	oveq12d 7437	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 1 → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)))
88	45	ffvelcdmda 7083	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → ((coeff‘𝑓)‘𝑘) ∈ ℂ)
89		expcl 14135	. . . . . . . . . . . . . . . . . 18 ⊢ ((-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ 𝑘 ∈ ℕ₀) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) ∈ ℂ)
90	69, 89	sylan 592	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) ∈ ℂ)
91	88, 90	mulcld 11246	. . . . . . . . . . . . . . . 16 ⊢ (((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) ∧ 𝑘 ∈ ℕ₀) → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) ∈ ℂ)
92		0z 12619	. . . . . . . . . . . . . . . . . . 19 ⊢ 0 ∈ ℤ
93	69	exp0d 14196	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0) = 1)
94	93	oveq2d 7435	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) = (((coeff‘𝑓)‘0) · 1))
95	48	mulridd 11243	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · 1) = ((coeff‘𝑓)‘0))
96	94, 95	eqtrd 2800	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) = ((coeff‘𝑓)‘0))
97	96, 48	eqeltrd 2865	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)) ∈ ℂ)
98		fveq2 6885	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → ((coeff‘𝑓)‘𝑘) = ((coeff‘𝑓)‘0))
99		oveq2 7427	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = 0 → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘) = (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0))
100	98, 99	oveq12d 7437	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = 0 → (((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)))
101	100	fsum1 15823	. . . . . . . . . . . . . . . . . . 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 599	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = (((coeff‘𝑓)‘0) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑0)))
103	102, 96	eqtrd 2800	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = ((coeff‘𝑓)‘0))
104	103, 46	jctil 529	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (0 ∈ ℕ₀ ∧ Σ𝑘 ∈ (0...0)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = ((coeff‘𝑓)‘0)))
105	69	exp1d 14197	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1) = -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)))
106	105	oveq2d 7435	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)) = (((coeff‘𝑓)‘1) · -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))))
107	51, 68	mulneg2d 11685	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = -(((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))))
108	48, 51, 67	divcan2d 12010	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = ((coeff‘𝑓)‘0))
109	108	negeqd 11468	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘1) · (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = -((coeff‘𝑓)‘0))
110	106, 107, 109	3eqtrd 2804	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1)) = -((coeff‘𝑓)‘0))
111	110	oveq2d 7435	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))) = (((coeff‘𝑓)‘0) + -((coeff‘𝑓)‘0)))
112	48	negidd 11576	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + -((coeff‘𝑓)‘0)) = 0)
113	111, 112	eqtrd 2800	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) + (((coeff‘𝑓)‘1) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑1))) = 0)
114	83, 84, 87, 91, 104, 113	fsump1i 15845	. . . . . . . . . . . . . . 15 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (1 ∈ ℕ₀ ∧ Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = 0))
115	114	simprd 501	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → Σ𝑘 ∈ (0...1)(((coeff‘𝑓)‘𝑘) · (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))↑𝑘)) = 0)
116	80, 82, 115	3eqtr2d 2806	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = 0)
117		plyf 26408	. . . . . . . . . . . . . . . 16 ⊢ (𝑓 ∈ (Poly‘ℂ) → 𝑓:ℂ⟶ℂ)
118	117	ffnd 6710	. . . . . . . . . . . . . . 15 ⊢ (𝑓 ∈ (Poly‘ℂ) → 𝑓 Fn ℂ)
119	118	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 𝑓 Fn ℂ)
120		fniniseg 7059	. . . . . . . . . . . . . 14 ⊢ (𝑓 Fn ℂ → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ (^◡𝑓 “ {0}) ↔ (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = 0)))
121	119, 120	syl 18	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ (^◡𝑓 “ {0}) ↔ (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ ∧ (𝑓‘-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))) = 0)))
122	69, 116, 121	mpbir2and 726	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ (^◡𝑓 “ {0}))
123	122	snssd 4754	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}))
124	123	adantrr 730	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}))
125		hashsng 14425	. . . . . . . . . . . . . . 15 ⊢ (-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) ∈ ℂ → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = 1)
126	69, 125	syl 18	. . . . . . . . . . . . . 14 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = 1)
127	126, 52	eqtrd 2800	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (deg‘𝑓))
128	127	adantrr 730	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (deg‘𝑓))
129		simprr 785	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))
130	128, 129	eqtr4d 2803	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → (♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})))
131		snfi 9047	. . . . . . . . . . . . 13 ⊢ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ∈ Fin
132		hashen 14403	. . . . . . . . . . . . 13 ⊢ (({-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ∈ Fin ∧ (^◡𝑓 “ {0}) ∈ Fin) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
133	131, 77, 132	sylancr 599	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((♯‘{-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}) = (♯‘(^◡𝑓 “ {0})) ↔ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})))
134	133	adantrr 730	. . . . . . . . . . 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 9230	. . . . . . . . . 10 ⊢ (((^◡𝑓 “ {0}) ∈ Fin ∧ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ⊆ (^◡𝑓 “ {0}) ∧ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} ≈ (^◡𝑓 “ {0})) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} = (^◡𝑓 “ {0}))
137	78, 124, 135, 136	syl3anc 1398	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))} = (^◡𝑓 “ {0}))
138	137	sumeq1d 15777	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ {-(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1))}𝑥 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥)
139		1m1e0 12330	. . . . . . . . . . . . 13 ⊢ (1 − 1) = 0
140	52	oveq1d 7434	. . . . . . . . . . . . 13 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (1 − 1) = ((deg‘𝑓) − 1))
141	139, 140	eqtr3id 2814	. . . . . . . . . . . 12 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → 0 = ((deg‘𝑓) − 1))
142	141	fveq2d 6889	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → ((coeff‘𝑓)‘0) = ((coeff‘𝑓)‘((deg‘𝑓) − 1)))
143	142, 53	oveq12d 7437	. . . . . . . . . 10 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → (((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
144	143	negeqd 11468	. . . . . . . . 9 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ 1 = (deg‘𝑓)) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
145	144	adantrr 730	. . . . . . . 8 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → -(((coeff‘𝑓)‘0) / ((coeff‘𝑓)‘1)) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
146	73, 138, 145	3eqtr3d 2808	. . . . . . 7 ⊢ ((𝑓 ∈ (Poly‘ℂ) ∧ (1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
147	146	ex 418	. . . . . 6 ⊢ (𝑓 ∈ (Poly‘ℂ) → ((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
148	147	rgen 3083	. . . . 5 ⊢ ∀𝑓 ∈ (Poly‘ℂ)((1 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
149		id 23	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑥 → 𝑦 = 𝑥)
150	149	cbvsumv 15773	. . . . . . . . . . 11 ⊢ Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥
151	150	eqeq1i 2770	. . . . . . . . . 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 3113	. . . . . . . 8 ⊢ (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ↔ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
154		eqid 2765	. . . . . . . . . 10 ⊢ (coeff‘𝑔) = (coeff‘𝑔)
155		eqid 2765	. . . . . . . . . 10 ⊢ (deg‘𝑔) = (deg‘𝑔)
156		eqid 2765	. . . . . . . . . 10 ⊢ (^◡𝑔 “ {0}) = (^◡𝑔 “ {0})
157		simp1r 1217	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → 𝑔 ∈ (Poly‘ℂ))
158		simp3r 1221	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))
159		simp1l 1216	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → 𝑑 ∈ ℕ)
160		simp3l 1220	. . . . . . . . . 10 ⊢ (((𝑑 ∈ ℕ ∧ 𝑔 ∈ (Poly‘ℂ)) ∧ ∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑦 ∈ (^◡𝑓 “ {0})𝑦 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) ∧ ((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔))) → (𝑑 + 1) = (deg‘𝑔))
161		simp2 1155	. . . . . . . . . . 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 2765	. . . . . . . . . 10 ⊢ (𝑔 quot (X_p ∘_f − (ℂ × {𝑧}))) = (𝑔 quot (X_p ∘_f − (ℂ × {𝑧})))
164	154, 155, 156, 157, 158, 159, 160, 162, 163	vieta1lem2 26525	. . . . . . . . 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 1137	. . . . . . . 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 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 3167	. . . . . 6 ⊢ (𝑑 ∈ ℕ → (∀𝑓 ∈ (Poly‘ℂ)((𝑑 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))) → ∀𝑔 ∈ (Poly‘ℂ)(((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))))))
168		fveq2 6885	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (deg‘𝑔) = (deg‘𝑓))
169	168	eqeq2d 2776	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → ((𝑑 + 1) = (deg‘𝑔) ↔ (𝑑 + 1) = (deg‘𝑓)))
170		cnveq 5861	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → ^◡𝑔 = ^◡𝑓)
171	170	imaeq1d 6063	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → (^◡𝑔 “ {0}) = (^◡𝑓 “ {0}))
172	171	fveq2d 6889	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (♯‘(^◡𝑔 “ {0})) = (♯‘(^◡𝑓 “ {0})))
173	172, 168	eqeq12d 2781	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → ((♯‘(^◡𝑔 “ {0})) = (deg‘𝑔) ↔ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)))
174	169, 173	anbi12d 644	. . . . . . . 8 ⊢ (𝑔 = 𝑓 → (((𝑑 + 1) = (deg‘𝑔) ∧ (♯‘(^◡𝑔 “ {0})) = (deg‘𝑔)) ↔ ((𝑑 + 1) = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓))))
175	171	sumeq1d 15777	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → Σ𝑥 ∈ (^◡𝑔 “ {0})𝑥 = Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥)
176		fveq2 6885	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → (coeff‘𝑔) = (coeff‘𝑓))
177	168	oveq1d 7434	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝑓 → ((deg‘𝑔) − 1) = ((deg‘𝑓) − 1))
178	176, 177	fveq12d 6892	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → ((coeff‘𝑔)‘((deg‘𝑔) − 1)) = ((coeff‘𝑓)‘((deg‘𝑓) − 1)))
179	176, 168	fveq12d 6892	. . . . . . . . . . 11 ⊢ (𝑔 = 𝑓 → ((coeff‘𝑔)‘(deg‘𝑔)) = ((coeff‘𝑓)‘(deg‘𝑓)))
180	178, 179	oveq12d 7437	. . . . . . . . . 10 ⊢ (𝑔 = 𝑓 → (((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) = (((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
181	180	negeqd 11468	. . . . . . . . 9 ⊢ (𝑔 = 𝑓 → -(((coeff‘𝑔)‘((deg‘𝑔) − 1)) / ((coeff‘𝑔)‘(deg‘𝑔))) = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓))))
182	175, 181	eqeq12d 2781	. . . . . . . 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 3245	. . . . . 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 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 12268	. . . 4 ⊢ (𝑁 ∈ ℕ → ∀𝑓 ∈ (Poly‘ℂ)((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
187	26, 186	syl 18	. . 3 ⊢ (𝜑 → ∀𝑓 ∈ (Poly‘ℂ)((𝑁 = (deg‘𝑓) ∧ (♯‘(^◡𝑓 “ {0})) = (deg‘𝑓)) → Σ𝑥 ∈ (^◡𝑓 “ {0})𝑥 = -(((coeff‘𝑓)‘((deg‘𝑓) − 1)) / ((coeff‘𝑓)‘(deg‘𝑓)))))
188		plyssc 26410	. . . 4 ⊢ (Poly‘𝑆) ⊆ (Poly‘ℂ)
189		vieta1.4	. . . 4 ⊢ (𝜑 → 𝐹 ∈ (Poly‘𝑆))
190	188, 189	sselid 3936	. . 3 ⊢ (𝜑 → 𝐹 ∈ (Poly‘ℂ))
191	25, 187, 190	rspcdva 3584	. 2 ⊢ (𝜑 → ((♯‘𝑅) = 𝑁 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁))))
192	1, 191	mpd 16	1 ⊢ (𝜑 → Σ𝑥 ∈ 𝑅 𝑥 = -((𝐴‘(𝑁 − 1)) / (𝐴‘𝑁)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∈ wcel 2146 ≠ wne 2960 ∀wral 3081 ⊆ wss 3906 {csn 4591 class class class wbr 5111 × cxp 5661 ^◡ccnv 5662 “ cima 5666 Fn wfn 6535 ⟶wf 6536 ‘cfv 6540 (class class class)co 7419 ∘_f cof 7682 ≈ cen 8946 Fincfn 8949 ℂcc 11115 0cc0 11117 1c1 11118 + caddc 11120 · cmul 11122 ≤ cle 11261 − cmin 11458 -cneg 11459 / cdiv 11888 ℕcn 12250 ℕ₀cn0 12521 ℤcz 12608 ...cfz 13553 ↑cexp 14117 ♯chash 14386 Σcsu 15763 0_𝑝c0p 25881 Polycply 26394 X_pcidp 26395 coeffccoe 26396 degcdgr 26397 quot cquot 26504

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2148 ax-9 2156 ax-10 2179 ax-11 2195 ax-12 2216 ax-ext 2737 ax-rep 5240 ax-sep 5259 ax-nul 5271 ax-pow 5338 ax-pr 5406 ax-un 7742 ax-inf2 9617 ax-cnex 11173 ax-resscn 11174 ax-1cn 11175 ax-icn 11176 ax-addcl 11177 ax-addrcl 11178 ax-mulcl 11179 ax-mulrcl 11180 ax-mulcom 11181 ax-addass 11182 ax-mulass 11183 ax-distr 11184 ax-i2m1 11185 ax-1ne0 11186 ax-1rid 11187 ax-rnegex 11188 ax-rrecex 11189 ax-cnre 11190 ax-pre-lttri 11191 ax-pre-lttrn 11192 ax-pre-ltadd 11193 ax-pre-mulgt0 11194 ax-pre-sup 11195

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2569 df-eu 2599 df-clab 2744 df-cleq 2757 df-clel 2840 df-nfc 2914 df-ne 2961 df-nel 3067 df-ral 3082 df-rex 3092 df-rmo 3371 df-reu 3372 df-rab 3419 df-v 3459 df-sbc 3747 df-csb 3855 df-dif 3909 df-un 3911 df-in 3913 df-ss 3923 df-pss 3926 df-nul 4287 df-if 4490 df-pw 4566 df-sn 4592 df-pr 4594 df-op 4598 df-uni 4875 df-int 4915 df-iun 4960 df-br 5112 df-opab 5176 df-mpt 5195 df-tr 5221 df-id 5558 df-eprel 5563 df-po 5571 df-so 5572 df-fr 5616 df-se 5617 df-we 5618 df-xp 5669 df-rel 5670 df-cnv 5671 df-co 5672 df-dm 5673 df-rn 5674 df-res 5675 df-ima 5676 df-pred 6306 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6496 df-fun 6542 df-fn 6543 df-f 6544 df-f1 6545 df-fo 6546 df-f1o 6547 df-fv 6548 df-isom 6549 df-riota 7376 df-ov 7422 df-oprab 7423 df-mpo 7424 df-of 7684 df-om 7869 df-1st 7992 df-2nd 7993 df-frecs 8284 df-wrecs 8315 df-recs 8364 df-rdg 8403 df-1o 8459 df-oadd 8463 df-er 8700 df-map 8832 df-pm 8833 df-en 8950 df-dom 8951 df-sdom 8952 df-fin 8953 df-sup 9409 df-inf 9410 df-oi 9479 df-dju 9903 df-card 9941 df-pnf 11262 df-mnf 11263 df-xr 11264 df-ltxr 11265 df-le 11266 df-sub 11460 df-neg 11461 df-div 11889 df-nn 12251 df-2 12320 df-3 12321 df-n0 12522 df-xnn0 12595 df-z 12609 df-uz 12881 df-rp 13035 df-fz 13554 df-fzo 13702 df-fl 13845 df-seq 14058 df-exp 14118 df-hash 14387 df-cj 15176 df-re 15177 df-im 15178 df-sqrt 15312 df-abs 15313 df-clim 15565 df-rlim 15566 df-sum 15764 df-0p 25882 df-ply 26398 df-idp 26399 df-coe 26400 df-dgr 26401 df-quot 26505

This theorem is used by: basellem5 27302

W3C validator