---

Step * 1 1 1 1 of Lemma iota-two-face-maps

.....fun wf..... 
1. I : Cname List
2. x : Cname
3. y : Cname
4. z : Cname
5. i : ℕ2
6. j : ℕ2
7. ¬(x = z ∈ Cname)
8. ¬(y = z ∈ Cname)
9. (((x:=i) o (y:=j)) o iota(z)) = ((x:=i) o ((y:=j) o iota(z))) ∈ name-morph(I;[z / I-[x; y]])
10. ((y:=j) o iota(z)) = (iota(z) o (y:=j)) ∈ name-morph(I-[x];[z / I-[x]-[y]])
11. Z : name-morph(I-[x];[z / I-[x]-[y]])
⊢ ((x:=i) o Z) = ((x:=i) o Z) ∈ name-morph(I;[z / I-[x; y]])
BY
{ (GenConcl ⌜Z = F ∈ name-morph(I-[x];[z / I-[x; y]])⌝⋅ THEN Auto) }

1
.....wf..... 
1. I : Cname List
2. x : Cname
3. y : Cname
4. z : Cname
5. i : ℕ2
6. j : ℕ2
7. ¬(x = z ∈ Cname)
8. ¬(y = z ∈ Cname)
9. (((x:=i) o (y:=j)) o iota(z)) = ((x:=i) o ((y:=j) o iota(z))) ∈ name-morph(I;[z / I-[x; y]])
10. ((y:=j) o iota(z)) = (iota(z) o (y:=j)) ∈ name-morph(I-[x];[z / I-[x]-[y]])
11. Z : name-morph(I-[x];[z / I-[x]-[y]])
⊢ Z ∈ name-morph(I-[x];[z / I-[x; y]])

---

Latex:

---

Latex:
.....fun  wf..... 
1.  I  :  Cname  List
2.  x  :  Cname
3.  y  :  Cname
4.  z  :  Cname
5.  i  :  \mBbbN{}2
6.  j  :  \mBbbN{}2
7.  \mneg{}(x  =  z)
8.  \mneg{}(y  =  z)
9.  (((x:=i)  o  (y:=j))  o  iota(z))  =  ((x:=i)  o  ((y:=j)  o  iota(z)))
10.  ((y:=j)  o  iota(z))  =  (iota(z)  o  (y:=j))
11.  Z  :  name-morph(I-[x];[z  /  I-[x]-[y]])
\mvdash{}  ((x:=i)  o  Z)  =  ((x:=i)  o  Z)


By

---

Latex:
(GenConcl  \mkleeneopen{}Z  =  F\mkleeneclose{}\mcdot{}  THEN  Auto)

---

Home Index