---

Step * 1 2 1 1 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)
6. ¬(x = fresh-cname(I) ∈ Cname)
7. if isname(f x) then f x else f x fi  = (f x) ∈ extd-nameset(J)
⊢ extd-nameset(J) ⊆r extd-nameset(J+)
BY
{ TACTIC:(Unfold `add-fresh-cname` 0 THEN CallByValueReduce 0 THEN Auto) }

---

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))
6.  \mneg{}(x  =  fresh-cname(I))
7.  if  isname(f  x)  then  f  x  else  f  x  fi    =  (f  x)
\mvdash{}  extd-nameset(J)  \msubseteq{}r  extd-nameset(J+)


By

---

Latex:
TACTIC:(Unfold  `add-fresh-cname`  0  THEN  CallByValueReduce  0  THEN  Auto)

---

Home Index