---

Step * 1 1 of Lemma filter_cons_lemma


1. t : Top@i
2. h : Top@i
3. f : Top@i
⊢ if f h
then [h / reduce(λa,v. if f a then [a / v] else v fi ;[];t)]
else reduce(λa,v. if f a then [a / v] else v fi ;[];t)
fi  ~ if f h then [h / filter(f;t)] else filter(f;t) fi 
BY
{ Try (RW (AddrC [2] (UnfoldC `filter`)) 0)⋅ }

1
1. t : Top@i
2. h : Top@i
3. f : Top@i
⊢ if f h
then [h / reduce(λa,v. if f a then [a / v] else v fi ;[];t)]
else reduce(λa,v. if f a then [a / v] else v fi ;[];t)
fi  ~ if f h
then [h / reduce(λa,v. if f a then [a / v] else v fi ;[];t)]
else reduce(λa,v. if f a then [a / v] else v fi ;[];t)
fi 

---

Latex:

---

Latex:

1.  t  :  Top@i
2.  h  :  Top@i
3.  f  :  Top@i
\mvdash{}  if  f  h
then  [h  /  reduce(\mlambda{}a,v.  if  f  a  then  [a  /  v]  else  v  fi  ;[];t)]
else  reduce(\mlambda{}a,v.  if  f  a  then  [a  /  v]  else  v  fi  ;[];t)
fi    \msim{}  if  f  h  then  [h  /  filter(f;t)]  else  filter(f;t)  fi 


By

---

Latex:
Try  (RW  (AddrC  [2]  (UnfoldC  `filter`))  0)\mcdot{}

---

Home Index