---

Step * 1 of Lemma apply-alist-inr


1. A : Type
2. T : Type
3. eq : EqDecider(T)
4. x : T
5. u : Unit
6. apply-alist(eq;[];x) = (inr u ) ∈ (A?)
⊢ ¬(∃z@0:A. (<x, z@0> ∈ []))
BY
{ ((D 0 THENM ExRepD) THEN Auto) }

---

Latex:

---

Latex:

1.  A  :  Type
2.  T  :  Type
3.  eq  :  EqDecider(T)
4.  x  :  T
5.  u  :  Unit
6.  apply-alist(eq;[];x)  =  (inr  u  )
\mvdash{}  \mneg{}(\mexists{}z@0:A.  (<x,  z@0>  \mmember{}  []))


By

---

Latex:
((D  0  THENM  ExRepD)  THEN  Auto)

---

Home Index