Metamath Proof Explorer


Theorem quadfac

Description: The solution of a quadratic equation via factoring. (Contributed by Luke Murphy, 10-Jul-2026)

Ref Expression
Hypotheses quadfac.a φ A
quadfac.z φ A 0
quadfac.b φ B
quadfac.c φ C
quadfac.x φ X
quadfac.m φ M
quadfac.n φ N
quadfac.mpn φ M + N = B A
quadfac.mtn φ M N = C A
Assertion quadfac φ A X 2 + B X + C = 0 X = M X = N

Proof

Step Hyp Ref Expression
1 quadfac.a φ A
2 quadfac.z φ A 0
3 quadfac.b φ B
4 quadfac.c φ C
5 quadfac.x φ X
6 quadfac.m φ M
7 quadfac.n φ N
8 quadfac.mpn φ M + N = B A
9 quadfac.mtn φ M N = C A
10 5 6 subcld φ X M
11 5 7 subcld φ X N
12 10 11 mul0ord φ X M X N = 0 X M = 0 X N = 0
13 olc X 2 + C A + B A X = 0 A = 0 X 2 + C A + B A X = 0
14 2 neneqd φ ¬ A = 0
15 id A = 0 A = 0
16 falim A = 0
17 15 16 pm5.21ni ¬ A = 0 A = 0
18 14 17 syl φ A = 0
19 18 orbi1d φ A = 0 X 2 + C A + B A X = 0 X 2 + C A + B A X = 0
20 falim X 2 + C A + B A X = 0
21 id X 2 + C A + B A X = 0 X 2 + C A + B A X = 0
22 20 21 jaoi X 2 + C A + B A X = 0 X 2 + C A + B A X = 0
23 22 a1i φ X 2 + C A + B A X = 0 X 2 + C A + B A X = 0
24 19 23 sylbid φ A = 0 X 2 + C A + B A X = 0 X 2 + C A + B A X = 0
25 13 24 impbid2 φ X 2 + C A + B A X = 0 A = 0 X 2 + C A + B A X = 0
26 5 6 5 7 mulsubd φ X M X N = X X + N M - X N + X M
27 5 sqvald φ X 2 = X X
28 27 eqcomd φ X X = X 2
29 6 7 mulcomd φ M N = N M
30 29 9 eqtr3d φ N M = C A
31 28 30 oveq12d φ X X + N M = X 2 + C A
32 7 6 addcomd φ N + M = M + N
33 32 oveq1d φ N + M X = M + N X
34 7 5 mulcomd φ N X = X N
35 6 5 mulcomd φ M X = X M
36 34 35 oveq12d φ N X + M X = X N + X M
37 7 5 6 36 joinlmuladdmuld φ N + M X = X N + X M
38 8 oveq1d φ M + N X = B A X
39 33 37 38 3eqtr3d φ X N + X M = B A X
40 31 39 oveq12d φ X X + N M - X N + X M = X 2 + C A - B A X
41 26 40 eqtrd φ X M X N = X 2 + C A - B A X
42 41 eqeq1d φ X M X N = 0 X 2 + C A - B A X = 0
43 3 1 2 divcld φ B A
44 43 5 mulneg1d φ B A X = B A X
45 44 oveq2d φ X 2 + C A - B A X = X 2 + C A - B A X
46 45 eqeq1d φ X 2 + C A - B A X = 0 X 2 + C A - B A X = 0
47 5 sqcld φ X 2
48 4 1 2 divcld φ C A
49 47 48 addcld φ X 2 + C A
50 43 5 mulcld φ B A X
51 49 50 subnegd φ X 2 + C A - B A X = X 2 + C A + B A X
52 51 eqeq1d φ X 2 + C A - B A X = 0 X 2 + C A + B A X = 0
53 42 46 52 3bitrd φ X M X N = 0 X 2 + C A + B A X = 0
54 49 50 addcld φ X 2 + C A + B A X
55 1 54 mul0ord φ A X 2 + C A + B A X = 0 A = 0 X 2 + C A + B A X = 0
56 25 53 55 3bitr4d φ X M X N = 0 A X 2 + C A + B A X = 0
57 1 49 50 adddid φ A X 2 + C A + B A X = A X 2 + C A + A B A X
58 57 eqeq1d φ A X 2 + C A + B A X = 0 A X 2 + C A + A B A X = 0
59 1 47 48 adddid φ A X 2 + C A = A X 2 + A C A
60 4 1 2 divcan2d φ A C A = C
61 60 oveq2d φ A X 2 + A C A = A X 2 + C
62 59 61 eqtrd φ A X 2 + C A = A X 2 + C
63 1 43 5 mulassd φ A B A X = A B A X
64 3 1 2 divcan2d φ A B A = B
65 64 oveq1d φ A B A X = B X
66 63 65 eqtr3d φ A B A X = B X
67 62 66 oveq12d φ A X 2 + C A + A B A X = A X 2 + C + B X
68 67 eqeq1d φ A X 2 + C A + A B A X = 0 A X 2 + C + B X = 0
69 56 58 68 3bitrd φ X M X N = 0 A X 2 + C + B X = 0
70 1 47 mulcld φ A X 2
71 3 5 mulcld φ B X
72 70 4 71 addassd φ A X 2 + C + B X = A X 2 + C + B X
73 72 eqeq1d φ A X 2 + C + B X = 0 A X 2 + C + B X = 0
74 4 71 addcomd φ C + B X = B X + C
75 74 oveq2d φ A X 2 + C + B X = A X 2 + B X + C
76 75 eqeq1d φ A X 2 + C + B X = 0 A X 2 + B X + C = 0
77 69 73 76 3bitrd φ X M X N = 0 A X 2 + B X + C = 0
78 5 6 subeq0ad φ X M = 0 X = M
79 5 7 subeq0ad φ X N = 0 X = N
80 78 79 orbi12d φ X M = 0 X N = 0 X = M X = N
81 12 77 80 3bitr3d φ A X 2 + B X + C = 0 X = M X = N