Step
*
of Lemma
filter-normal-form
∀[P,L:Top].  (rec-case(L) of [] => [] | a::_ => r.if P[a] then [a / r] else r fi  ~ filter(λa.P[a];L))
BY
{ ((UnivCD THENA Auto) THEN RW (SubC (SymbCompC [] 100)) 0 THEN Auto) }
Latex:
Latex:
\mforall{}[P,L:Top].
    (rec-case(L)  of
      []  =>  []
      a::$_{}$  =>
        r.if  P[a]  then  [a  /  r]  else  r  fi    \msim{}  filter(\mlambda{}a.P[a];L))
By
Latex:
((UnivCD  THENA  Auto)  THEN  RW  (SubC  (SymbCompC  []  100))  0  THEN  Auto)
Home
Index