---

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


1. x : Base
2. y : Base
3. is-exception(eval z = x in λy.z y)
4. is-exception(eval z = x in
                λy.z)
5. is-exception(x)
⊢ eval z = x in λy.z y ≤ x
BY
{ (ExceptionSqequal (-1)⋅ THEN HypSubst' (-1) 0 THEN Reduce 0 THEN Auto) }

---

Latex:

---

Latex:

1.  x  :  Base
2.  y  :  Base
3.  is-exception(eval  z  =  x  in  \mlambda{}y.z  y)
4.  is-exception(eval  z  =  x  in
                                \mlambda{}y.z)
5.  is-exception(x)
\mvdash{}  eval  z  =  x  in  \mlambda{}y.z  y  \mleq{}  x


By

---

Latex:
(ExceptionSqequal  (-1)\mcdot{}  THEN  HypSubst'  (-1)  0  THEN  Reduce  0  THEN  Auto)

---

Home Index