quartlem1 - Metamath Proof Explorer

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

Theorem quartlem1 27033

Description: Lemma for quart 27037. (Contributed by Mario Carneiro, 6-May-2015.)

**Hypotheses**
Ref	Expression
quartlem1.p	⊢ (𝜑 → 𝑃 ∈ ℂ)
quartlem1.q	⊢ (𝜑 → 𝑄 ∈ ℂ)
quartlem1.r	⊢ (𝜑 → 𝑅 ∈ ℂ)
quartlem1.u	⊢ (𝜑 → 𝑈 = ((𝑃↑2) + (;12 · 𝑅)))
quartlem1.v	⊢ (𝜑 → 𝑉 = ((-(2 · (𝑃↑3)) − (;27 · (𝑄↑2))) + (;72 · (𝑃 · 𝑅))))

**Assertion**
Ref	Expression
quartlem1	⊢ (𝜑 → (𝑈 = (((2 · 𝑃)↑2) − (3 · ((𝑃↑2) − (4 · 𝑅)))) ∧ 𝑉 = (((2 · ((2 · 𝑃)↑3)) − (9 · ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅))))) + (;27 · -(𝑄↑2)))))

**Proof of Theorem quartlem1**
Step	Hyp	Ref	Expression
1		2cn 12322	. . . . . . . . . 10 ⊢ 2 ∈ ℂ
2		quartlem1.p	. . . . . . . . . 10 ⊢ (𝜑 → 𝑃 ∈ ℂ)
3		sqmul 14162	. . . . . . . . . 10 ⊢ ((2 ∈ ℂ ∧ 𝑃 ∈ ℂ) → ((2 · 𝑃)↑2) = ((2↑2) · (𝑃↑2)))
4	1, 2, 3	sylancr 598	. . . . . . . . 9 ⊢ (𝜑 → ((2 · 𝑃)↑2) = ((2↑2) · (𝑃↑2)))
5		sq2 14240	. . . . . . . . . 10 ⊢ (2↑2) = 4
6	5	oveq1i 7422	. . . . . . . . 9 ⊢ ((2↑2) · (𝑃↑2)) = (4 · (𝑃↑2))
7	4, 6	eqtrdi 2813	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝑃)↑2) = (4 · (𝑃↑2)))
8	7	oveq1d 7427	. . . . . . 7 ⊢ (𝜑 → (((2 · 𝑃)↑2) − (3 · (𝑃↑2))) = ((4 · (𝑃↑2)) − (3 · (𝑃↑2))))
9		4cn 12332	. . . . . . . . 9 ⊢ 4 ∈ ℂ
10	9	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 4 ∈ ℂ)
11		3cn 12328	. . . . . . . . 9 ⊢ 3 ∈ ℂ
12	11	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 3 ∈ ℂ)
13	2	sqcld 14187	. . . . . . . 8 ⊢ (𝜑 → (𝑃↑2) ∈ ℂ)
14	10, 12, 13	subdird 11677	. . . . . . 7 ⊢ (𝜑 → ((4 − 3) · (𝑃↑2)) = ((4 · (𝑃↑2)) − (3 · (𝑃↑2))))
15	8, 14	eqtr4d 2800	. . . . . 6 ⊢ (𝜑 → (((2 · 𝑃)↑2) − (3 · (𝑃↑2))) = ((4 − 3) · (𝑃↑2)))
16		ax-1cn 11164	. . . . . . . . . 10 ⊢ 1 ∈ ℂ
17		3p1e4 12391	. . . . . . . . . 10 ⊢ (3 + 1) = 4
18	9, 11, 16, 17	subaddrii 11553	. . . . . . . . 9 ⊢ (4 − 3) = 1
19	18	oveq1i 7422	. . . . . . . 8 ⊢ ((4 − 3) · (𝑃↑2)) = (1 · (𝑃↑2))
20		mullid 11213	. . . . . . . 8 ⊢ ((𝑃↑2) ∈ ℂ → (1 · (𝑃↑2)) = (𝑃↑2))
21	19, 20	eqtrid 2809	. . . . . . 7 ⊢ ((𝑃↑2) ∈ ℂ → ((4 − 3) · (𝑃↑2)) = (𝑃↑2))
22	13, 21	syl 18	. . . . . 6 ⊢ (𝜑 → ((4 − 3) · (𝑃↑2)) = (𝑃↑2))
23	15, 22	eqtr2d 2798	. . . . 5 ⊢ (𝜑 → (𝑃↑2) = (((2 · 𝑃)↑2) − (3 · (𝑃↑2))))
24	23	oveq1d 7427	. . . 4 ⊢ (𝜑 → ((𝑃↑2) + (;12 · 𝑅)) = ((((2 · 𝑃)↑2) − (3 · (𝑃↑2))) + (;12 · 𝑅)))
25		mulcl 11190	. . . . . . 7 ⊢ ((2 ∈ ℂ ∧ 𝑃 ∈ ℂ) → (2 · 𝑃) ∈ ℂ)
26	1, 2, 25	sylancr 598	. . . . . 6 ⊢ (𝜑 → (2 · 𝑃) ∈ ℂ)
27	26	sqcld 14187	. . . . 5 ⊢ (𝜑 → ((2 · 𝑃)↑2) ∈ ℂ)
28		mulcl 11190	. . . . . 6 ⊢ ((3 ∈ ℂ ∧ (𝑃↑2) ∈ ℂ) → (3 · (𝑃↑2)) ∈ ℂ)
29	11, 13, 28	sylancr 598	. . . . 5 ⊢ (𝜑 → (3 · (𝑃↑2)) ∈ ℂ)
30		1nn0 12526	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
31		2nn 12320	. . . . . . . 8 ⊢ 2 ∈ ℕ
32	30, 31	decnncl 12741	. . . . . . 7 ⊢ ;12 ∈ ℕ
33	32	nncni 12249	. . . . . 6 ⊢ ;12 ∈ ℂ
34		quartlem1.r	. . . . . 6 ⊢ (𝜑 → 𝑅 ∈ ℂ)
35		mulcl 11190	. . . . . 6 ⊢ ((;12 ∈ ℂ ∧ 𝑅 ∈ ℂ) → (;12 · 𝑅) ∈ ℂ)
36	33, 34, 35	sylancr 598	. . . . 5 ⊢ (𝜑 → (;12 · 𝑅) ∈ ℂ)
37	27, 29, 36	subsubd 11603	. . . 4 ⊢ (𝜑 → (((2 · 𝑃)↑2) − ((3 · (𝑃↑2)) − (;12 · 𝑅))) = ((((2 · 𝑃)↑2) − (3 · (𝑃↑2))) + (;12 · 𝑅)))
38	24, 37	eqtr4d 2800	. . 3 ⊢ (𝜑 → ((𝑃↑2) + (;12 · 𝑅)) = (((2 · 𝑃)↑2) − ((3 · (𝑃↑2)) − (;12 · 𝑅))))
39		quartlem1.u	. . 3 ⊢ (𝜑 → 𝑈 = ((𝑃↑2) + (;12 · 𝑅)))
40		mulcl 11190	. . . . . . 7 ⊢ ((4 ∈ ℂ ∧ 𝑅 ∈ ℂ) → (4 · 𝑅) ∈ ℂ)
41	9, 34, 40	sylancr 598	. . . . . 6 ⊢ (𝜑 → (4 · 𝑅) ∈ ℂ)
42	12, 13, 41	subdid 11676	. . . . 5 ⊢ (𝜑 → (3 · ((𝑃↑2) − (4 · 𝑅))) = ((3 · (𝑃↑2)) − (3 · (4 · 𝑅))))
43		4t3e12 12820	. . . . . . . . 9 ⊢ (4 · 3) = ;12
44	9, 11, 43	mulcomli 11224	. . . . . . . 8 ⊢ (3 · 4) = ;12
45	44	oveq1i 7422	. . . . . . 7 ⊢ ((3 · 4) · 𝑅) = (;12 · 𝑅)
46	12, 10, 34	mulassd 11238	. . . . . . 7 ⊢ (𝜑 → ((3 · 4) · 𝑅) = (3 · (4 · 𝑅)))
47	45, 46	eqtr3id 2811	. . . . . 6 ⊢ (𝜑 → (;12 · 𝑅) = (3 · (4 · 𝑅)))
48	47	oveq2d 7428	. . . . 5 ⊢ (𝜑 → ((3 · (𝑃↑2)) − (;12 · 𝑅)) = ((3 · (𝑃↑2)) − (3 · (4 · 𝑅))))
49	42, 48	eqtr4d 2800	. . . 4 ⊢ (𝜑 → (3 · ((𝑃↑2) − (4 · 𝑅))) = ((3 · (𝑃↑2)) − (;12 · 𝑅)))
50	49	oveq2d 7428	. . 3 ⊢ (𝜑 → (((2 · 𝑃)↑2) − (3 · ((𝑃↑2) − (4 · 𝑅)))) = (((2 · 𝑃)↑2) − ((3 · (𝑃↑2)) − (;12 · 𝑅))))
51	38, 39, 50	3eqtr4d 2807	. 2 ⊢ (𝜑 → 𝑈 = (((2 · 𝑃)↑2) − (3 · ((𝑃↑2) − (4 · 𝑅)))))
52	1	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 2 ∈ ℂ)
53		3nn0 12528	. . . . . . . . . . 11 ⊢ 3 ∈ ℕ₀
54	53	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 3 ∈ ℕ₀)
55	52, 2, 54	mulexpd 14204	. . . . . . . . 9 ⊢ (𝜑 → ((2 · 𝑃)↑3) = ((2↑3) · (𝑃↑3)))
56		cu2 14243	. . . . . . . . . 10 ⊢ (2↑3) = 8
57	56	oveq1i 7422	. . . . . . . . 9 ⊢ ((2↑3) · (𝑃↑3)) = (8 · (𝑃↑3))
58	55, 57	eqtrdi 2813	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝑃)↑3) = (8 · (𝑃↑3)))
59	58	oveq2d 7428	. . . . . . 7 ⊢ (𝜑 → (2 · ((2 · 𝑃)↑3)) = (2 · (8 · (𝑃↑3))))
60		8cn 12344	. . . . . . . . 9 ⊢ 8 ∈ ℂ
61	60	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 8 ∈ ℂ)
62		expcl 14122	. . . . . . . . 9 ⊢ ((𝑃 ∈ ℂ ∧ 3 ∈ ℕ₀) → (𝑃↑3) ∈ ℂ)
63	2, 53, 62	sylancl 597	. . . . . . . 8 ⊢ (𝜑 → (𝑃↑3) ∈ ℂ)
64	52, 61, 63	mul12d 11425	. . . . . . 7 ⊢ (𝜑 → (2 · (8 · (𝑃↑3))) = (8 · (2 · (𝑃↑3))))
65	59, 64	eqtrd 2797	. . . . . 6 ⊢ (𝜑 → (2 · ((2 · 𝑃)↑3)) = (8 · (2 · (𝑃↑3))))
66		9cn 12347	. . . . . . . . 9 ⊢ 9 ∈ ℂ
67	66	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 9 ∈ ℂ)
68		mulcl 11190	. . . . . . . . 9 ⊢ ((2 ∈ ℂ ∧ (𝑃↑3) ∈ ℂ) → (2 · (𝑃↑3)) ∈ ℂ)
69	1, 63, 68	sylancr 598	. . . . . . . 8 ⊢ (𝜑 → (2 · (𝑃↑3)) ∈ ℂ)
70	2, 34	mulcld 11235	. . . . . . . . 9 ⊢ (𝜑 → (𝑃 · 𝑅) ∈ ℂ)
71		mulcl 11190	. . . . . . . . 9 ⊢ ((8 ∈ ℂ ∧ (𝑃 · 𝑅) ∈ ℂ) → (8 · (𝑃 · 𝑅)) ∈ ℂ)
72	60, 70, 71	sylancr 598	. . . . . . . 8 ⊢ (𝜑 → (8 · (𝑃 · 𝑅)) ∈ ℂ)
73	67, 69, 72	subdid 11676	. . . . . . 7 ⊢ (𝜑 → (9 · ((2 · (𝑃↑3)) − (8 · (𝑃 · 𝑅)))) = ((9 · (2 · (𝑃↑3))) − (9 · (8 · (𝑃 · 𝑅)))))
74	26, 13, 41	subdid 11676	. . . . . . . . 9 ⊢ (𝜑 → ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅))) = (((2 · 𝑃) · (𝑃↑2)) − ((2 · 𝑃) · (4 · 𝑅))))
75	52, 2, 13	mulassd 11238	. . . . . . . . . . 11 ⊢ (𝜑 → ((2 · 𝑃) · (𝑃↑2)) = (2 · (𝑃 · (𝑃↑2))))
76	2, 13	mulcomd 11236	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑃 · (𝑃↑2)) = ((𝑃↑2) · 𝑃))
77		df-3 12310	. . . . . . . . . . . . . . 15 ⊢ 3 = (2 + 1)
78	77	oveq2i 7423	. . . . . . . . . . . . . 14 ⊢ (𝑃↑3) = (𝑃↑(2 + 1))
79		2nn0 12527	. . . . . . . . . . . . . . 15 ⊢ 2 ∈ ℕ₀
80		expp1 14111	. . . . . . . . . . . . . . 15 ⊢ ((𝑃 ∈ ℂ ∧ 2 ∈ ℕ₀) → (𝑃↑(2 + 1)) = ((𝑃↑2) · 𝑃))
81	2, 79, 80	sylancl 597	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑃↑(2 + 1)) = ((𝑃↑2) · 𝑃))
82	78, 81	eqtrid 2809	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑃↑3) = ((𝑃↑2) · 𝑃))
83	76, 82	eqtr4d 2800	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑃 · (𝑃↑2)) = (𝑃↑3))
84	83	oveq2d 7428	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · (𝑃 · (𝑃↑2))) = (2 · (𝑃↑3)))
85	75, 84	eqtrd 2797	. . . . . . . . . 10 ⊢ (𝜑 → ((2 · 𝑃) · (𝑃↑2)) = (2 · (𝑃↑3)))
86	52, 2, 10, 34	mul4d 11428	. . . . . . . . . . 11 ⊢ (𝜑 → ((2 · 𝑃) · (4 · 𝑅)) = ((2 · 4) · (𝑃 · 𝑅)))
87		2t4e8 12416	. . . . . . . . . . . 12 ⊢ (2 · 4) = 8
88	87	oveq1i 7422	. . . . . . . . . . 11 ⊢ ((2 · 4) · (𝑃 · 𝑅)) = (8 · (𝑃 · 𝑅))
89	86, 88	eqtrdi 2813	. . . . . . . . . 10 ⊢ (𝜑 → ((2 · 𝑃) · (4 · 𝑅)) = (8 · (𝑃 · 𝑅)))
90	85, 89	oveq12d 7430	. . . . . . . . 9 ⊢ (𝜑 → (((2 · 𝑃) · (𝑃↑2)) − ((2 · 𝑃) · (4 · 𝑅))) = ((2 · (𝑃↑3)) − (8 · (𝑃 · 𝑅))))
91	74, 90	eqtrd 2797	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅))) = ((2 · (𝑃↑3)) − (8 · (𝑃 · 𝑅))))
92	91	oveq2d 7428	. . . . . . 7 ⊢ (𝜑 → (9 · ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅)))) = (9 · ((2 · (𝑃↑3)) − (8 · (𝑃 · 𝑅)))))
93		9t8e72 12850	. . . . . . . . . 10 ⊢ (9 · 8) = ;72
94	93	oveq1i 7422	. . . . . . . . 9 ⊢ ((9 · 8) · (𝑃 · 𝑅)) = (;72 · (𝑃 · 𝑅))
95	67, 61, 70	mulassd 11238	. . . . . . . . 9 ⊢ (𝜑 → ((9 · 8) · (𝑃 · 𝑅)) = (9 · (8 · (𝑃 · 𝑅))))
96	94, 95	eqtr3id 2811	. . . . . . . 8 ⊢ (𝜑 → (;72 · (𝑃 · 𝑅)) = (9 · (8 · (𝑃 · 𝑅))))
97	96	oveq2d 7428	. . . . . . 7 ⊢ (𝜑 → ((9 · (2 · (𝑃↑3))) − (;72 · (𝑃 · 𝑅))) = ((9 · (2 · (𝑃↑3))) − (9 · (8 · (𝑃 · 𝑅)))))
98	73, 92, 97	3eqtr4d 2807	. . . . . 6 ⊢ (𝜑 → (9 · ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅)))) = ((9 · (2 · (𝑃↑3))) − (;72 · (𝑃 · 𝑅))))
99	65, 98	oveq12d 7430	. . . . 5 ⊢ (𝜑 → ((2 · ((2 · 𝑃)↑3)) − (9 · ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅))))) = ((8 · (2 · (𝑃↑3))) − ((9 · (2 · (𝑃↑3))) − (;72 · (𝑃 · 𝑅)))))
100		mulcl 11190	. . . . . . 7 ⊢ ((8 ∈ ℂ ∧ (2 · (𝑃↑3)) ∈ ℂ) → (8 · (2 · (𝑃↑3))) ∈ ℂ)
101	60, 69, 100	sylancr 598	. . . . . 6 ⊢ (𝜑 → (8 · (2 · (𝑃↑3))) ∈ ℂ)
102		mulcl 11190	. . . . . . 7 ⊢ ((9 ∈ ℂ ∧ (2 · (𝑃↑3)) ∈ ℂ) → (9 · (2 · (𝑃↑3))) ∈ ℂ)
103	66, 69, 102	sylancr 598	. . . . . 6 ⊢ (𝜑 → (9 · (2 · (𝑃↑3))) ∈ ℂ)
104		7nn0 12532	. . . . . . . . 9 ⊢ 7 ∈ ℕ₀
105	104, 31	decnncl 12741	. . . . . . . 8 ⊢ ;72 ∈ ℕ
106	105	nncni 12249	. . . . . . 7 ⊢ ;72 ∈ ℂ
107		mulcl 11190	. . . . . . 7 ⊢ ((;72 ∈ ℂ ∧ (𝑃 · 𝑅) ∈ ℂ) → (;72 · (𝑃 · 𝑅)) ∈ ℂ)
108	106, 70, 107	sylancr 598	. . . . . 6 ⊢ (𝜑 → (;72 · (𝑃 · 𝑅)) ∈ ℂ)
109	101, 103, 108	subsubd 11603	. . . . 5 ⊢ (𝜑 → ((8 · (2 · (𝑃↑3))) − ((9 · (2 · (𝑃↑3))) − (;72 · (𝑃 · 𝑅)))) = (((8 · (2 · (𝑃↑3))) − (9 · (2 · (𝑃↑3)))) + (;72 · (𝑃 · 𝑅))))
110	103, 101	negsubdi2d 11591	. . . . . . 7 ⊢ (𝜑 → -((9 · (2 · (𝑃↑3))) − (8 · (2 · (𝑃↑3)))) = ((8 · (2 · (𝑃↑3))) − (9 · (2 · (𝑃↑3)))))
111	67, 61, 69	subdird 11677	. . . . . . . . 9 ⊢ (𝜑 → ((9 − 8) · (2 · (𝑃↑3))) = ((9 · (2 · (𝑃↑3))) − (8 · (2 · (𝑃↑3)))))
112		8p1e9 12396	. . . . . . . . . . . 12 ⊢ (8 + 1) = 9
113	66, 60, 16, 112	subaddrii 11553	. . . . . . . . . . 11 ⊢ (9 − 8) = 1
114	113	oveq1i 7422	. . . . . . . . . 10 ⊢ ((9 − 8) · (2 · (𝑃↑3))) = (1 · (2 · (𝑃↑3)))
115	69	mullidd 11233	. . . . . . . . . 10 ⊢ (𝜑 → (1 · (2 · (𝑃↑3))) = (2 · (𝑃↑3)))
116	114, 115	eqtrid 2809	. . . . . . . . 9 ⊢ (𝜑 → ((9 − 8) · (2 · (𝑃↑3))) = (2 · (𝑃↑3)))
117	111, 116	eqtr3d 2799	. . . . . . . 8 ⊢ (𝜑 → ((9 · (2 · (𝑃↑3))) − (8 · (2 · (𝑃↑3)))) = (2 · (𝑃↑3)))
118	117	negeqd 11457	. . . . . . 7 ⊢ (𝜑 → -((9 · (2 · (𝑃↑3))) − (8 · (2 · (𝑃↑3)))) = -(2 · (𝑃↑3)))
119	110, 118	eqtr3d 2799	. . . . . 6 ⊢ (𝜑 → ((8 · (2 · (𝑃↑3))) − (9 · (2 · (𝑃↑3)))) = -(2 · (𝑃↑3)))
120	119	oveq1d 7427	. . . . 5 ⊢ (𝜑 → (((8 · (2 · (𝑃↑3))) − (9 · (2 · (𝑃↑3)))) + (;72 · (𝑃 · 𝑅))) = (-(2 · (𝑃↑3)) + (;72 · (𝑃 · 𝑅))))
121	99, 109, 120	3eqtrd 2801	. . . 4 ⊢ (𝜑 → ((2 · ((2 · 𝑃)↑3)) − (9 · ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅))))) = (-(2 · (𝑃↑3)) + (;72 · (𝑃 · 𝑅))))
122		7nn 12339	. . . . . . 7 ⊢ 7 ∈ ℕ
123	79, 122	decnncl 12741	. . . . . 6 ⊢ ;27 ∈ ℕ
124	123	nncni 12249	. . . . 5 ⊢ ;27 ∈ ℂ
125		quartlem1.q	. . . . . 6 ⊢ (𝜑 → 𝑄 ∈ ℂ)
126	125	sqcld 14187	. . . . 5 ⊢ (𝜑 → (𝑄↑2) ∈ ℂ)
127		mulneg2 11657	. . . . 5 ⊢ ((;27 ∈ ℂ ∧ (𝑄↑2) ∈ ℂ) → (;27 · -(𝑄↑2)) = -(;27 · (𝑄↑2)))
128	124, 126, 127	sylancr 598	. . . 4 ⊢ (𝜑 → (;27 · -(𝑄↑2)) = -(;27 · (𝑄↑2)))
129	121, 128	oveq12d 7430	. . 3 ⊢ (𝜑 → (((2 · ((2 · 𝑃)↑3)) − (9 · ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅))))) + (;27 · -(𝑄↑2))) = ((-(2 · (𝑃↑3)) + (;72 · (𝑃 · 𝑅))) + -(;27 · (𝑄↑2))))
130	69	negcld 11562	. . . . 5 ⊢ (𝜑 → -(2 · (𝑃↑3)) ∈ ℂ)
131		mulcl 11190	. . . . . 6 ⊢ ((;27 ∈ ℂ ∧ (𝑄↑2) ∈ ℂ) → (;27 · (𝑄↑2)) ∈ ℂ)
132	124, 126, 131	sylancr 598	. . . . 5 ⊢ (𝜑 → (;27 · (𝑄↑2)) ∈ ℂ)
133	130, 108, 132	addsubd 11596	. . . 4 ⊢ (𝜑 → ((-(2 · (𝑃↑3)) + (;72 · (𝑃 · 𝑅))) − (;27 · (𝑄↑2))) = ((-(2 · (𝑃↑3)) − (;27 · (𝑄↑2))) + (;72 · (𝑃 · 𝑅))))
134	130, 108	addcld 11234	. . . . 5 ⊢ (𝜑 → (-(2 · (𝑃↑3)) + (;72 · (𝑃 · 𝑅))) ∈ ℂ)
135	134, 132	negsubd 11581	. . . 4 ⊢ (𝜑 → ((-(2 · (𝑃↑3)) + (;72 · (𝑃 · 𝑅))) + -(;27 · (𝑄↑2))) = ((-(2 · (𝑃↑3)) + (;72 · (𝑃 · 𝑅))) − (;27 · (𝑄↑2))))
136		quartlem1.v	. . . 4 ⊢ (𝜑 → 𝑉 = ((-(2 · (𝑃↑3)) − (;27 · (𝑄↑2))) + (;72 · (𝑃 · 𝑅))))
137	133, 135, 136	3eqtr4d 2807	. . 3 ⊢ (𝜑 → ((-(2 · (𝑃↑3)) + (;72 · (𝑃 · 𝑅))) + -(;27 · (𝑄↑2))) = 𝑉)
138	129, 137	eqtr2d 2798	. 2 ⊢ (𝜑 → 𝑉 = (((2 · ((2 · 𝑃)↑3)) − (9 · ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅))))) + (;27 · -(𝑄↑2))))
139	51, 138	jca 520	1 ⊢ (𝜑 → (𝑈 = (((2 · 𝑃)↑2) − (3 · ((𝑃↑2) − (4 · 𝑅)))) ∧ 𝑉 = (((2 · ((2 · 𝑃)↑3)) − (9 · ((2 · 𝑃) · ((𝑃↑2) − (4 · 𝑅))))) + (;27 · -(𝑄↑2)))))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 400 = wceq 1569 ∈ wcel 2142 (class class class)co 7412 ℂcc 11104 1c1 11107 + caddc 11109 · cmul 11111 − cmin 11447 -cneg 11448 2c2 12301 3c3 12302 4c4 12303 7c7 12306 8c8 12307 9c9 12308 ℕ₀cn0 12510 cdc 12717 ↑cexp 14104

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1824 ax-4 1838 ax-5 1939 ax-6 1996 ax-7 2037 ax-8 2144 ax-9 2152 ax-10 2175 ax-11 2191 ax-12 2212 ax-ext 2734 ax-sep 5256 ax-nul 5268 ax-pow 5335 ax-pr 5403 ax-un 7734 ax-cnex 11162 ax-resscn 11163 ax-1cn 11164 ax-icn 11165 ax-addcl 11166 ax-addrcl 11167 ax-mulcl 11168 ax-mulrcl 11169 ax-mulcom 11170 ax-addass 11171 ax-mulass 11172 ax-distr 11173 ax-i2m1 11174 ax-1ne0 11175 ax-1rid 11176 ax-rnegex 11177 ax-rrecex 11178 ax-cnre 11179 ax-pre-lttri 11180 ax-pre-lttrn 11181 ax-pre-ltadd 11182 ax-pre-mulgt0 11183

