---

Step * 1 4 2 of Lemma poly-choice-eta-2


1. f : Base@i
2. ∀x,y:Base.  ((f x y) = x ∈ Base)
3. (f 0)↓
4. f ~ λx.(f x)
5. x : Base
6. is-exception(if f x is lambda then λy.x otherwise ⊥)
7. is-exception(f x)
⊢ if f x is lambda then λy.x otherwise ⊥ ≤ f x
BY
{ (ExceptionSqequal (-1) THEN HypSubst' (-1) 0 THEN RW (AddrC [1] (TagC (mk_tag_term 10))) 0 THEN Auto) }

---

Latex:

---

Latex:

1.  f  :  Base@i
2.  \mforall{}x,y:Base.    ((f  x  y)  =  x)
3.  (f  0)\mdownarrow{}
4.  f  \msim{}  \mlambda{}x.(f  x)
5.  x  :  Base
6.  is-exception(if  f  x  is  lambda  then  \mlambda{}y.x  otherwise  \mbot{})
7.  is-exception(f  x)
\mvdash{}  if  f  x  is  lambda  then  \mlambda{}y.x  otherwise  \mbot{}  \mleq{}  f  x


By

---

Latex:
(ExceptionSqequal  (-1)
  THEN  HypSubst'  (-1)  0
  THEN  RW  (AddrC  [1]  (TagC  (mk\_tag\_term  10)))  0
  THEN  Auto)

---

Home Index