---

Step * 1 1 2 of Lemma face-map-comp


1. A : Cname List
2. B : Cname List
3. g : name-morph(A;B)
4. x : nameset(A)
5. i : ℕ2
6. ↑isname(g x)
7. g x ∈ nameset(B)
8. a : nameset(A)
9. a ≠ x
⊢ if isname(a) then g a else a fi  ∈ extd-nameset(B-[g x])
BY
{ TACTIC:((Subst' isname(a) ~ tt 0 THENA (RepeatFor 2 (DVar `a') THEN RepUR ``isname`` 0 THEN Auto)) THEN Reduce 0) }

1
1. A : Cname List
2. B : Cname List
3. g : name-morph(A;B)
4. x : nameset(A)
5. i : ℕ2
6. ↑isname(g x)
7. g x ∈ nameset(B)
8. a : nameset(A)
9. a ≠ x
⊢ g a ∈ extd-nameset(B-[g x])

---

Latex:

---

Latex:

1.  A  :  Cname  List
2.  B  :  Cname  List
3.  g  :  name-morph(A;B)
4.  x  :  nameset(A)
5.  i  :  \mBbbN{}2
6.  \muparrow{}isname(g  x)
7.  g  x  \mmember{}  nameset(B)
8.  a  :  nameset(A)
9.  a  \mneq{}  x
\mvdash{}  if  isname(a)  then  g  a  else  a  fi    \mmember{}  extd-nameset(B-[g  x])


By

---

Latex:
TACTIC:((Subst'  isname(a)  \msim{}  tt  0  THENA  (RepeatFor  2  (DVar  `a')  THEN  RepUR  ``isname``  0  THEN  Auto))
                THEN  Reduce  0
                )

---

Home Index