---

Step * 1 5 1 2 of Lemma face-map-comp2


1. A : Cname List
2. B : Cname List
3. g : nameset(A) ⟶ extd-nameset(B)
4. ∀i,j:nameset(A).  ((↑isname(g i)) ⇒ (↑isname(g j)) ⇒ ((g i) = (g j) ∈ extd-nameset(B)) ⇒ (i = j ∈ nameset(A)))
5. x : nameset(A)
6. y : nameset(A)
7. i : ℕ2
8. j : ℕ2
9. ↑isname(g x)
10. ↑isname(g y)
11. ¬(x = y ∈ Cname)
12. g y ∈ nameset(B)
13. g x ∈ nameset(B)
14. a : nameset(A)
15. a ≠ y
16. a = x ∈ ℤ
⊢ if isname(g a)
then if isname(if (g a =z g x) then i else g a fi )
       then if (if (g a =z g x) then i else g a fi  =z g y) then j
            if (g a =z g x) then i
            else g a
            fi 
     if (g a =z g x) then i
     else g a
     fi 
else g a
fi 
= if isname(if isname(i) then i else i fi ) then g if isname(i) then i else i fi 
  if isname(i) then i
  else i
  fi 
∈ extd-nameset(B-[g x; g y])
BY
{ RepeatFor 2 (((Subst' isname(i) ~ ff 0 THENA (RepUR ``isname`` 0 THEN Auto)) THEN Reduce 0)) }

1
1. A : Cname List
2. B : Cname List
3. g : nameset(A) ⟶ extd-nameset(B)
4. ∀i,j:nameset(A).  ((↑isname(g i)) ⇒ (↑isname(g j)) ⇒ ((g i) = (g j) ∈ extd-nameset(B)) ⇒ (i = j ∈ nameset(A)))
5. x : nameset(A)
6. y : nameset(A)
7. i : ℕ2
8. j : ℕ2
9. ↑isname(g x)
10. ↑isname(g y)
11. ¬(x = y ∈ Cname)
12. g y ∈ nameset(B)
13. g x ∈ nameset(B)
14. a : nameset(A)
15. a ≠ y
16. a = x ∈ ℤ
⊢ if isname(g a)
then if isname(if (g a =z g x) then i else g a fi )
       then if (if (g a =z g x) then i else g a fi  =z g y) then j
            if (g a =z g x) then i
            else g a
            fi 
     if (g a =z g x) then i
     else g a
     fi 
else g a
fi 
= i
∈ extd-nameset(B-[g x; g y])

---

Latex:

---

Latex:

1.  A  :  Cname  List
2.  B  :  Cname  List
3.  g  :  nameset(A)  {}\mrightarrow{}  extd-nameset(B)
4.  \mforall{}i,j:nameset(A).    ((\muparrow{}isname(g  i))  {}\mRightarrow{}  (\muparrow{}isname(g  j))  {}\mRightarrow{}  ((g  i)  =  (g  j))  {}\mRightarrow{}  (i  =  j))
5.  x  :  nameset(A)
6.  y  :  nameset(A)
7.  i  :  \mBbbN{}2
8.  j  :  \mBbbN{}2
9.  \muparrow{}isname(g  x)
10.  \muparrow{}isname(g  y)
11.  \mneg{}(x  =  y)
12.  g  y  \mmember{}  nameset(B)
13.  g  x  \mmember{}  nameset(B)
14.  a  :  nameset(A)
15.  a  \mneq{}  y
16.  a  =  x
\mvdash{}  if  isname(g  a)
then  if  isname(if  (g  a  =\msubz{}  g  x)  then  i  else  g  a  fi  )
              then  if  (if  (g  a  =\msubz{}  g  x)  then  i  else  g  a  fi    =\msubz{}  g  y)  then  j
                        if  (g  a  =\msubz{}  g  x)  then  i
                        else  g  a
                        fi 
          if  (g  a  =\msubz{}  g  x)  then  i
          else  g  a
          fi 
else  g  a
fi 
=  if  isname(if  isname(i)  then  i  else  i  fi  )  then  g  if  isname(i)  then  i  else  i  fi 
    if  isname(i)  then  i
    else  i
    fi 


By

---

Latex:
RepeatFor  2  (((Subst'  isname(i)  \msim{}  ff  0  THENA  (RepUR  ``isname``  0  THEN  Auto))  THEN  Reduce  0))

---

Home Index