Step * of Lemma integer-nth-root2

n:{n:ℕ+(n mod 2) 1 ∈ ℤ. ∀x:{...0}.  (∃r:{...0} [((r 1)^n < x ∧ (x ≤ r^n))])
BY
(Auto
   THEN (InstLemma `integer-nth-root-ext` [⌜n⌝;⌜-x⌝]⋅ THENA Auto)
   THEN skip{(D -1
              THEN With ⌜-r⌝ (D 0)⋅
              THEN Auto
              THEN (Subst' (-r) -(r 1) THENA Auto)
              THEN (RWO "exp-minus" THENA Auto)
              THEN (Subst' mod THENA Auto)
              THEN Reduce 0
              THEN Auto')}) }

1
1. {n:ℕ+(n mod 2) 1 ∈ ℤ@i
2. {...0}@i
3. ∃r:ℕ [((r^n ≤ (-x)) ∧ -x < (r 1)^n)]
⊢ ∃r:{...0} [((r 1)^n < x ∧ (x ≤ r^n))]


Latex:


Latex:
\mforall{}n:\{n:\mBbbN{}\msupplus{}|  (n  mod  2)  =  1\}  .  \mforall{}x:\{...0\}.    (\mexists{}r:\{...0\}  [((r  -  1)\^{}n  <  x  \mwedge{}  (x  \mleq{}  r\^{}n))])


By


Latex:
(Auto
  THEN  (InstLemma  `integer-nth-root-ext`  [\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}-x\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  skip\{(D  -1
                        THEN  With  \mkleeneopen{}-r\mkleeneclose{}  (D  0)\mcdot{}
                        THEN  Auto
                        THEN  (Subst'  (-r)  -  1  \msim{}  -(r  +  1)  0  THENA  Auto)
                        THEN  (RWO  "exp-minus"  0  THENA  Auto)
                        THEN  (Subst'  n  mod  2  \msim{}  1  0  THENA  Auto)
                        THEN  Reduce  0
                        THEN  Auto')\})




Home Index