---

Step * of Lemma bag-count-cons

∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[x,y:T]. ∀[b:bag(T)].
  ((#x in y.b) = if eq x y then (#x in b) + 1 else (#x in b) fi  ∈ ℤ)
BY
{ (Auto THEN (Subst' y.b ~ [y] + b 0 THENA Auto)) }

1
1. T : Type
2. eq : EqDecider(T)
3. x : T
4. y : T
5. b : bag(T)
⊢ (#x in [y] + b) = if eq x y then (#x in b) + 1 else (#x in b) fi  ∈ ℤ

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[x,y:T].  \mforall{}[b:bag(T)].
    ((\#x  in  y.b)  =  if  eq  x  y  then  (\#x  in  b)  +  1  else  (\#x  in  b)  fi  )


By

---

Latex:
(Auto  THEN  (Subst'  y.b  \msim{}  [y]  +  b  0  THENA  Auto))

---

Home Index