Metamath Proof Explorer


Theorem jm2.24

Description: Lemma 2.24 of JonesMatijasevic p. 697 extended to ZZ . Could be eliminated with a more careful proof of jm2.26lem3 . (Contributed by Stefan O'Rear, 3-Oct-2014)

Ref Expression
Assertion jm2.24 A 2 N A Y rm N 1 + A Y rm N < A X rm N

Proof

Step Hyp Ref Expression
1 simpll A 2 N N 0 A 2
2 peano2zm N N 1
3 2 ad2antlr A 2 N N 0 N 1
4 frmy Y rm : 2 ×
5 4 fovcl A 2 N 1 A Y rm N 1
6 1 3 5 syl2anc A 2 N N 0 A Y rm N 1
7 6 zred A 2 N N 0 A Y rm N 1
8 4 fovcl A 2 N A Y rm N
9 8 zred A 2 N A Y rm N
10 9 adantr A 2 N N 0 A Y rm N
11 7 10 readdcld A 2 N N 0 A Y rm N 1 + A Y rm N
12 0red A 2 N N 0 0
13 frmx X rm : 2 × 0
14 13 fovcl A 2 N A X rm N 0
15 14 adantr A 2 N N 0 A X rm N 0
16 15 nn0red A 2 N N 0 A X rm N
17 znegcl N N
18 17 ad2antlr A 2 N N 0 N
19 18 peano2zd A 2 N N 0 - N + 1
20 4 fovcl A 2 - N + 1 A Y rm - N + 1
21 1 19 20 syl2anc A 2 N N 0 A Y rm - N + 1
22 21 zred A 2 N N 0 A Y rm - N + 1
23 4 fovcl A 2 N A Y rm -N
24 1 18 23 syl2anc A 2 N N 0 A Y rm -N
25 24 zred A 2 N N 0 A Y rm -N
26 rmy0 A 2 A Y rm 0 = 0
27 26 ad2antrr A 2 N N 0 A Y rm 0 = 0
28 simpr A 2 N N 0 N 0
29 zre N N
30 29 ad2antlr A 2 N N 0 N
31 30 le0neg1d A 2 N N 0 N 0 0 N
32 28 31 mpbid A 2 N N 0 0 N
33 0zd A 2 N N 0 0
34 zleltp1 0 N 0 N 0 < - N + 1
35 33 18 34 syl2anc A 2 N N 0 0 N 0 < - N + 1
36 32 35 mpbid A 2 N N 0 0 < - N + 1
37 ltrmy A 2 0 - N + 1 0 < - N + 1 A Y rm 0 < A Y rm - N + 1
38 1 33 19 37 syl3anc A 2 N N 0 0 < - N + 1 A Y rm 0 < A Y rm - N + 1
39 36 38 mpbid A 2 N N 0 A Y rm 0 < A Y rm - N + 1
40 27 39 eqbrtrrd A 2 N N 0 0 < A Y rm - N + 1
41 lermy A 2 0 N 0 N A Y rm 0 A Y rm -N
42 1 33 18 41 syl3anc A 2 N N 0 0 N A Y rm 0 A Y rm -N
43 32 42 mpbid A 2 N N 0 A Y rm 0 A Y rm -N
44 27 43 eqbrtrrd A 2 N N 0 0 A Y rm -N
45 22 25 40 44 addgtge0d A 2 N N 0 0 < A Y rm - N + 1 + A Y rm -N
46 7 recnd A 2 N N 0 A Y rm N 1
47 10 recnd A 2 N N 0 A Y rm N
48 46 47 negdid A 2 N N 0 A Y rm N 1 + A Y rm N = - A Y rm N 1 + A Y rm N
49 rmyneg A 2 N 1 A Y rm N 1 = A Y rm N 1
50 1 3 49 syl2anc A 2 N N 0 A Y rm N 1 = A Y rm N 1
51 rmyneg A 2 N A Y rm -N = A Y rm N
52 51 adantr A 2 N N 0 A Y rm -N = A Y rm N
53 50 52 oveq12d A 2 N N 0 A Y rm N 1 + A Y rm -N = - A Y rm N 1 + A Y rm N
54 zcn N N
55 54 ad2antlr A 2 N N 0 N
56 ax-1cn 1
57 negsubdi N 1 N 1 = - N + 1
58 55 56 57 sylancl A 2 N N 0 N 1 = - N + 1
59 58 oveq2d A 2 N N 0 A Y rm N 1 = A Y rm - N + 1
60 59 oveq1d A 2 N N 0 A Y rm N 1 + A Y rm -N = A Y rm - N + 1 + A Y rm -N
61 48 53 60 3eqtr2d A 2 N N 0 A Y rm N 1 + A Y rm N = A Y rm - N + 1 + A Y rm -N
62 45 61 breqtrrd A 2 N N 0 0 < A Y rm N 1 + A Y rm N
63 11 lt0neg1d A 2 N N 0 A Y rm N 1 + A Y rm N < 0 0 < A Y rm N 1 + A Y rm N
64 62 63 mpbird A 2 N N 0 A Y rm N 1 + A Y rm N < 0
65 15 nn0ge0d A 2 N N 0 0 A X rm N
66 11 12 16 64 65 ltletrd A 2 N N 0 A Y rm N 1 + A Y rm N < A X rm N
67 simpll A 2 N 0 < N A 2
68 elnnz N N 0 < N
69 68 biimpri N 0 < N N
70 69 adantll A 2 N 0 < N N
71 jm2.24nn A 2 N A Y rm N 1 + A Y rm N < A X rm N
72 67 70 71 syl2anc A 2 N 0 < N A Y rm N 1 + A Y rm N < A X rm N
73 29 adantl A 2 N N
74 0re 0
75 lelttric N 0 N 0 0 < N
76 73 74 75 sylancl A 2 N N 0 0 < N
77 66 72 76 mpjaodan A 2 N A Y rm N 1 + A Y rm N < A X rm N