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

Theorem quartlem1 26351
Description: Lemma for quart 26355. (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
StepHypRef Expression
1 2cn 12283 . . . . . . . . . 10 2 โˆˆ โ„‚
2 quartlem1.p . . . . . . . . . 10 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„‚)
3 sqmul 14080 . . . . . . . . . 10 ((2 โˆˆ โ„‚ โˆง ๐‘ƒ โˆˆ โ„‚) โ†’ ((2 ยท ๐‘ƒ)โ†‘2) = ((2โ†‘2) ยท (๐‘ƒโ†‘2)))
41, 2, 3sylancr 587 . . . . . . . . 9 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ)โ†‘2) = ((2โ†‘2) ยท (๐‘ƒโ†‘2)))
5 sq2 14157 . . . . . . . . . 10 (2โ†‘2) = 4
65oveq1i 7415 . . . . . . . . 9 ((2โ†‘2) ยท (๐‘ƒโ†‘2)) = (4 ยท (๐‘ƒโ†‘2))
74, 6eqtrdi 2788 . . . . . . . 8 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ)โ†‘2) = (4 ยท (๐‘ƒโ†‘2)))
87oveq1d 7420 . . . . . . 7 (๐œ‘ โ†’ (((2 ยท ๐‘ƒ)โ†‘2) โˆ’ (3 ยท (๐‘ƒโ†‘2))) = ((4 ยท (๐‘ƒโ†‘2)) โˆ’ (3 ยท (๐‘ƒโ†‘2))))
9 4cn 12293 . . . . . . . . 9 4 โˆˆ โ„‚
109a1i 11 . . . . . . . 8 (๐œ‘ โ†’ 4 โˆˆ โ„‚)
11 3cn 12289 . . . . . . . . 9 3 โˆˆ โ„‚
1211a1i 11 . . . . . . . 8 (๐œ‘ โ†’ 3 โˆˆ โ„‚)
132sqcld 14105 . . . . . . . 8 (๐œ‘ โ†’ (๐‘ƒโ†‘2) โˆˆ โ„‚)
1410, 12, 13subdird 11667 . . . . . . 7 (๐œ‘ โ†’ ((4 โˆ’ 3) ยท (๐‘ƒโ†‘2)) = ((4 ยท (๐‘ƒโ†‘2)) โˆ’ (3 ยท (๐‘ƒโ†‘2))))
158, 14eqtr4d 2775 . . . . . 6 (๐œ‘ โ†’ (((2 ยท ๐‘ƒ)โ†‘2) โˆ’ (3 ยท (๐‘ƒโ†‘2))) = ((4 โˆ’ 3) ยท (๐‘ƒโ†‘2)))
16 ax-1cn 11164 . . . . . . . . . 10 1 โˆˆ โ„‚
17 3p1e4 12353 . . . . . . . . . 10 (3 + 1) = 4
189, 11, 16, 17subaddrii 11545 . . . . . . . . 9 (4 โˆ’ 3) = 1
1918oveq1i 7415 . . . . . . . 8 ((4 โˆ’ 3) ยท (๐‘ƒโ†‘2)) = (1 ยท (๐‘ƒโ†‘2))
20 mullid 11209 . . . . . . . 8 ((๐‘ƒโ†‘2) โˆˆ โ„‚ โ†’ (1 ยท (๐‘ƒโ†‘2)) = (๐‘ƒโ†‘2))
2119, 20eqtrid 2784 . . . . . . 7 ((๐‘ƒโ†‘2) โˆˆ โ„‚ โ†’ ((4 โˆ’ 3) ยท (๐‘ƒโ†‘2)) = (๐‘ƒโ†‘2))
2213, 21syl 17 . . . . . 6 (๐œ‘ โ†’ ((4 โˆ’ 3) ยท (๐‘ƒโ†‘2)) = (๐‘ƒโ†‘2))
2315, 22eqtr2d 2773 . . . . 5 (๐œ‘ โ†’ (๐‘ƒโ†‘2) = (((2 ยท ๐‘ƒ)โ†‘2) โˆ’ (3 ยท (๐‘ƒโ†‘2))))
2423oveq1d 7420 . . . 4 (๐œ‘ โ†’ ((๐‘ƒโ†‘2) + (12 ยท ๐‘…)) = ((((2 ยท ๐‘ƒ)โ†‘2) โˆ’ (3 ยท (๐‘ƒโ†‘2))) + (12 ยท ๐‘…)))
25 mulcl 11190 . . . . . . 7 ((2 โˆˆ โ„‚ โˆง ๐‘ƒ โˆˆ โ„‚) โ†’ (2 ยท ๐‘ƒ) โˆˆ โ„‚)
261, 2, 25sylancr 587 . . . . . 6 (๐œ‘ โ†’ (2 ยท ๐‘ƒ) โˆˆ โ„‚)
2726sqcld 14105 . . . . 5 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ)โ†‘2) โˆˆ โ„‚)
28 mulcl 11190 . . . . . 6 ((3 โˆˆ โ„‚ โˆง (๐‘ƒโ†‘2) โˆˆ โ„‚) โ†’ (3 ยท (๐‘ƒโ†‘2)) โˆˆ โ„‚)
2911, 13, 28sylancr 587 . . . . 5 (๐œ‘ โ†’ (3 ยท (๐‘ƒโ†‘2)) โˆˆ โ„‚)
30 1nn0 12484 . . . . . . . 8 1 โˆˆ โ„•0
31 2nn 12281 . . . . . . . 8 2 โˆˆ โ„•
3230, 31decnncl 12693 . . . . . . 7 12 โˆˆ โ„•
3332nncni 12218 . . . . . 6 12 โˆˆ โ„‚
34 quartlem1.r . . . . . 6 (๐œ‘ โ†’ ๐‘… โˆˆ โ„‚)
35 mulcl 11190 . . . . . 6 ((12 โˆˆ โ„‚ โˆง ๐‘… โˆˆ โ„‚) โ†’ (12 ยท ๐‘…) โˆˆ โ„‚)
3633, 34, 35sylancr 587 . . . . 5 (๐œ‘ โ†’ (12 ยท ๐‘…) โˆˆ โ„‚)
3727, 29, 36subsubd 11595 . . . 4 (๐œ‘ โ†’ (((2 ยท ๐‘ƒ)โ†‘2) โˆ’ ((3 ยท (๐‘ƒโ†‘2)) โˆ’ (12 ยท ๐‘…))) = ((((2 ยท ๐‘ƒ)โ†‘2) โˆ’ (3 ยท (๐‘ƒโ†‘2))) + (12 ยท ๐‘…)))
3824, 37eqtr4d 2775 . . 3 (๐œ‘ โ†’ ((๐‘ƒโ†‘2) + (12 ยท ๐‘…)) = (((2 ยท ๐‘ƒ)โ†‘2) โˆ’ ((3 ยท (๐‘ƒโ†‘2)) โˆ’ (12 ยท ๐‘…))))
39 quartlem1.u . . 3 (๐œ‘ โ†’ ๐‘ˆ = ((๐‘ƒโ†‘2) + (12 ยท ๐‘…)))
40 mulcl 11190 . . . . . . 7 ((4 โˆˆ โ„‚ โˆง ๐‘… โˆˆ โ„‚) โ†’ (4 ยท ๐‘…) โˆˆ โ„‚)
419, 34, 40sylancr 587 . . . . . 6 (๐œ‘ โ†’ (4 ยท ๐‘…) โˆˆ โ„‚)
4212, 13, 41subdid 11666 . . . . 5 (๐œ‘ โ†’ (3 ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…))) = ((3 ยท (๐‘ƒโ†‘2)) โˆ’ (3 ยท (4 ยท ๐‘…))))
43 4t3e12 12771 . . . . . . . . 9 (4 ยท 3) = 12
449, 11, 43mulcomli 11219 . . . . . . . 8 (3 ยท 4) = 12
4544oveq1i 7415 . . . . . . 7 ((3 ยท 4) ยท ๐‘…) = (12 ยท ๐‘…)
4612, 10, 34mulassd 11233 . . . . . . 7 (๐œ‘ โ†’ ((3 ยท 4) ยท ๐‘…) = (3 ยท (4 ยท ๐‘…)))
4745, 46eqtr3id 2786 . . . . . 6 (๐œ‘ โ†’ (12 ยท ๐‘…) = (3 ยท (4 ยท ๐‘…)))
4847oveq2d 7421 . . . . 5 (๐œ‘ โ†’ ((3 ยท (๐‘ƒโ†‘2)) โˆ’ (12 ยท ๐‘…)) = ((3 ยท (๐‘ƒโ†‘2)) โˆ’ (3 ยท (4 ยท ๐‘…))))
4942, 48eqtr4d 2775 . . . 4 (๐œ‘ โ†’ (3 ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…))) = ((3 ยท (๐‘ƒโ†‘2)) โˆ’ (12 ยท ๐‘…)))
5049oveq2d 7421 . . 3 (๐œ‘ โ†’ (((2 ยท ๐‘ƒ)โ†‘2) โˆ’ (3 ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…)))) = (((2 ยท ๐‘ƒ)โ†‘2) โˆ’ ((3 ยท (๐‘ƒโ†‘2)) โˆ’ (12 ยท ๐‘…))))
5138, 39, 503eqtr4d 2782 . 2 (๐œ‘ โ†’ ๐‘ˆ = (((2 ยท ๐‘ƒ)โ†‘2) โˆ’ (3 ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…)))))
521a1i 11 . . . . . . . . . 10 (๐œ‘ โ†’ 2 โˆˆ โ„‚)
53 3nn0 12486 . . . . . . . . . . 11 3 โˆˆ โ„•0
5453a1i 11 . . . . . . . . . 10 (๐œ‘ โ†’ 3 โˆˆ โ„•0)
5552, 2, 54mulexpd 14122 . . . . . . . . 9 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ)โ†‘3) = ((2โ†‘3) ยท (๐‘ƒโ†‘3)))
56 cu2 14160 . . . . . . . . . 10 (2โ†‘3) = 8
5756oveq1i 7415 . . . . . . . . 9 ((2โ†‘3) ยท (๐‘ƒโ†‘3)) = (8 ยท (๐‘ƒโ†‘3))
5855, 57eqtrdi 2788 . . . . . . . 8 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ)โ†‘3) = (8 ยท (๐‘ƒโ†‘3)))
5958oveq2d 7421 . . . . . . 7 (๐œ‘ โ†’ (2 ยท ((2 ยท ๐‘ƒ)โ†‘3)) = (2 ยท (8 ยท (๐‘ƒโ†‘3))))
60 8cn 12305 . . . . . . . . 9 8 โˆˆ โ„‚
6160a1i 11 . . . . . . . 8 (๐œ‘ โ†’ 8 โˆˆ โ„‚)
62 expcl 14041 . . . . . . . . 9 ((๐‘ƒ โˆˆ โ„‚ โˆง 3 โˆˆ โ„•0) โ†’ (๐‘ƒโ†‘3) โˆˆ โ„‚)
632, 53, 62sylancl 586 . . . . . . . 8 (๐œ‘ โ†’ (๐‘ƒโ†‘3) โˆˆ โ„‚)
6452, 61, 63mul12d 11419 . . . . . . 7 (๐œ‘ โ†’ (2 ยท (8 ยท (๐‘ƒโ†‘3))) = (8 ยท (2 ยท (๐‘ƒโ†‘3))))
6559, 64eqtrd 2772 . . . . . 6 (๐œ‘ โ†’ (2 ยท ((2 ยท ๐‘ƒ)โ†‘3)) = (8 ยท (2 ยท (๐‘ƒโ†‘3))))
66 9cn 12308 . . . . . . . . 9 9 โˆˆ โ„‚
6766a1i 11 . . . . . . . 8 (๐œ‘ โ†’ 9 โˆˆ โ„‚)
68 mulcl 11190 . . . . . . . . 9 ((2 โˆˆ โ„‚ โˆง (๐‘ƒโ†‘3) โˆˆ โ„‚) โ†’ (2 ยท (๐‘ƒโ†‘3)) โˆˆ โ„‚)
691, 63, 68sylancr 587 . . . . . . . 8 (๐œ‘ โ†’ (2 ยท (๐‘ƒโ†‘3)) โˆˆ โ„‚)
702, 34mulcld 11230 . . . . . . . . 9 (๐œ‘ โ†’ (๐‘ƒ ยท ๐‘…) โˆˆ โ„‚)
71 mulcl 11190 . . . . . . . . 9 ((8 โˆˆ โ„‚ โˆง (๐‘ƒ ยท ๐‘…) โˆˆ โ„‚) โ†’ (8 ยท (๐‘ƒ ยท ๐‘…)) โˆˆ โ„‚)
7260, 70, 71sylancr 587 . . . . . . . 8 (๐œ‘ โ†’ (8 ยท (๐‘ƒ ยท ๐‘…)) โˆˆ โ„‚)
7367, 69, 72subdid 11666 . . . . . . 7 (๐œ‘ โ†’ (9 ยท ((2 ยท (๐‘ƒโ†‘3)) โˆ’ (8 ยท (๐‘ƒ ยท ๐‘…)))) = ((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (9 ยท (8 ยท (๐‘ƒ ยท ๐‘…)))))
7426, 13, 41subdid 11666 . . . . . . . . 9 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ) ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…))) = (((2 ยท ๐‘ƒ) ยท (๐‘ƒโ†‘2)) โˆ’ ((2 ยท ๐‘ƒ) ยท (4 ยท ๐‘…))))
7552, 2, 13mulassd 11233 . . . . . . . . . . 11 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ) ยท (๐‘ƒโ†‘2)) = (2 ยท (๐‘ƒ ยท (๐‘ƒโ†‘2))))
762, 13mulcomd 11231 . . . . . . . . . . . . 13 (๐œ‘ โ†’ (๐‘ƒ ยท (๐‘ƒโ†‘2)) = ((๐‘ƒโ†‘2) ยท ๐‘ƒ))
77 df-3 12272 . . . . . . . . . . . . . . 15 3 = (2 + 1)
7877oveq2i 7416 . . . . . . . . . . . . . 14 (๐‘ƒโ†‘3) = (๐‘ƒโ†‘(2 + 1))
79 2nn0 12485 . . . . . . . . . . . . . . 15 2 โˆˆ โ„•0
80 expp1 14030 . . . . . . . . . . . . . . 15 ((๐‘ƒ โˆˆ โ„‚ โˆง 2 โˆˆ โ„•0) โ†’ (๐‘ƒโ†‘(2 + 1)) = ((๐‘ƒโ†‘2) ยท ๐‘ƒ))
812, 79, 80sylancl 586 . . . . . . . . . . . . . 14 (๐œ‘ โ†’ (๐‘ƒโ†‘(2 + 1)) = ((๐‘ƒโ†‘2) ยท ๐‘ƒ))
8278, 81eqtrid 2784 . . . . . . . . . . . . 13 (๐œ‘ โ†’ (๐‘ƒโ†‘3) = ((๐‘ƒโ†‘2) ยท ๐‘ƒ))
8376, 82eqtr4d 2775 . . . . . . . . . . . 12 (๐œ‘ โ†’ (๐‘ƒ ยท (๐‘ƒโ†‘2)) = (๐‘ƒโ†‘3))
8483oveq2d 7421 . . . . . . . . . . 11 (๐œ‘ โ†’ (2 ยท (๐‘ƒ ยท (๐‘ƒโ†‘2))) = (2 ยท (๐‘ƒโ†‘3)))
8575, 84eqtrd 2772 . . . . . . . . . 10 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ) ยท (๐‘ƒโ†‘2)) = (2 ยท (๐‘ƒโ†‘3)))
8652, 2, 10, 34mul4d 11422 . . . . . . . . . . 11 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ) ยท (4 ยท ๐‘…)) = ((2 ยท 4) ยท (๐‘ƒ ยท ๐‘…)))
87 4t2e8 12376 . . . . . . . . . . . . 13 (4 ยท 2) = 8
889, 1, 87mulcomli 11219 . . . . . . . . . . . 12 (2 ยท 4) = 8
8988oveq1i 7415 . . . . . . . . . . 11 ((2 ยท 4) ยท (๐‘ƒ ยท ๐‘…)) = (8 ยท (๐‘ƒ ยท ๐‘…))
9086, 89eqtrdi 2788 . . . . . . . . . 10 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ) ยท (4 ยท ๐‘…)) = (8 ยท (๐‘ƒ ยท ๐‘…)))
9185, 90oveq12d 7423 . . . . . . . . 9 (๐œ‘ โ†’ (((2 ยท ๐‘ƒ) ยท (๐‘ƒโ†‘2)) โˆ’ ((2 ยท ๐‘ƒ) ยท (4 ยท ๐‘…))) = ((2 ยท (๐‘ƒโ†‘3)) โˆ’ (8 ยท (๐‘ƒ ยท ๐‘…))))
9274, 91eqtrd 2772 . . . . . . . 8 (๐œ‘ โ†’ ((2 ยท ๐‘ƒ) ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…))) = ((2 ยท (๐‘ƒโ†‘3)) โˆ’ (8 ยท (๐‘ƒ ยท ๐‘…))))
9392oveq2d 7421 . . . . . . 7 (๐œ‘ โ†’ (9 ยท ((2 ยท ๐‘ƒ) ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…)))) = (9 ยท ((2 ยท (๐‘ƒโ†‘3)) โˆ’ (8 ยท (๐‘ƒ ยท ๐‘…)))))
94 9t8e72 12801 . . . . . . . . . 10 (9 ยท 8) = 72
9594oveq1i 7415 . . . . . . . . 9 ((9 ยท 8) ยท (๐‘ƒ ยท ๐‘…)) = (72 ยท (๐‘ƒ ยท ๐‘…))
9667, 61, 70mulassd 11233 . . . . . . . . 9 (๐œ‘ โ†’ ((9 ยท 8) ยท (๐‘ƒ ยท ๐‘…)) = (9 ยท (8 ยท (๐‘ƒ ยท ๐‘…))))
9795, 96eqtr3id 2786 . . . . . . . 8 (๐œ‘ โ†’ (72 ยท (๐‘ƒ ยท ๐‘…)) = (9 ยท (8 ยท (๐‘ƒ ยท ๐‘…))))
9897oveq2d 7421 . . . . . . 7 (๐œ‘ โ†’ ((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (72 ยท (๐‘ƒ ยท ๐‘…))) = ((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (9 ยท (8 ยท (๐‘ƒ ยท ๐‘…)))))
9973, 93, 983eqtr4d 2782 . . . . . 6 (๐œ‘ โ†’ (9 ยท ((2 ยท ๐‘ƒ) ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…)))) = ((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (72 ยท (๐‘ƒ ยท ๐‘…))))
10065, 99oveq12d 7423 . . . . 5 (๐œ‘ โ†’ ((2 ยท ((2 ยท ๐‘ƒ)โ†‘3)) โˆ’ (9 ยท ((2 ยท ๐‘ƒ) ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…))))) = ((8 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ ((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (72 ยท (๐‘ƒ ยท ๐‘…)))))
101 mulcl 11190 . . . . . . 7 ((8 โˆˆ โ„‚ โˆง (2 ยท (๐‘ƒโ†‘3)) โˆˆ โ„‚) โ†’ (8 ยท (2 ยท (๐‘ƒโ†‘3))) โˆˆ โ„‚)
10260, 69, 101sylancr 587 . . . . . 6 (๐œ‘ โ†’ (8 ยท (2 ยท (๐‘ƒโ†‘3))) โˆˆ โ„‚)
103 mulcl 11190 . . . . . . 7 ((9 โˆˆ โ„‚ โˆง (2 ยท (๐‘ƒโ†‘3)) โˆˆ โ„‚) โ†’ (9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆˆ โ„‚)
10466, 69, 103sylancr 587 . . . . . 6 (๐œ‘ โ†’ (9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆˆ โ„‚)
105 7nn0 12490 . . . . . . . . 9 7 โˆˆ โ„•0
106105, 31decnncl 12693 . . . . . . . 8 72 โˆˆ โ„•
107106nncni 12218 . . . . . . 7 72 โˆˆ โ„‚
108 mulcl 11190 . . . . . . 7 ((72 โˆˆ โ„‚ โˆง (๐‘ƒ ยท ๐‘…) โˆˆ โ„‚) โ†’ (72 ยท (๐‘ƒ ยท ๐‘…)) โˆˆ โ„‚)
109107, 70, 108sylancr 587 . . . . . 6 (๐œ‘ โ†’ (72 ยท (๐‘ƒ ยท ๐‘…)) โˆˆ โ„‚)
110102, 104, 109subsubd 11595 . . . . 5 (๐œ‘ โ†’ ((8 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ ((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (72 ยท (๐‘ƒ ยท ๐‘…)))) = (((8 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (9 ยท (2 ยท (๐‘ƒโ†‘3)))) + (72 ยท (๐‘ƒ ยท ๐‘…))))
111104, 102negsubdi2d 11583 . . . . . . 7 (๐œ‘ โ†’ -((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (8 ยท (2 ยท (๐‘ƒโ†‘3)))) = ((8 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (9 ยท (2 ยท (๐‘ƒโ†‘3)))))
11267, 61, 69subdird 11667 . . . . . . . . 9 (๐œ‘ โ†’ ((9 โˆ’ 8) ยท (2 ยท (๐‘ƒโ†‘3))) = ((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (8 ยท (2 ยท (๐‘ƒโ†‘3)))))
113 8p1e9 12358 . . . . . . . . . . . 12 (8 + 1) = 9
11466, 60, 16, 113subaddrii 11545 . . . . . . . . . . 11 (9 โˆ’ 8) = 1
115114oveq1i 7415 . . . . . . . . . 10 ((9 โˆ’ 8) ยท (2 ยท (๐‘ƒโ†‘3))) = (1 ยท (2 ยท (๐‘ƒโ†‘3)))
11669mullidd 11228 . . . . . . . . . 10 (๐œ‘ โ†’ (1 ยท (2 ยท (๐‘ƒโ†‘3))) = (2 ยท (๐‘ƒโ†‘3)))
117115, 116eqtrid 2784 . . . . . . . . 9 (๐œ‘ โ†’ ((9 โˆ’ 8) ยท (2 ยท (๐‘ƒโ†‘3))) = (2 ยท (๐‘ƒโ†‘3)))
118112, 117eqtr3d 2774 . . . . . . . 8 (๐œ‘ โ†’ ((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (8 ยท (2 ยท (๐‘ƒโ†‘3)))) = (2 ยท (๐‘ƒโ†‘3)))
119118negeqd 11450 . . . . . . 7 (๐œ‘ โ†’ -((9 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (8 ยท (2 ยท (๐‘ƒโ†‘3)))) = -(2 ยท (๐‘ƒโ†‘3)))
120111, 119eqtr3d 2774 . . . . . 6 (๐œ‘ โ†’ ((8 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (9 ยท (2 ยท (๐‘ƒโ†‘3)))) = -(2 ยท (๐‘ƒโ†‘3)))
121120oveq1d 7420 . . . . 5 (๐œ‘ โ†’ (((8 ยท (2 ยท (๐‘ƒโ†‘3))) โˆ’ (9 ยท (2 ยท (๐‘ƒโ†‘3)))) + (72 ยท (๐‘ƒ ยท ๐‘…))) = (-(2 ยท (๐‘ƒโ†‘3)) + (72 ยท (๐‘ƒ ยท ๐‘…))))
122100, 110, 1213eqtrd 2776 . . . 4 (๐œ‘ โ†’ ((2 ยท ((2 ยท ๐‘ƒ)โ†‘3)) โˆ’ (9 ยท ((2 ยท ๐‘ƒ) ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…))))) = (-(2 ยท (๐‘ƒโ†‘3)) + (72 ยท (๐‘ƒ ยท ๐‘…))))
123 7nn 12300 . . . . . . 7 7 โˆˆ โ„•
12479, 123decnncl 12693 . . . . . 6 27 โˆˆ โ„•
125124nncni 12218 . . . . 5 27 โˆˆ โ„‚
126 quartlem1.q . . . . . 6 (๐œ‘ โ†’ ๐‘„ โˆˆ โ„‚)
127126sqcld 14105 . . . . 5 (๐œ‘ โ†’ (๐‘„โ†‘2) โˆˆ โ„‚)
128 mulneg2 11647 . . . . 5 ((27 โˆˆ โ„‚ โˆง (๐‘„โ†‘2) โˆˆ โ„‚) โ†’ (27 ยท -(๐‘„โ†‘2)) = -(27 ยท (๐‘„โ†‘2)))
129125, 127, 128sylancr 587 . . . 4 (๐œ‘ โ†’ (27 ยท -(๐‘„โ†‘2)) = -(27 ยท (๐‘„โ†‘2)))
130122, 129oveq12d 7423 . . 3 (๐œ‘ โ†’ (((2 ยท ((2 ยท ๐‘ƒ)โ†‘3)) โˆ’ (9 ยท ((2 ยท ๐‘ƒ) ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…))))) + (27 ยท -(๐‘„โ†‘2))) = ((-(2 ยท (๐‘ƒโ†‘3)) + (72 ยท (๐‘ƒ ยท ๐‘…))) + -(27 ยท (๐‘„โ†‘2))))
13169negcld 11554 . . . . 5 (๐œ‘ โ†’ -(2 ยท (๐‘ƒโ†‘3)) โˆˆ โ„‚)
132 mulcl 11190 . . . . . 6 ((27 โˆˆ โ„‚ โˆง (๐‘„โ†‘2) โˆˆ โ„‚) โ†’ (27 ยท (๐‘„โ†‘2)) โˆˆ โ„‚)
133125, 127, 132sylancr 587 . . . . 5 (๐œ‘ โ†’ (27 ยท (๐‘„โ†‘2)) โˆˆ โ„‚)
134131, 109, 133addsubd 11588 . . . 4 (๐œ‘ โ†’ ((-(2 ยท (๐‘ƒโ†‘3)) + (72 ยท (๐‘ƒ ยท ๐‘…))) โˆ’ (27 ยท (๐‘„โ†‘2))) = ((-(2 ยท (๐‘ƒโ†‘3)) โˆ’ (27 ยท (๐‘„โ†‘2))) + (72 ยท (๐‘ƒ ยท ๐‘…))))
135131, 109addcld 11229 . . . . 5 (๐œ‘ โ†’ (-(2 ยท (๐‘ƒโ†‘3)) + (72 ยท (๐‘ƒ ยท ๐‘…))) โˆˆ โ„‚)
136135, 133negsubd 11573 . . . 4 (๐œ‘ โ†’ ((-(2 ยท (๐‘ƒโ†‘3)) + (72 ยท (๐‘ƒ ยท ๐‘…))) + -(27 ยท (๐‘„โ†‘2))) = ((-(2 ยท (๐‘ƒโ†‘3)) + (72 ยท (๐‘ƒ ยท ๐‘…))) โˆ’ (27 ยท (๐‘„โ†‘2))))
137 quartlem1.v . . . 4 (๐œ‘ โ†’ ๐‘‰ = ((-(2 ยท (๐‘ƒโ†‘3)) โˆ’ (27 ยท (๐‘„โ†‘2))) + (72 ยท (๐‘ƒ ยท ๐‘…))))
138134, 136, 1373eqtr4d 2782 . . 3 (๐œ‘ โ†’ ((-(2 ยท (๐‘ƒโ†‘3)) + (72 ยท (๐‘ƒ ยท ๐‘…))) + -(27 ยท (๐‘„โ†‘2))) = ๐‘‰)
139130, 138eqtr2d 2773 . 2 (๐œ‘ โ†’ ๐‘‰ = (((2 ยท ((2 ยท ๐‘ƒ)โ†‘3)) โˆ’ (9 ยท ((2 ยท ๐‘ƒ) ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…))))) + (27 ยท -(๐‘„โ†‘2))))
14051, 139jca 512 1 (๐œ‘ โ†’ (๐‘ˆ = (((2 ยท ๐‘ƒ)โ†‘2) โˆ’ (3 ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…)))) โˆง ๐‘‰ = (((2 ยท ((2 ยท ๐‘ƒ)โ†‘3)) โˆ’ (9 ยท ((2 ยท ๐‘ƒ) ยท ((๐‘ƒโ†‘2) โˆ’ (4 ยท ๐‘…))))) + (27 ยท -(๐‘„โ†‘2)))))
Colors of variables: wff setvar class
Syntax hints:   โ†’ wi 4   โˆง wa 396   = wceq 1541   โˆˆ wcel 2106  (class class class)co 7405  โ„‚cc 11104  1c1 11107   + caddc 11109   ยท cmul 11111   โˆ’ cmin 11440  -cneg 11441  2c2 12263  3c3 12264  4c4 12265  7c7 12268  8c8 12269  9c9 12270  โ„•0cn0 12468  cdc 12673  โ†‘cexp 14023
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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  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 theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-om 7852  df-2nd 7972  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-er 8699  df-en 8936  df-dom 8937  df-sdom 8938  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-5 12274  df-6 12275  df-7 12276  df-8 12277  df-9 12278  df-n0 12469  df-z 12555  df-dec 12674  df-uz 12819  df-seq 13963  df-exp 14024
This theorem is referenced by:  quart  26355
  Copyright terms: Public domain W3C validator