Step
*
1
1
of Lemma
alpha-avoid-binders-disjoint
1. opr : Type
2. L : varname() List
3. ¬(nullvar() ∈ L)
4. t : term(opr)
5. x : {v:varname()| (v ∈ all-vars(t))} 
⊢ (case apply-alist(VarDeq;alpha-rename-alist(t;L);x) of inl(x') => x' | inr(_) => x = nullvar() ∈ varname())
⇒ (x = nullvar() ∈ varname())
BY
{ ((GenConclAtAddr [1;2;1] THEN D -2 THEN Reduce 0) THEN Auto) }
1
1. opr : Type
2. L : varname() List
3. ¬(nullvar() ∈ L)
4. t : term(opr)
5. x : {v:varname()| (v ∈ all-vars(t))} 
6. x1 : varname()
7. apply-alist(VarDeq;alpha-rename-alist(t;L);x) = (inl x1) ∈ (varname()?)
8. x1 = nullvar() ∈ varname()
⊢ x = nullvar() ∈ varname()
Latex:
Latex:
1.  opr  :  Type
2.  L  :  varname()  List
3.  \mneg{}(nullvar()  \mmember{}  L)
4.  t  :  term(opr)
5.  x  :  \{v:varname()|  (v  \mmember{}  all-vars(t))\} 
\mvdash{}  (case  apply-alist(VarDeq;alpha-rename-alist(t;L);x)  of  inl(x')  =>  x'  |  inr($_{}\mbackslash{}ff\000C24)  =>  x  =  nullvar())
{}\mRightarrow{}  (x  =  nullvar())
By
Latex:
((GenConclAtAddr  [1;2;1]  THEN  D  -2  THEN  Reduce  0)  THEN  Auto)
Home
Index