---

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


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 : nameset(I+)
7. ¬(x = fresh-cname(I) ∈ Cname)
8. x ∈ nameset(I)
⊢ if isname(f x) then g (f x) else f x fi 
= if isname(f x) then if eq-cname(f x;fresh-cname(J)) then fresh-cname(K) else g (f x) fi  else f x fi 
∈ extd-nameset(K+)
BY
{ (SplitOnConclITE THENA Auto) }

1
.....truecase..... 
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 : nameset(I+)
7. ¬(x = fresh-cname(I) ∈ Cname)
8. x ∈ nameset(I)
9. ↑isname(f x)
⊢ (g (f x)) = if eq-cname(f x;fresh-cname(J)) then fresh-cname(K) else g (f x) fi  ∈ extd-nameset(K+)

2
.....falsecase..... 
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 : nameset(I+)
7. ¬(x = fresh-cname(I) ∈ Cname)
8. x ∈ nameset(I)
9. ¬↑isname(f x)
⊢ (f x) = (f x) ∈ extd-nameset(K+)

---

Latex:

---

Latex:

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  :  nameset(I+)
7.  \mneg{}(x  =  fresh-cname(I))
8.  x  \mmember{}  nameset(I)
\mvdash{}  if  isname(f  x)  then  g  (f  x)  else  f  x  fi 
=  if  isname(f  x)
    then  if  eq-cname(f  x;fresh-cname(J))  then  fresh-cname(K)  else  g  (f  x)  fi 
    else  f  x
    fi 


By

---

Latex:
(SplitOnConclITE  THENA  Auto)

---

Home Index