---

Step * 1 2 1 1 of Lemma name-morph-extend-comp

.....set predicate..... 
1. I : Cname List
2. J : Cname List
3. K : Cname List
4. f : name-morph(I;J)
5. g : name-morph(J;K)
6. x : Cname
7. (x ∈ I+)
8. ¬(x = fresh-cname(I) ∈ Cname)
⊢ (x ∈ I)
BY
{ (Unfold `add-fresh-cname` -2 THEN (CallByValueReduce (-2) THENA Auto)) }

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

---

Latex:

---

Latex:
.....set  predicate..... 
1.  I  :  Cname  List
2.  J  :  Cname  List
3.  K  :  Cname  List
4.  f  :  name-morph(I;J)
5.  g  :  name-morph(J;K)
6.  x  :  Cname
7.  (x  \mmember{}  I+)
8.  \mneg{}(x  =  fresh-cname(I))
\mvdash{}  (x  \mmember{}  I)


By

---

Latex:
(Unfold  `add-fresh-cname`  -2  THEN  (CallByValueReduce  (-2)  THENA  Auto))

---

Home Index