Metamath Proof Explorer


Theorem ostth2lem3

Description: Lemma for ostth2 . (Contributed by Mario Carneiro, 10-Sep-2014)

Ref Expression
Hypotheses qrng.q ⊢ Q = ℂ fld ↾ 𝑠 ℚ
qabsabv.a ⊢ A = AbsVal ⁡ Q
padic.j ⊢ J = q ∈ ℙ ⟼ x ∈ ℚ ⟼ if x = 0 0 q − q pCnt x
ostth.k ⊢ K = x ∈ ℚ ⟼ if x = 0 0 1
ostth.1 ⊢ φ → F ∈ A
ostth2.2 ⊢ φ → N ∈ ℤ ≥ 2
ostth2.3 ⊢ φ → 1 < F ⁡ N
ostth2.4 ⊢ R = log ⁡ F ⁡ N log ⁡ N
ostth2.5 ⊢ φ → M ∈ ℤ ≥ 2
ostth2.6 ⊢ S = log ⁡ F ⁡ M log ⁡ M
ostth2.7 ⊢ T = if F ⁡ M ≤ 1 1 F ⁡ M
ostth2.8 ⊢ U = log ⁡ N log ⁡ M
Assertion ostth2lem3 ⊢ φ ∧ X ∈ ℕ → F ⁡ N T U X ≤ X ⁢ M ⁢ T ⁢ U + 1

Proof

