Step
*
of Lemma
length-filter-pos
∀[A:Type]. ∀[P:A ⟶ 𝔹]. ∀[L:A List].  0 < ||filter(P;L)|| supposing (∃x∈L. ↑(P x))
BY
{ (InductionOnList
   THEN Reduce 0
   THEN RW ListC 0
   THEN Try (Complete (Auto))
   THEN AutoSplit
   THEN Auto
   THEN D (-1)
   THEN Auto) }
Latex:
Latex:
\mforall{}[A:Type].  \mforall{}[P:A  {}\mrightarrow{}  \mBbbB{}].  \mforall{}[L:A  List].    0  <  ||filter(P;L)||  supposing  (\mexists{}x\mmember{}L.  \muparrow{}(P  x))
By
Latex:
(InductionOnList
  THEN  Reduce  0
  THEN  RW  ListC  0
  THEN  Try  (Complete  (Auto))
  THEN  AutoSplit
  THEN  Auto
  THEN  D  (-1)
  THEN  Auto)
Home
Index