Metamath Proof Explorer


Theorem jm2.17c

Description: Second half of lemma 2.17 of JonesMatijasevic p. 696. (Contributed by Stefan O'Rear, 15-Oct-2014)

Ref Expression
Assertion jm2.17c A 2 N A Y rm N + 1 + 1 < 2 A N + 1

Proof

Step Hyp Ref Expression
1 2re 2
2 eluzelre A 2 A
3 2 adantr A 2 N A
4 remulcl 2 A 2 A
5 1 3 4 sylancr A 2 N 2 A
6 nnz N N
7 6 adantl A 2 N N
8 7 peano2zd A 2 N N + 1
9 frmy Y rm : 2 ×
10 9 fovcl A 2 N + 1 A Y rm N + 1
11 10 zred A 2 N + 1 A Y rm N + 1
12 8 11 syldan A 2 N A Y rm N + 1
13 5 12 remulcld A 2 N 2 A A Y rm N + 1
14 nncn N N
15 14 adantl A 2 N N
16 ax-1cn 1
17 pncan N 1 N + 1 - 1 = N
18 15 16 17 sylancl A 2 N N + 1 - 1 = N
19 18 oveq2d A 2 N A Y rm N + 1 - 1 = A Y rm N
20 9 fovcl A 2 N A Y rm N
21 20 zred A 2 N A Y rm N
22 6 21 sylan2 A 2 N A Y rm N
23 19 22 eqeltrd A 2 N A Y rm N + 1 - 1
24 13 23 resubcld A 2 N 2 A A Y rm N + 1 A Y rm N + 1 - 1
25 nnnn0 N N 0
26 25 adantl A 2 N N 0
27 5 26 reexpcld A 2 N 2 A N
28 5 27 remulcld A 2 N 2 A 2 A N
29 rmy0 A 2 A Y rm 0 = 0
30 29 adantr A 2 N A Y rm 0 = 0
31 nngt0 N 0 < N
32 31 adantl A 2 N 0 < N
33 simpl A 2 N A 2
34 0zd A 2 N 0
35 ltrmy A 2 0 N 0 < N A Y rm 0 < A Y rm N
36 33 34 7 35 syl3anc A 2 N 0 < N A Y rm 0 < A Y rm N
37 32 36 mpbid A 2 N A Y rm 0 < A Y rm N
38 30 37 eqbrtrrd A 2 N 0 < A Y rm N
39 38 19 breqtrrd A 2 N 0 < A Y rm N + 1 - 1
40 23 13 ltsubposd A 2 N 0 < A Y rm N + 1 - 1 2 A A Y rm N + 1 A Y rm N + 1 - 1 < 2 A A Y rm N + 1
41 39 40 mpbid A 2 N 2 A A Y rm N + 1 A Y rm N + 1 - 1 < 2 A A Y rm N + 1
42 jm2.17b A 2 N 0 A Y rm N + 1 2 A N
43 25 42 sylan2 A 2 N A Y rm N + 1 2 A N
44 2nn 2
45 eluz2nn A 2 A
46 nnmulcl 2 A 2 A
47 44 45 46 sylancr A 2 2 A
48 47 nngt0d A 2 0 < 2 A
49 48 adantr A 2 N 0 < 2 A
50 lemul2 A Y rm N + 1 2 A N 2 A 0 < 2 A A Y rm N + 1 2 A N 2 A A Y rm N + 1 2 A 2 A N
51 12 27 5 49 50 syl112anc A 2 N A Y rm N + 1 2 A N 2 A A Y rm N + 1 2 A 2 A N
52 43 51 mpbid A 2 N 2 A A Y rm N + 1 2 A 2 A N
53 24 13 28 41 52 ltletrd A 2 N 2 A A Y rm N + 1 A Y rm N + 1 - 1 < 2 A 2 A N
54 rmyluc2 A 2 N + 1 A Y rm N + 1 + 1 = 2 A A Y rm N + 1 A Y rm N + 1 - 1
55 8 54 syldan A 2 N A Y rm N + 1 + 1 = 2 A A Y rm N + 1 A Y rm N + 1 - 1
56 5 recnd A 2 N 2 A
57 56 26 expp1d A 2 N 2 A N + 1 = 2 A N 2 A
58 27 recnd A 2 N 2 A N
59 58 56 mulcomd A 2 N 2 A N 2 A = 2 A 2 A N
60 57 59 eqtrd A 2 N 2 A N + 1 = 2 A 2 A N
61 53 55 60 3brtr4d A 2 N A Y rm N + 1 + 1 < 2 A N + 1