---

Step * 1 1 2 1 1 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
10. ↑isname(g a)
11. g a ∈ nameset(B)
⊢ g a ∈ extd-nameset(B-[g x])
BY
{ TACTIC:((MemTypeHD (-1) THENA Auto)
          THEN (Assert g a ∈ nameset(B-[g x]) BY
                      (MemTypeCD THEN Auto THEN RepeatFor 2 ((RW ListC 0 THEN Auto))))
          THEN Auto) }

1
.....aux..... 
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
10. ↑isname(g a)
11. (g a) = (g a) ∈ Cname
12. (g a ∈ B)
13. (g a ∈ B)
⊢ ¬((g a) = (g x) ∈ Cname)

---

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
10.  \muparrow{}isname(g  a)
11.  g  a  \mmember{}  nameset(B)
\mvdash{}  g  a  \mmember{}  extd-nameset(B-[g  x])


By

---

Latex:
TACTIC:((MemTypeHD  (-1)  THENA  Auto)
                THEN  (Assert  g  a  \mmember{}  nameset(B-[g  x])  BY
                                        (MemTypeCD  THEN  Auto  THEN  RepeatFor  2  ((RW  ListC  0  THEN  Auto))))
                THEN  Auto)

---

Home Index