Step Hyp Ref Expression
1 qrng.q ⊢ Q = ℂ fld ↾ 𝑠 ℚ
2 qabsabv.a ⊢ A = AbsVal ⁡ Q
3 padic.j ⊢ J = q ∈ ℙ ⟼ x ∈ ℚ ⟼ if x = 0 0 q − q pCnt x
4 ostth.k ⊢ K = x ∈ ℚ ⟼ if x = 0 0 1
5 ostth.1 ⊢ φ → F ∈ A
6 ostth2.2 ⊢ φ → N ∈ ℤ ≥ 2
7 ostth2.3 ⊢ φ → 1 < F ⁡ N
8 ostth2.4 ⊢ R = log ⁡ F ⁡ N log ⁡ N
9 ostth2.5 ⊢ φ → M ∈ ℤ ≥ 2
10 ostth2.6 ⊢ S = log ⁡ F ⁡ M log ⁡ M
11 ostth2.7 ⊢ T = if F ⁡ M ≤ 1 1 F ⁡ M
12 ostth2.8 ⊢ U = log ⁡ N log ⁡ M
13 eluz2b2 ⊢ N ∈ ℤ ≥ 2 ↔ N ∈ ℕ ∧ 1 < N
14 6 13 sylib ⊢ φ → N ∈ ℕ ∧ 1 < N
15 14 simpld ⊢ φ → N ∈ ℕ
16 nnq ⊢ N ∈ ℕ → N ∈ ℚ
17 15 16 syl ⊢ φ → N ∈ ℚ
18 1 qrngbas ⊢ ℚ = Base Q
19 2 18 abvcl ⊢ F ∈ A ∧ N ∈ ℚ → F ⁡ N ∈ ℝ
20 5 17 19 syl2anc ⊢ φ → F ⁡ N ∈ ℝ
21 20 adantr ⊢ φ ∧ X ∈ ℕ → F ⁡ N ∈ ℝ
22 21 recnd ⊢ φ ∧ X ∈ ℕ → F ⁡ N ∈ ℂ
23 1re ⊢ 1 ∈ ℝ
24 eluz2b2 ⊢ M ∈ ℤ ≥ 2 ↔ M ∈ ℕ ∧ 1 < M
25 9 24 sylib ⊢ φ → M ∈ ℕ ∧ 1 < M
26 25 simpld ⊢ φ → M ∈ ℕ
27 nnq ⊢ M ∈ ℕ → M ∈ ℚ
28 26 27 syl ⊢ φ → M ∈ ℚ
29 2 18 abvcl ⊢ F ∈ A ∧ M ∈ ℚ → F ⁡ M ∈ ℝ
30 5 28 29 syl2anc ⊢ φ → F ⁡ M ∈ ℝ
31 ifcl ⊢ 1 ∈ ℝ ∧ F ⁡ M ∈ ℝ → if F ⁡ M ≤ 1 1 F ⁡ M ∈ ℝ
32 23 30 31 sylancr ⊢ φ → if F ⁡ M ≤ 1 1 F ⁡ M ∈ ℝ
33 11 32 eqeltrid ⊢ φ → T ∈ ℝ
34 33 adantr ⊢ φ ∧ X ∈ ℕ → T ∈ ℝ
35 0red ⊢ φ → 0 ∈ ℝ
36 1red ⊢ φ → 1 ∈ ℝ
37 0lt1 ⊢ 0 < 1
38 37 a1i ⊢ φ → 0 < 1
39 max2 ⊢ F ⁡ M ∈ ℝ ∧ 1 ∈ ℝ → 1 ≤ if F ⁡ M ≤ 1 1 F ⁡ M
40 30 36 39 syl2anc ⊢ φ → 1 ≤ if F ⁡ M ≤ 1 1 F ⁡ M
41 40 11 breqtrrdi ⊢ φ → 1 ≤ T
42 35 36 33 38 41 ltletrd ⊢ φ → 0 < T
43 42 adantr ⊢ φ ∧ X ∈ ℕ → 0 < T
44 34 43 elrpd ⊢ φ ∧ X ∈ ℕ → T ∈ ℝ +
45 44 rpge0d ⊢ φ ∧ X ∈ ℕ → 0 ≤ T
46 15 nnred ⊢ φ → N ∈ ℝ
47 14 simprd ⊢ φ → 1 < N
48 46 47 rplogcld ⊢ φ → log ⁡ N ∈ ℝ +
49 26 nnred ⊢ φ → M ∈ ℝ
50 25 simprd ⊢ φ → 1 < M
51 49 50 rplogcld ⊢ φ → log ⁡ M ∈ ℝ +
52 48 51 rpdivcld ⊢ φ → log ⁡ N log ⁡ M ∈ ℝ +
53 12 52 eqeltrid ⊢ φ → U ∈ ℝ +
54 53 rpred ⊢ φ → U ∈ ℝ
55 54 adantr ⊢ φ ∧ X ∈ ℕ → U ∈ ℝ
56 34 45 55 recxpcld ⊢ φ ∧ X ∈ ℕ → T U ∈ ℝ
57 56 recnd ⊢ φ ∧ X ∈ ℕ → T U ∈ ℂ
58 44 55 rpcxpcld ⊢ φ ∧ X ∈ ℕ → T U ∈ ℝ +
59 58 rpne0d ⊢ φ ∧ X ∈ ℕ → T U ≠ 0
60 nnnn0 ⊢ X ∈ ℕ → X ∈ ℕ 0
61 60 adantl ⊢ φ ∧ X ∈ ℕ → X ∈ ℕ 0
62 22 57 59 61 expdivd ⊢ φ ∧ X ∈ ℕ → F ⁡ N T U X = F ⁡ N X T U X
63 reexpcl ⊢ F ⁡ N ∈ ℝ ∧ X ∈ ℕ 0 → F ⁡ N X ∈ ℝ
64 20 60 63 syl2an ⊢ φ ∧ X ∈ ℕ → F ⁡ N X ∈ ℝ
65 26 adantr ⊢ φ ∧ X ∈ ℕ → M ∈ ℕ
66 65 nnred ⊢ φ ∧ X ∈ ℕ → M ∈ ℝ
67 nnre ⊢ X ∈ ℕ → X ∈ ℝ
68 67 adantl ⊢ φ ∧ X ∈ ℕ → X ∈ ℝ
69 68 55 remulcld ⊢ φ ∧ X ∈ ℕ → X ⁢ U ∈ ℝ
70 61 nn0ge0d ⊢ φ ∧ X ∈ ℕ → 0 ≤ X
71 53 rpge0d ⊢ φ → 0 ≤ U
72 71 adantr ⊢ φ ∧ X ∈ ℕ → 0 ≤ U
73 68 55 70 72 mulge0d ⊢ φ ∧ X ∈ ℕ → 0 ≤ X ⁢ U
74 flge0nn0 ⊢ X ⁢ U ∈ ℝ ∧ 0 ≤ X ⁢ U → X ⁢ U ∈ ℕ 0
75 69 73 74 syl2anc ⊢ φ ∧ X ∈ ℕ → X ⁢ U ∈ ℕ 0
76 peano2nn0 ⊢ X ⁢ U ∈ ℕ 0 → X ⁢ U + 1 ∈ ℕ 0
77 75 76 syl ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ∈ ℕ 0
78 77 nn0red ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ∈ ℝ
79 66 78 remulcld ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ∈ ℝ
80 34 77 reexpcld ⊢ φ ∧ X ∈ ℕ → T X ⁢ U + 1 ∈ ℝ
81 79 80 remulcld ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1 ∈ ℝ
82 peano2re ⊢ U ∈ ℝ → U + 1 ∈ ℝ
83 55 82 syl ⊢ φ ∧ X ∈ ℕ → U + 1 ∈ ℝ
84 68 83 remulcld ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ∈ ℝ
85 66 84 remulcld ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ∈ ℝ
86 56 61 reexpcld ⊢ φ ∧ X ∈ ℕ → T U X ∈ ℝ
87 86 34 remulcld ⊢ φ ∧ X ∈ ℕ → T U X ⁢ T ∈ ℝ
88 85 87 remulcld ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T U X ⁢ T ∈ ℝ
89 1 2 qabvexp ⊢ F ∈ A ∧ N ∈ ℚ ∧ X ∈ ℕ 0 → F ⁡ N X = F ⁡ N X
90 5 17 60 89 syl2an3an ⊢ φ ∧ X ∈ ℕ → F ⁡ N X = F ⁡ N X
91 68 recnd ⊢ φ ∧ X ∈ ℕ → X ∈ ℂ
92 48 rpred ⊢ φ → log ⁡ N ∈ ℝ
93 92 recnd ⊢ φ → log ⁡ N ∈ ℂ
94 93 adantr ⊢ φ ∧ X ∈ ℕ → log ⁡ N ∈ ℂ
95 51 rpred ⊢ φ → log ⁡ M ∈ ℝ
96 95 recnd ⊢ φ → log ⁡ M ∈ ℂ
97 96 adantr ⊢ φ ∧ X ∈ ℕ → log ⁡ M ∈ ℂ
98 51 adantr ⊢ φ ∧ X ∈ ℕ → log ⁡ M ∈ ℝ +
99 98 rpne0d ⊢ φ ∧ X ∈ ℕ → log ⁡ M ≠ 0
100 91 94 97 99 divassd ⊢ φ ∧ X ∈ ℕ → X ⁢ log ⁡ N log ⁡ M = X ⁢ log ⁡ N log ⁡ M
101 12 oveq2i ⊢ X ⁢ U = X ⁢ log ⁡ N log ⁡ M
102 100 101 eqtr4di ⊢ φ ∧ X ∈ ℕ → X ⁢ log ⁡ N log ⁡ M = X ⁢ U
103 102 oveq1d ⊢ φ ∧ X ∈ ℕ → X ⁢ log ⁡ N log ⁡ M ⁢ log ⁡ M = X ⁢ U ⁢ log ⁡ M
104 91 94 mulcld ⊢ φ ∧ X ∈ ℕ → X ⁢ log ⁡ N ∈ ℂ
105 104 97 99 divcan1d ⊢ φ ∧ X ∈ ℕ → X ⁢ log ⁡ N log ⁡ M ⁢ log ⁡ M = X ⁢ log ⁡ N
106 103 105 eqtr3d ⊢ φ ∧ X ∈ ℕ → X ⁢ U ⁢ log ⁡ M = X ⁢ log ⁡ N
107 flltp1 ⊢ X ⁢ U ∈ ℝ → X ⁢ U < X ⁢ U + 1
108 69 107 syl ⊢ φ ∧ X ∈ ℕ → X ⁢ U < X ⁢ U + 1
109 69 78 98 108 ltmul1dd ⊢ φ ∧ X ∈ ℕ → X ⁢ U ⁢ log ⁡ M < X ⁢ U + 1 ⁢ log ⁡ M
110 106 109 eqbrtrrd ⊢ φ ∧ X ∈ ℕ → X ⁢ log ⁡ N < X ⁢ U + 1 ⁢ log ⁡ M
111 92 adantr ⊢ φ ∧ X ∈ ℕ → log ⁡ N ∈ ℝ
112 68 111 remulcld ⊢ φ ∧ X ∈ ℕ → X ⁢ log ⁡ N ∈ ℝ
113 95 adantr ⊢ φ ∧ X ∈ ℕ → log ⁡ M ∈ ℝ
114 78 113 remulcld ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ⁢ log ⁡ M ∈ ℝ
115 eflt ⊢ X ⁢ log ⁡ N ∈ ℝ ∧ X ⁢ U + 1 ⁢ log ⁡ M ∈ ℝ → X ⁢ log ⁡ N < X ⁢ U + 1 ⁢ log ⁡ M ↔ e X ⁢ log ⁡ N < e X ⁢ U + 1 ⁢ log ⁡ M
116 112 114 115 syl2anc ⊢ φ ∧ X ∈ ℕ → X ⁢ log ⁡ N < X ⁢ U + 1 ⁢ log ⁡ M ↔ e X ⁢ log ⁡ N < e X ⁢ U + 1 ⁢ log ⁡ M
117 110 116 mpbid ⊢ φ ∧ X ∈ ℕ → e X ⁢ log ⁡ N < e X ⁢ U + 1 ⁢ log ⁡ M
118 15 nnrpd ⊢ φ → N ∈ ℝ +
119 nnz ⊢ X ∈ ℕ → X ∈ ℤ
120 reexplog ⊢ N ∈ ℝ + ∧ X ∈ ℤ → N X = e X ⁢ log ⁡ N
121 118 119 120 syl2an ⊢ φ ∧ X ∈ ℕ → N X = e X ⁢ log ⁡ N
122 65 nnrpd ⊢ φ ∧ X ∈ ℕ → M ∈ ℝ +
123 77 nn0zd ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ∈ ℤ
124 reexplog ⊢ M ∈ ℝ + ∧ X ⁢ U + 1 ∈ ℤ → M X ⁢ U + 1 = e X ⁢ U + 1 ⁢ log ⁡ M
125 122 123 124 syl2anc ⊢ φ ∧ X ∈ ℕ → M X ⁢ U + 1 = e X ⁢ U + 1 ⁢ log ⁡ M
126 117 121 125 3brtr4d ⊢ φ ∧ X ∈ ℕ → N X < M X ⁢ U + 1
127 nnexpcl ⊢ N ∈ ℕ ∧ X ∈ ℕ 0 → N X ∈ ℕ
128 15 60 127 syl2an ⊢ φ ∧ X ∈ ℕ → N X ∈ ℕ
129 65 77 nnexpcld ⊢ φ ∧ X ∈ ℕ → M X ⁢ U + 1 ∈ ℕ
130 nnltlem1 ⊢ N X ∈ ℕ ∧ M X ⁢ U + 1 ∈ ℕ → N X < M X ⁢ U + 1 ↔ N X ≤ M X ⁢ U + 1 − 1
131 128 129 130 syl2anc ⊢ φ ∧ X ∈ ℕ → N X < M X ⁢ U + 1 ↔ N X ≤ M X ⁢ U + 1 − 1
132 126 131 mpbid ⊢ φ ∧ X ∈ ℕ → N X ≤ M X ⁢ U + 1 − 1
133 128 nnnn0d ⊢ φ ∧ X ∈ ℕ → N X ∈ ℕ 0
134 nn0uz ⊢ ℕ 0 = ℤ ≥ 0
135 133 134 eleqtrdi ⊢ φ ∧ X ∈ ℕ → N X ∈ ℤ ≥ 0
136 129 nnzd ⊢ φ ∧ X ∈ ℕ → M X ⁢ U + 1 ∈ ℤ
137 peano2zm ⊢ M X ⁢ U + 1 ∈ ℤ → M X ⁢ U + 1 − 1 ∈ ℤ
138 136 137 syl ⊢ φ ∧ X ∈ ℕ → M X ⁢ U + 1 − 1 ∈ ℤ
139 elfz5 ⊢ N X ∈ ℤ ≥ 0 ∧ M X ⁢ U + 1 − 1 ∈ ℤ → N X ∈ 0 … M X ⁢ U + 1 − 1 ↔ N X ≤ M X ⁢ U + 1 − 1
140 135 138 139 syl2anc ⊢ φ ∧ X ∈ ℕ → N X ∈ 0 … M X ⁢ U + 1 − 1 ↔ N X ≤ M X ⁢ U + 1 − 1
141 132 140 mpbird ⊢ φ ∧ X ∈ ℕ → N X ∈ 0 … M X ⁢ U + 1 − 1
142 1 2 3 4 5 6 7 8 9 10 11 ostth2lem2 ⊢ φ ∧ X ⁢ U + 1 ∈ ℕ 0 ∧ N X ∈ 0 … M X ⁢ U + 1 − 1 → F ⁡ N X ≤ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1
143 142 3expia ⊢ φ ∧ X ⁢ U + 1 ∈ ℕ 0 → N X ∈ 0 … M X ⁢ U + 1 − 1 → F ⁡ N X ≤ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1
144 77 143 syldan ⊢ φ ∧ X ∈ ℕ → N X ∈ 0 … M X ⁢ U + 1 − 1 → F ⁡ N X ≤ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1
145 141 144 mpd ⊢ φ ∧ X ∈ ℕ → F ⁡ N X ≤ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1
146 90 145 eqbrtrrd ⊢ φ ∧ X ∈ ℕ → F ⁡ N X ≤ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1
147 85 80 remulcld ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1 ∈ ℝ
148 peano2re ⊢ X ⁢ U ∈ ℝ → X ⁢ U + 1 ∈ ℝ
149 69 148 syl ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ∈ ℝ
150 75 nn0red ⊢ φ ∧ X ∈ ℕ → X ⁢ U ∈ ℝ
151 1red ⊢ φ ∧ X ∈ ℕ → 1 ∈ ℝ
152 flle ⊢ X ⁢ U ∈ ℝ → X ⁢ U ≤ X ⁢ U
153 69 152 syl ⊢ φ ∧ X ∈ ℕ → X ⁢ U ≤ X ⁢ U
154 150 69 151 153 leadd1dd ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ≤ X ⁢ U + 1
155 nnge1 ⊢ X ∈ ℕ → 1 ≤ X
156 155 adantl ⊢ φ ∧ X ∈ ℕ → 1 ≤ X
157 151 68 69 156 leadd2dd ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ≤ X ⁢ U + X
158 55 recnd ⊢ φ ∧ X ∈ ℕ → U ∈ ℂ
159 151 recnd ⊢ φ ∧ X ∈ ℕ → 1 ∈ ℂ
160 91 158 159 adddid ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 = X ⁢ U + X ⋅ 1
161 91 mulridd ⊢ φ ∧ X ∈ ℕ → X ⋅ 1 = X
162 161 oveq2d ⊢ φ ∧ X ∈ ℕ → X ⁢ U + X ⋅ 1 = X ⁢ U + X
163 160 162 eqtrd ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 = X ⁢ U + X
164 157 163 breqtrrd ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ≤ X ⁢ U + 1
165 78 149 84 154 164 letrd ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ≤ X ⁢ U + 1
166 65 nngt0d ⊢ φ ∧ X ∈ ℕ → 0 < M
167 lemul2 ⊢ X ⁢ U + 1 ∈ ℝ ∧ X ⁢ U + 1 ∈ ℝ ∧ M ∈ ℝ ∧ 0 < M → X ⁢ U + 1 ≤ X ⁢ U + 1 ↔ M ⁢ X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1
168 78 84 66 166 167 syl112anc ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ≤ X ⁢ U + 1 ↔ M ⁢ X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1
169 165 168 mpbid ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1
170 expgt0 ⊢ T ∈ ℝ ∧ X ⁢ U + 1 ∈ ℤ ∧ 0 < T → 0 < T X ⁢ U + 1
171 34 123 43 170 syl3anc ⊢ φ ∧ X ∈ ℕ → 0 < T X ⁢ U + 1
172 lemul1 ⊢ M ⁢ X ⁢ U + 1 ∈ ℝ ∧ M ⁢ X ⁢ U + 1 ∈ ℝ ∧ T X ⁢ U + 1 ∈ ℝ ∧ 0 < T X ⁢ U + 1 → M ⁢ X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1 ↔ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1
173 79 85 80 171 172 syl112anc ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1 ↔ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1
174 169 173 mpbid ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1
175 34 recnd ⊢ φ ∧ X ∈ ℕ → T ∈ ℂ
176 175 75 expp1d ⊢ φ ∧ X ∈ ℕ → T X ⁢ U + 1 = T X ⁢ U ⁢ T
177 41 adantr ⊢ φ ∧ X ∈ ℕ → 1 ≤ T
178 remulcl ⊢ U ∈ ℝ ∧ X ∈ ℝ → U ⁢ X ∈ ℝ
179 54 67 178 syl2an ⊢ φ ∧ X ∈ ℕ → U ⁢ X ∈ ℝ
180 91 158 mulcomd ⊢ φ ∧ X ∈ ℕ → X ⁢ U = U ⁢ X
181 153 180 breqtrd ⊢ φ ∧ X ∈ ℕ → X ⁢ U ≤ U ⁢ X
182 34 177 150 179 181 cxplead ⊢ φ ∧ X ∈ ℕ → T X ⁢ U ≤ T U ⁢ X
183 cxpexp ⊢ T ∈ ℂ ∧ X ⁢ U ∈ ℕ 0 → T X ⁢ U = T X ⁢ U
184 175 75 183 syl2anc ⊢ φ ∧ X ∈ ℕ → T X ⁢ U = T X ⁢ U
185 44 55 91 cxpmuld ⊢ φ ∧ X ∈ ℕ → T U ⁢ X = T U X
186 cxpexp ⊢ T U ∈ ℂ ∧ X ∈ ℕ 0 → T U X = T U X
187 57 61 186 syl2anc ⊢ φ ∧ X ∈ ℕ → T U X = T U X
188 185 187 eqtrd ⊢ φ ∧ X ∈ ℕ → T U ⁢ X = T U X
189 182 184 188 3brtr3d ⊢ φ ∧ X ∈ ℕ → T X ⁢ U ≤ T U X
190 34 75 reexpcld ⊢ φ ∧ X ∈ ℕ → T X ⁢ U ∈ ℝ
191 190 86 44 lemul1d ⊢ φ ∧ X ∈ ℕ → T X ⁢ U ≤ T U X ↔ T X ⁢ U ⁢ T ≤ T U X ⁢ T
192 189 191 mpbid ⊢ φ ∧ X ∈ ℕ → T X ⁢ U ⁢ T ≤ T U X ⁢ T
193 176 192 eqbrtrd ⊢ φ ∧ X ∈ ℕ → T X ⁢ U + 1 ≤ T U X ⁢ T
194 nngt0 ⊢ X ∈ ℕ → 0 < X
195 194 adantl ⊢ φ ∧ X ∈ ℕ → 0 < X
196 0red ⊢ φ ∧ X ∈ ℕ → 0 ∈ ℝ
197 53 adantr ⊢ φ ∧ X ∈ ℕ → U ∈ ℝ +
198 197 rpgt0d ⊢ φ ∧ X ∈ ℕ → 0 < U
199 55 ltp1d ⊢ φ ∧ X ∈ ℕ → U < U + 1
200 196 55 83 198 199 lttrd ⊢ φ ∧ X ∈ ℕ → 0 < U + 1
201 68 83 195 200 mulgt0d ⊢ φ ∧ X ∈ ℕ → 0 < X ⁢ U + 1
202 66 84 166 201 mulgt0d ⊢ φ ∧ X ∈ ℕ → 0 < M ⁢ X ⁢ U + 1
203 lemul2 ⊢ T X ⁢ U + 1 ∈ ℝ ∧ T U X ⁢ T ∈ ℝ ∧ M ⁢ X ⁢ U + 1 ∈ ℝ ∧ 0 < M ⁢ X ⁢ U + 1 → T X ⁢ U + 1 ≤ T U X ⁢ T ↔ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1 ⁢ T U X ⁢ T
204 80 87 85 202 203 syl112anc ⊢ φ ∧ X ∈ ℕ → T X ⁢ U + 1 ≤ T U X ⁢ T ↔ M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1 ⁢ T U X ⁢ T
205 193 204 mpbid ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1 ⁢ T U X ⁢ T
206 81 147 88 174 205 letrd ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T X ⁢ U + 1 ≤ M ⁢ X ⁢ U + 1 ⁢ T U X ⁢ T
207 64 81 88 146 206 letrd ⊢ φ ∧ X ∈ ℕ → F ⁡ N X ≤ M ⁢ X ⁢ U + 1 ⁢ T U X ⁢ T
208 85 recnd ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ∈ ℂ
209 86 recnd ⊢ φ ∧ X ∈ ℕ → T U X ∈ ℂ
210 208 209 175 mul12d ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T U X ⁢ T = T U X ⁢ M ⁢ X ⁢ U + 1 ⁢ T
211 66 recnd ⊢ φ ∧ X ∈ ℕ → M ∈ ℂ
212 84 recnd ⊢ φ ∧ X ∈ ℕ → X ⁢ U + 1 ∈ ℂ
213 211 212 175 mul32d ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T = M ⁢ T ⁢ X ⁢ U + 1
214 211 175 mulcld ⊢ φ ∧ X ∈ ℕ → M ⁢ T ∈ ℂ
215 83 recnd ⊢ φ ∧ X ∈ ℕ → U + 1 ∈ ℂ
216 214 91 215 mul12d ⊢ φ ∧ X ∈ ℕ → M ⁢ T ⁢ X ⁢ U + 1 = X ⁢ M ⁢ T ⁢ U + 1
217 213 216 eqtrd ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T = X ⁢ M ⁢ T ⁢ U + 1
218 217 oveq2d ⊢ φ ∧ X ∈ ℕ → T U X ⁢ M ⁢ X ⁢ U + 1 ⁢ T = T U X ⁢ X ⁢ M ⁢ T ⁢ U + 1
219 210 218 eqtrd ⊢ φ ∧ X ∈ ℕ → M ⁢ X ⁢ U + 1 ⁢ T U X ⁢ T = T U X ⁢ X ⁢ M ⁢ T ⁢ U + 1
220 207 219 breqtrd ⊢ φ ∧ X ∈ ℕ → F ⁡ N X ≤ T U X ⁢ X ⁢ M ⁢ T ⁢ U + 1
221 66 34 remulcld ⊢ φ ∧ X ∈ ℕ → M ⁢ T ∈ ℝ
222 221 83 remulcld ⊢ φ ∧ X ∈ ℕ → M ⁢ T ⁢ U + 1 ∈ ℝ
223 68 222 remulcld ⊢ φ ∧ X ∈ ℕ → X ⁢ M ⁢ T ⁢ U + 1 ∈ ℝ
224 119 adantl ⊢ φ ∧ X ∈ ℕ → X ∈ ℤ
225 58 224 rpexpcld ⊢ φ ∧ X ∈ ℕ → T U X ∈ ℝ +
226 64 223 225 ledivmuld ⊢ φ ∧ X ∈ ℕ → F ⁡ N X T U X ≤ X ⁢ M ⁢ T ⁢ U + 1 ↔ F ⁡ N X ≤ T U X ⁢ X ⁢ M ⁢ T ⁢ U + 1
227 220 226 mpbird ⊢ φ ∧ X ∈ ℕ → F ⁡ N X T U X ≤ X ⁢ M ⁢ T ⁢ U + 1
228 62 227 eqbrtrd ⊢ φ ∧ X ∈ ℕ → F ⁡ N T U X ≤ X ⁢ M ⁢ T ⁢ U + 1