---

Step * 1 of Lemma extend-name-morph_wf


1. I : Cname List
2. J : Cname List
3. f : name-morph(I;J)
4. z1 : Cname
5. z2 : Cname
6. ¬(z2 ∈ J)
⊢ λx.if eq-cname(x;z1) then z2 else f x fi  ∈ nameset([z1 / I]) ⟶ extd-nameset([z2 / J])
BY
{ TACTIC:Auto }

1
1. I : Cname List
2. J : Cname List
3. f : name-morph(I;J)
4. z1 : Cname
5. z2 : Cname
6. ¬(z2 ∈ J)
7. x : nameset([z1 / I])
8. x = z1 ∈ Cname
⊢ z2 ∈ extd-nameset([z2 / J])

2
1. I : Cname List
2. J : Cname List
3. f : name-morph(I;J)
4. z1 : Cname
5. z2 : Cname
6. ¬(z2 ∈ J)
7. x : nameset([z1 / I])
8. ¬(x = z1 ∈ Cname)
⊢ x ∈ nameset(I)

---

Latex:

---

Latex:

1.  I  :  Cname  List
2.  J  :  Cname  List
3.  f  :  name-morph(I;J)
4.  z1  :  Cname
5.  z2  :  Cname
6.  \mneg{}(z2  \mmember{}  J)
\mvdash{}  \mlambda{}x.if  eq-cname(x;z1)  then  z2  else  f  x  fi    \mmember{}  nameset([z1  /  I])  {}\mrightarrow{}  extd-nameset([z2  /  J])


By

---

Latex:
TACTIC:Auto

---

Home Index