This proof depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1103 df-3an 1104 df-tru 1572 df-fal 1582 df-ex 1809 df-nf 1813 df-sb 2096 df-mo 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-nel 3064 df-ral 3079 df-rex 3089 df-reu 3369 df-rab 3416 df-v 3456 df-sbc 3744 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-pss 3924 df-nul 4286 df-if 4487 df-pw 4563 df-sn 4589 df-pr 4591 df-op 4595 df-uni 4872 df-iun 4957 df-br 5109 df-opab 5173 df-mpt 5192 df-tr 5218 df-id 5555 df-eprel 5560 df-po 5568 df-so 5569 df-fr 5613 df-we 5615 df-xp 5666 df-rel 5667 df-cnv 5668 df-co 5669 df-dm 5670 df-rn 5671 df-res 5672 df-ima 5673 df-pred 6302 df-ord 6363 df-on 6364 df-lim 6365 df-suc 6366 df-iota 6492 df-fun 6538 df-fn 6539 df-f 6540 df-f1 6541 df-fo 6542 df-f1o 6543 df-fv 6544 df-riota 7369 df-ov 7415 df-oprab 7416 df-mpo 7417 df-om 7861 df-2nd 7985 df-frecs 8276 df-wrecs 8307 df-recs 8356 df-rdg 8395 df-er 8692 df-en 8942 df-dom 8943 df-sdom 8944 df-pnf 11251 df-mnf 11252 df-xr 11253 df-ltxr 11254 df-le 11255 df-sub 11449 df-neg 11450 df-nn 12240 df-2 12309 df-3 12310 df-4 12311 df-5 12312 df-6 12313 df-7 12314 df-8 12315 df-9 12316 df-n0 12511 df-z 12598 df-dec 12718 df-uz 12869 df-seq 14045 df-exp 14105

This theorem is used by: quart 27037

W3C validator