---

Step * 1 1 1 2 of Lemma fps-restrict-summation


1. X : Type
2. valueall-type(X)
3. eq : EqDecider(X)
4. r : CRng
5. f : PowerSeries(X;r)
6. d : bag(X)
7. Assoc(PowerSeries(X;r);λf,g. (f+g))
8. Comm(PowerSeries(X;r);λf,g. (f+g))
9. b : bag(X)
10. if deq-sub-bag(eq;b;d) then f b else 0 fi  = Σ(x∈sub-bags(eq;d)). if bag-eq(eq;b;x) then f x else 0 fi  ∈ |r|
⊢ if deq-sub-bag(eq;b;d) then f b else 0 fi  = Σ(x∈sub-bags(eq;d)). (f x) * if bag-eq(eq;b;x) then 1 else 0 fi  ∈ |r|
BY
{ xxx(NthHypEq (-1) THEN RepeatFor 2 ((EqCD THEN Auto)))xxx }

---

Latex:

---

Latex:

1.  X  :  Type
2.  valueall-type(X)
3.  eq  :  EqDecider(X)
4.  r  :  CRng
5.  f  :  PowerSeries(X;r)
6.  d  :  bag(X)
7.  Assoc(PowerSeries(X;r);\mlambda{}f,g.  (f+g))
8.  Comm(PowerSeries(X;r);\mlambda{}f,g.  (f+g))
9.  b  :  bag(X)
10.  if  deq-sub-bag(eq;b;d)  then  f  b  else  0  fi 
=  \mSigma{}(x\mmember{}sub-bags(eq;d)).  if  bag-eq(eq;b;x)  then  f  x  else  0  fi 
\mvdash{}  if  deq-sub-bag(eq;b;d)  then  f  b  else  0  fi 
=  \mSigma{}(x\mmember{}sub-bags(eq;d)).  (f  x)  *  if  bag-eq(eq;b;x)  then  1  else  0  fi 


By

---

Latex:
xxx(NthHypEq  (-1)  THEN  RepeatFor  2  ((EqCD  THEN  Auto)))xxx

---

Home Index