Step
*
1
1
1
of Lemma
count-bag-remove-repeats
.....equality..... 
1. T : Type
2. eq : EqDecider(T)
3. x : T
4. b2 : T List
5. 1 ≤ ||filter(eq x;list-to-set(eq;b2))|| 
⇐⇒ (x ∈ b2)
⊢ ||filter(λy.(eq x y);list-to-set(eq;b2))|| ~ ||filter(eq x;list-to-set(eq;b2))||
BY
{ (TACTIC:Auto THEN RepeatFor 2 ((EqCD THEN Auto)) THEN Ext THEN Reduce 0 THEN Auto) }
Latex:
Latex:
.....equality..... 
1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  x  :  T
4.  b2  :  T  List
5.  1  \mleq{}  ||filter(eq  x;list-to-set(eq;b2))||  \mLeftarrow{}{}\mRightarrow{}  (x  \mmember{}  b2)
\mvdash{}  ||filter(\mlambda{}y.(eq  x  y);list-to-set(eq;b2))||  \msim{}  ||filter(eq  x;list-to-set(eq;b2))||
By
Latex:
(TACTIC:Auto  THEN  RepeatFor  2  ((EqCD  THEN  Auto))  THEN  Ext  THEN  Reduce  0  THEN  Auto)
Home
Index