Step
*
1
1
of Lemma
fps-compose-single-disjoint
.....equality..... 
1. X : Type
2. valueall-type(X)
3. eq : EqDecider(X)
4. r : CRng
5. x : X
6. f : PowerSeries(X;r)
7. ¬x ↓∈ []
⊢ <[]> = 1 ∈ PowerSeries(X;r)
BY
{ xxx(Fold `empty-bag` 0
      THEN (BLemma `fps-ext`  THEN Auto)
      THEN RepUR ``fps-single fps-one fps-coeff`` 0
      THEN AutoSplit
      THEN AutoSplit)xxx }
Latex:
Latex:
.....equality..... 
1.  X  :  Type
2.  valueall-type(X)
3.  eq  :  EqDecider(X)
4.  r  :  CRng
5.  x  :  X
6.  f  :  PowerSeries(X;r)
7.  \mneg{}x  \mdownarrow{}\mmember{}  []
\mvdash{}  <[]>  =  1
By
Latex:
xxx(Fold  `empty-bag`  0
        THEN  (BLemma  `fps-ext`    THEN  Auto)
        THEN  RepUR  ``fps-single  fps-one  fps-coeff``  0
        THEN  AutoSplit
        THEN  AutoSplit)xxx
Home
Index