Step
*
of Lemma
bag-count-single
∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[x,y:T].  ((#x in [y]) = if eq x y then 1 else 0 fi  ∈ ℤ)
BY
{ (Auto
   THEN (RWO "bag-count-sqequal" 0 THENA Auto)
   THEN RepUR ``bag-filter`` 0
   THEN AutoSplit
   THEN RepUR ``bag-size`` 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[x,y:T].    ((\#x  in  [y])  =  if  eq  x  y  then  1  else  0  fi  )
By
Latex:
(Auto
  THEN  (RWO  "bag-count-sqequal"  0  THENA  Auto)
  THEN  RepUR  ``bag-filter``  0
  THEN  AutoSplit
  THEN  RepUR  ``bag-size``  0
  THEN  Auto)
Home
Index