---

Step * of Lemma deq-member-length-filter

∀[A:Type]. ∀[eq:EqDecider(A)]. ∀[L:A List]. ∀[x:A].  (x ∈b L ~ 0 <z ||filter(λy.(eq y x);L)||)
BY
{ (InductionOnList THEN Reduce 0 THEN Auto THEN AutoSplit) }

---

Latex:

---

Latex:
\mforall{}[A:Type].  \mforall{}[eq:EqDecider(A)].  \mforall{}[L:A  List].  \mforall{}[x:A].    (x  \mmember{}\msubb{}  L  \msim{}  0  <z  ||filter(\mlambda{}y.(eq  y  x);L)||)


By

---

Latex:
(InductionOnList  THEN  Reduce  0  THEN  Auto  THEN  AutoSplit)

---

Home Index