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 < 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