Step
*
of Lemma
rnexp_unroll
∀[x:ℝ]. ∀[n:ℕ].  (x^n = if (n =z 0) then r1 if (n =z 1) then x else x^n - 1 * x fi )
BY
{ (Auto THEN (RWO "rnexp-req" 0 THENA Auto) THEN RepeatFor 2 (AutoSplit)) }
1
1. x : ℝ
2. n : {1...}
3. n = 1 ∈ ℤ
⊢ (x * x^n - 1) = x
Latex:
Latex:
\mforall{}[x:\mBbbR{}].  \mforall{}[n:\mBbbN{}].    (x\^{}n  =  if  (n  =\msubz{}  0)  then  r1  if  (n  =\msubz{}  1)  then  x  else  x\^{}n  -  1  *  x  fi  )
By
Latex:
(Auto  THEN  (RWO  "rnexp-req"  0  THENA  Auto)  THEN  RepeatFor  2  (AutoSplit))
Home
Index