Step
*
1
2
of Lemma
iota'-comp
1. I : Cname List
2. J : Cname List
3. f : name-morph(I;J)
4. x : nameset(I)
5. ¬(x = fresh-cname(I) ∈ Cname)
⊢ if isname(f x) then f x else f x fi 
= if eq-cname(x;fresh-cname(I)) then fresh-cname(J) else f x fi 
∈ extd-nameset(J+)
BY
{ TACTIC:(BoolCase ⌜eq-cname(x;fresh-cname(I))⌝⋅ THENA Auto) }
1
1. I : Cname List
2. J : Cname List
3. f : name-morph(I;J)
4. x : nameset(I)
5. ¬(x = fresh-cname(I) ∈ Cname)
6. ¬(x = fresh-cname(I) ∈ Cname)
⊢ if isname(f x) then f x else f x fi  = (f x) ∈ extd-nameset(J+)
Latex:
Latex:
1.  I  :  Cname  List
2.  J  :  Cname  List
3.  f  :  name-morph(I;J)
4.  x  :  nameset(I)
5.  \mneg{}(x  =  fresh-cname(I))
\mvdash{}  if  isname(f  x)  then  f  x  else  f  x  fi 
=  if  eq-cname(x;fresh-cname(I))  then  fresh-cname(J)  else  f  x  fi 
By
Latex:
TACTIC:(BoolCase  \mkleeneopen{}eq-cname(x;fresh-cname(I))\mkleeneclose{}\mcdot{}  THENA  Auto)
Home
Index