Metamath Proof Explorer


Theorem qirropth

Description: This lemma implements the concept of "equate rational and irrational parts", used to prove many arithmetical properties of the X and Y sequences. (Contributed by Stefan O'Rear, 21-Sep-2014)

Ref Expression
Assertion qirropth A B C D E B + A C = D + A E B = D C = E

Proof

Step Hyp Ref Expression
1 eldifn A ¬ A
2 1 3ad2ant1 A B C D E ¬ A
3 2 adantr A B C D E B + A C = D + A E ¬ A
4 simpll1 A B C D E B + A C = D + A E ¬ C = E A
5 4 eldifad A B C D E B + A C = D + A E ¬ C = E A
6 simp2r A B C D E C
7 6 ad2antrr A B C D E B + A C = D + A E ¬ C = E C
8 qcn C C
9 7 8 syl A B C D E B + A C = D + A E ¬ C = E C
10 simp3r A B C D E E
11 10 ad2antrr A B C D E B + A C = D + A E ¬ C = E E
12 qcn E E
13 11 12 syl A B C D E B + A C = D + A E ¬ C = E E
14 5 9 13 subdid A B C D E B + A C = D + A E ¬ C = E A C E = A C A E
15 qsubcl C E C E
16 7 11 15 syl2anc A B C D E B + A C = D + A E ¬ C = E C E
17 qcn C E C E
18 16 17 syl A B C D E B + A C = D + A E ¬ C = E C E
19 18 5 mulcomd A B C D E B + A C = D + A E ¬ C = E C E A = A C E
20 simplr A B C D E B + A C = D + A E ¬ C = E B + A C = D + A E
21 simp2l A B C D E B
22 21 ad2antrr A B C D E B + A C = D + A E ¬ C = E B
23 qcn B B
24 22 23 syl A B C D E B + A C = D + A E ¬ C = E B
25 5 9 mulcld A B C D E B + A C = D + A E ¬ C = E A C
26 simp3l A B C D E D
27 26 ad2antrr A B C D E B + A C = D + A E ¬ C = E D
28 qcn D D
29 27 28 syl A B C D E B + A C = D + A E ¬ C = E D
30 5 13 mulcld A B C D E B + A C = D + A E ¬ C = E A E
31 24 25 29 30 addsubeq4d A B C D E B + A C = D + A E ¬ C = E B + A C = D + A E D B = A C A E
32 20 31 mpbid A B C D E B + A C = D + A E ¬ C = E D B = A C A E
33 14 19 32 3eqtr4d A B C D E B + A C = D + A E ¬ C = E C E A = D B
34 qsubcl D B D B
35 27 22 34 syl2anc A B C D E B + A C = D + A E ¬ C = E D B
36 qcn D B D B
37 35 36 syl A B C D E B + A C = D + A E ¬ C = E D B
38 simpr A B C D E B + A C = D + A E ¬ C = E ¬ C = E
39 subeq0 C E C E = 0 C = E
40 39 necon3abid C E C E 0 ¬ C = E
41 9 13 40 syl2anc A B C D E B + A C = D + A E ¬ C = E C E 0 ¬ C = E
42 38 41 mpbird A B C D E B + A C = D + A E ¬ C = E C E 0
43 37 18 5 42 divmuld A B C D E B + A C = D + A E ¬ C = E D B C E = A C E A = D B
44 33 43 mpbird A B C D E B + A C = D + A E ¬ C = E D B C E = A
45 qdivcl D B C E C E 0 D B C E
46 35 16 42 45 syl3anc A B C D E B + A C = D + A E ¬ C = E D B C E
47 44 46 eqeltrrd A B C D E B + A C = D + A E ¬ C = E A
48 47 ex A B C D E B + A C = D + A E ¬ C = E A
49 3 48 mt3d A B C D E B + A C = D + A E C = E
50 simpl2l A B C D E B + A C = D + A E B
51 50 23 syl A B C D E B + A C = D + A E B
52 51 adantr A B C D E B + A C = D + A E C = E B
53 simpl3l A B C D E B + A C = D + A E D
54 53 28 syl A B C D E B + A C = D + A E D
55 54 adantr A B C D E B + A C = D + A E C = E D
56 simpl1 A B C D E B + A C = D + A E A
57 56 eldifad A B C D E B + A C = D + A E A
58 simpl3r A B C D E B + A C = D + A E E
59 58 12 syl A B C D E B + A C = D + A E E
60 57 59 mulcld A B C D E B + A C = D + A E A E
61 60 adantr A B C D E B + A C = D + A E C = E A E
62 simpr A B C D E B + A C = D + A E C = E C = E
63 62 eqcomd A B C D E B + A C = D + A E C = E E = C
64 63 oveq2d A B C D E B + A C = D + A E C = E A E = A C
65 64 oveq2d A B C D E B + A C = D + A E C = E B + A E = B + A C
66 simplr A B C D E B + A C = D + A E C = E B + A C = D + A E
67 65 66 eqtrd A B C D E B + A C = D + A E C = E B + A E = D + A E
68 52 55 61 67 addcan2ad A B C D E B + A C = D + A E C = E B = D
69 68 ex A B C D E B + A C = D + A E C = E B = D
70 49 69 jcai A B C D E B + A C = D + A E C = E B = D
71 70 ancomd A B C D E B + A C = D + A E B = D C = E
72 71 ex A B C D E B + A C = D + A E B = D C = E
73 id B = D B = D
74 oveq2 C = E A C = A E
75 73 74 oveqan12d B = D C = E B + A C = D + A E
76 72 75 impbid1 A B C D E B + A C = D + A E B = D C = E