Step
*
1
1
3
of Lemma
near-log-exists
1. a : {a:ℝ| r1 ≤ a} 
2. N : ℕ+
3. b : ℕ+
4. a ≤ r(b)
5. r1 ≤ a
6. r0 < r1
7. (r1 + r(b)) ≤ e^r(b)
8. c : {2...}
9. e^r(b) ≤ r(c)
10. M : {2...}
11. M = (N * c) ∈ {2...}
⊢ a ≤ e^(r(b))/1
BY
{ ((Assert (r(b))/1 = r(b) BY
          ((RWO "int-rdiv-req" 0 THENA Auto) THEN nRMul ⌜r1⌝ 0⋅ THEN Auto))
   THEN RWO  "-1" 0
   THEN Auto) }
1
1. a : {a:ℝ| r1 ≤ a} 
2. N : ℕ+
3. b : ℕ+
4. a ≤ r(b)
5. r1 ≤ a
6. r0 < r1
7. (r1 + r(b)) ≤ e^r(b)
8. c : {2...}
9. e^r(b) ≤ r(c)
10. M : {2...}
11. M = (N * c) ∈ {2...}
12. (r(b))/1 = r(b)
⊢ a ≤ e^r(b)
Latex:
Latex:
1.  a  :  \{a:\mBbbR{}|  r1  \mleq{}  a\} 
2.  N  :  \mBbbN{}\msupplus{}
3.  b  :  \mBbbN{}\msupplus{}
4.  a  \mleq{}  r(b)
5.  r1  \mleq{}  a
6.  r0  <  r1
7.  (r1  +  r(b))  \mleq{}  e\^{}r(b)
8.  c  :  \{2...\}
9.  e\^{}r(b)  \mleq{}  r(c)
10.  M  :  \{2...\}
11.  M  =  (N  *  c)
\mvdash{}  a  \mleq{}  e\^{}(r(b))/1
By
Latex:
((Assert  (r(b))/1  =  r(b)  BY
                ((RWO  "int-rdiv-req"  0  THENA  Auto)  THEN  nRMul  \mkleeneopen{}r1\mkleeneclose{}  0\mcdot{}  THEN  Auto))
  THEN  RWO    "-1"  0
  THEN  Auto)
Home
Index