---

Step * 1 of Lemma filter_cons_lemma


1. t : Top@i
2. h : Top@i
3. f : Top@i
⊢ filter(f;[h / t]) ~ if f h then [h / filter(f;t)] else filter(f;t) fi 
BY
{ Try (RW (AddrC [1] (UnfoldC `filter` ANDTHENC ReduceC)) 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 / filter(f;t)] else filter(f;t) fi 

---

Latex:

---

Latex:

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


By

---

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

---

Home Index