Step
*
2
2
of Lemma
mrec-label-cases
1. s : (Atom × ((Atom × ((Atom + Atom + Type) List)) List)) List
2. n : Atom
3. lbl : Atom
4. y : Unit
5. apply-alist(AtomDeq;s;n) = (inr y ) ∈ ((Atom × ((Atom + Atom + Type) List)) List?)
⊢ 0 < 0 
⇒ (lbl ∈ map(λp.(fst(p));⊥))
BY
{ Auto }
Latex:
Latex:
1.  s  :  (Atom  \mtimes{}  ((Atom  \mtimes{}  ((Atom  +  Atom  +  Type)  List))  List))  List
2.  n  :  Atom
3.  lbl  :  Atom
4.  y  :  Unit
5.  apply-alist(AtomDeq;s;n)  =  (inr  y  )
\mvdash{}  0  <  0  {}\mRightarrow{}  (lbl  \mmember{}  map(\mlambda{}p.(fst(p));\mbot{}))
By
Latex:
Auto
Home
Index