Step
*
1
2
of Lemma
apply-alist-cases
1. T : Type
2. eq : EqDecider(T)
3. x : T
⊢ ∀[i:ℕ||[]||]
    (apply-alist(eq;[];x) ~ inl (snd([][i]))) supposing (((fst([][i])) = x ∈ T) and (∀j:ℕi. (¬((fst([][j])) = x ∈ T))))
BY
{ (BasicUniformUnivCD Auto THEN Assert ⌜False⌝⋅ THEN Auto) }
1
1. T : Type
2. eq : EqDecider(T)
3. x : T
4. i : ℕ||[]||
⊢ False
Latex:
Latex:
1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  x  :  T
\mvdash{}  \mforall{}[i:\mBbbN{}||[]||]
        (apply-alist(eq;[];x)  \msim{}  inl  (snd([][i])))  supposing 
              (((fst([][i]))  =  x)  and 
              (\mforall{}j:\mBbbN{}i.  (\mneg{}((fst([][j]))  =  x))))
By
Latex:
(BasicUniformUnivCD  Auto  THEN  Assert  \mkleeneopen{}False\mkleeneclose{}\mcdot{}  THEN  Auto)
Home
Index