Step
*
1
of Lemma
rnexp-req
1. k : {1...}
2. k ≠ 0
3. x : ℝ
4. (k - 1) = 0 ∈ ℤ
⊢ bdd-diff(accelerate((k * ((canon-bnd(x)^k - 1 ÷ 2^k - 1) + 1)) + 1;reg-seq-nexp(x;k));reg-seq-mul(x;r1))
BY
{ (Subst ⌜k ~ 1⌝ 0⋅
   THEN Auto
   THEN (RWO "accelerate-bdd-diff" 0 THENA (Auto THEN Try ((RWO "exp-fastexp<" 0 THEN Auto))))) }
1
1. k : {1...}
2. k ≠ 0
3. x : ℝ
4. (k - 1) = 0 ∈ ℤ
⊢ bdd-diff(reg-seq-nexp(x;1);reg-seq-mul(x;r1))
Latex:
Latex:
1.  k  :  \{1...\}
2.  k  \mneq{}  0
3.  x  :  \mBbbR{}
4.  (k  -  1)  =  0
\mvdash{}  bdd-diff(accelerate((k  *  ((canon-bnd(x)\^{}k  -  1  \mdiv{}  2\^{}k  -  1)  +  1))  +  1;reg-seq-nexp(x;k));
                      reg-seq-mul(x;r1))
By
Latex:
(Subst  \mkleeneopen{}k  \msim{}  1\mkleeneclose{}  0\mcdot{}
  THEN  Auto
  THEN  (RWO  "accelerate-bdd-diff"  0  THENA  (Auto  THEN  Try  ((RWO  "exp-fastexp<"  0  THEN  Auto)))))
Home
Index