---

Step * of Lemma fps-one-slice

∀[X:Type]. ∀[r:CRng]. ∀[n:ℤ].  ([1]_n = if (n =z 0) then 1 else 0 fi  ∈ PowerSeries(X;r))
BY
{ (Auto
   THEN BLemma `fps-ext`
   THEN Auto
   THEN (RepUR ``fps-slice fps-zero fps-one fps-coeff`` 0
         THEN Repeat (AutoSplit)
         THEN Try (((Assert ⌜#(b) = 0 ∈ ℤ⌝⋅ THEN Auto') THEN SubstFor ⌜b⌝ 0⋅ THEN Reduce 0 THEN Complete (Auto))))⋅) }

---

Latex:

---

Latex:
\mforall{}[X:Type].  \mforall{}[r:CRng].  \mforall{}[n:\mBbbZ{}].    ([1]\_n  =  if  (n  =\msubz{}  0)  then  1  else  0  fi  )


By

---

Latex:
(Auto
  THEN  BLemma  `fps-ext`
  THEN  Auto
  THEN  (RepUR  ``fps-slice  fps-zero  fps-one  fps-coeff``  0
              THEN  Repeat  (AutoSplit)
              THEN  Try  (((Assert  \mkleeneopen{}\#(b)  =  0\mkleeneclose{}\mcdot{}  THEN  Auto')
                                    THEN  SubstFor  \mkleeneopen{}b\mkleeneclose{}  0\mcdot{}
                                    THEN  Reduce  0
                                    THEN  Complete  (Auto))))\mcdot{})

---

Home Index