---

Step * 1 2 of Lemma bag-moebius-inversion


1. X : Type
2. valueall-type(X)
3. eq : EqDecider(X)
4. r : CRng
5. f : bag(X) ⟶ |r|
6. g : bag(X) ⟶ |r|
7. ∀b:bag(X). ((f b) = Σ(s∈sub-bags(eq;b)). g s ∈ |r|)
8. b : bag(X)
9. g = (f*fps-moebius(eq;r)) ∈ (bag(X) ⟶ |r|)
⊢ (g b) = Σ(p∈bag-partitions(eq;b)). (f (fst(p))) * int-to-ring(r;bag-moebius(eq;snd(p))) ∈ |r|
BY
{ xxx((Assert g[b] = (f*fps-moebius(eq;r))[b] ∈ |r| BY Auto) THEN NthHypEq (-1) THEN EqCD THEN Auto)xxx }

1
.....subterm..... T:t
3:n
1. X : Type
2. valueall-type(X)
3. eq : EqDecider(X)
4. r : CRng
5. f : bag(X) ⟶ |r|
6. g : bag(X) ⟶ |r|
7. ∀b:bag(X). ((f b) = Σ(s∈sub-bags(eq;b)). g s ∈ |r|)
8. b : bag(X)
9. g = (f*fps-moebius(eq;r)) ∈ (bag(X) ⟶ |r|)
10. g[b] = (f*fps-moebius(eq;r))[b] ∈ |r|
⊢ Σ(p∈bag-partitions(eq;b)). (f (fst(p))) * int-to-ring(r;bag-moebius(eq;snd(p))) = (f*fps-moebius(eq;r))[b] ∈ |r|

---

Latex:

---

Latex:

1.  X  :  Type
2.  valueall-type(X)
3.  eq  :  EqDecider(X)
4.  r  :  CRng
5.  f  :  bag(X)  {}\mrightarrow{}  |r|
6.  g  :  bag(X)  {}\mrightarrow{}  |r|
7.  \mforall{}b:bag(X).  ((f  b)  =  \mSigma{}(s\mmember{}sub-bags(eq;b)).  g  s)
8.  b  :  bag(X)
9.  g  =  (f*fps-moebius(eq;r))
\mvdash{}  (g  b)  =  \mSigma{}(p\mmember{}bag-partitions(eq;b)).  (f  (fst(p)))  *  int-to-ring(r;bag-moebius(eq;snd(p)))


By

---

Latex:
xxx((Assert  g[b]  =  (f*fps-moebius(eq;r))[b]  BY  Auto)  THEN  NthHypEq  (-1)  THEN  EqCD  THEN  Auto)xxx

---

Home Index