Step * of Lemma exp-is-zero

[x:ℤ]. ∀[n:ℕ].  uiff(x^n 0 ∈ ℤ;0 < n ∧ (x 0 ∈ ℤ))
BY
(InductionOnNat
   THEN Reduce 0
   THEN Try (Complete (Auto))
   THEN RWO "exp1 exp_step" 0
   THEN Auto
   THEN Try ((HypSubst' (-1) THEN Auto))
   THEN (FLemma `int_entire` [-1] THENM -1)
   THEN Auto) }


Latex:


Latex:
\mforall{}[x:\mBbbZ{}].  \mforall{}[n:\mBbbN{}].    uiff(x\^{}n  =  0;0  <  n  \mwedge{}  (x  =  0))


By


Latex:
(InductionOnNat
  THEN  Reduce  0
  THEN  Try  (Complete  (Auto))
  THEN  RWO  "exp1  exp\_step"  0
  THEN  Auto
  THEN  Try  ((HypSubst'  (-1)  0  THEN  Auto))
  THEN  (FLemma  `int\_entire`  [-1]  THENM  D  -1)
  THEN  Auto)




Home Index