---

Step * 1 2 1 2 of Lemma bag-moebius-property1


1. T : Type
2. valueall-type(T)
3. eq : EqDecider(T)
4. b : T List
5. ¬(b = {} ∈ bag(T))
6. ∀[f:bag(T) ⟶ ℤ]
     Σ(x∈sub-bags(eq;b)). f[x]
     = (Σ(x∈[x∈sub-bags(eq;b)|bag-has-no-repeats(eq;x)]). f[x]
       + Σ(x∈[x∈sub-bags(eq;b)|¬bbag-has-no-repeats(eq;x)]). f[x])
     ∈ ℤ 
     supposing IsMonoid(ℤ;λx,y. (x + y);0) ∧ Comm(ℤ;λx,y. (x + y))
7. Comm(ℤ;λx,y. (x + y)) ∧ IsMonoid(ℤ;λx,y. (x + y);0)
⊢ (Σ(x∈[x∈sub-bags(eq;b)|bag-has-no-repeats(eq;x)]). bag-moebius(eq;x) + 0) = 0 ∈ ℤ
BY
{ (Assert ||b|| ≥ 1  BY
         (D 4 THEN Reduce 0 THEN Auto' THEN D 4 THEN Fold `empty-bag` 0 THEN Auto)) }

1
1. T : Type
2. valueall-type(T)
3. eq : EqDecider(T)
4. b : T List
5. ¬(b = {} ∈ bag(T))
6. ∀[f:bag(T) ⟶ ℤ]
     Σ(x∈sub-bags(eq;b)). f[x]
     = (Σ(x∈[x∈sub-bags(eq;b)|bag-has-no-repeats(eq;x)]). f[x]
       + Σ(x∈[x∈sub-bags(eq;b)|¬bbag-has-no-repeats(eq;x)]). f[x])
     ∈ ℤ 
     supposing IsMonoid(ℤ;λx,y. (x + y);0) ∧ Comm(ℤ;λx,y. (x + y))
7. Comm(ℤ;λx,y. (x + y)) ∧ IsMonoid(ℤ;λx,y. (x + y);0)
8. ||b|| ≥ 1 
⊢ (Σ(x∈[x∈sub-bags(eq;b)|bag-has-no-repeats(eq;x)]). bag-moebius(eq;x) + 0) = 0 ∈ ℤ

---

Latex:

---

Latex:

1.  T  :  Type
2.  valueall-type(T)
3.  eq  :  EqDecider(T)
4.  b  :  T  List
5.  \mneg{}(b  =  \{\})
6.  \mforall{}[f:bag(T)  {}\mrightarrow{}  \mBbbZ{}]
          \mSigma{}(x\mmember{}sub-bags(eq;b)).  f[x]
          =  (\mSigma{}(x\mmember{}[x\mmember{}sub-bags(eq;b)|bag-has-no-repeats(eq;x)]).  f[x]
              +  \mSigma{}(x\mmember{}[x\mmember{}sub-bags(eq;b)|\mneg{}\msubb{}bag-has-no-repeats(eq;x)]).  f[x]) 
          supposing  IsMonoid(\mBbbZ{};\mlambda{}x,y.  (x  +  y);0)  \mwedge{}  Comm(\mBbbZ{};\mlambda{}x,y.  (x  +  y))
7.  Comm(\mBbbZ{};\mlambda{}x,y.  (x  +  y))  \mwedge{}  IsMonoid(\mBbbZ{};\mlambda{}x,y.  (x  +  y);0)
\mvdash{}  (\mSigma{}(x\mmember{}[x\mmember{}sub-bags(eq;b)|bag-has-no-repeats(eq;x)]).  bag-moebius(eq;x)  +  0)  =  0


By

---

Latex:
(Assert  ||b||  \mgeq{}  1    BY
              (D  4  THEN  Reduce  0  THEN  Auto'  THEN  D  4  THEN  Fold  `empty-bag`  0  THEN  Auto))

---

Home Index