Step
*
1
2
1
1
of Lemma
bag-moebius-property1
.....equality..... 
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)|¬bbag-has-no-repeats(eq;x)]). bag-moebius(eq;x) ~ 0
BY
{ (Auto THEN BLemma `bag-summation-is-zero` 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))
8. IsMonoid(ℤ;λx,y. (x + y);0)
9. x : bag(T)
10. x ↓∈ [x∈sub-bags(eq;b)|¬bbag-has-no-repeats(eq;x)]
⊢ bag-moebius(eq;x) = 0 ∈ ℤ
Latex:
Latex:
.....equality..... 
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)|\mneg{}\msubb{}bag-has-no-repeats(eq;x)]).  bag-moebius(eq;x)  \msim{}  0
By
Latex:
(Auto  THEN  BLemma  `bag-summation-is-zero`  THEN  Auto)
Home
Index