---

Step * 2 3 of Lemma swap-names_wf


1. I : Cname List
2. z1 : nameset(I)
3. z2 : nameset(I)
4. i : nameset(I)
5. ¬(i = z1 ∈ Cname)
6. j : nameset(I)
7. j = z1 ∈ Cname
⊢ (↑isname(if eq-cname(i;z2) then z1 else i fi ))
⇒ (↑isname(z2))
⇒ (if eq-cname(i;z2) then z1 else i fi  = z2 ∈ extd-nameset(I))
⇒ (i = j ∈ nameset(I))
BY
{ (BoolCase ⌜eq-cname(i;z2)⌝⋅ THENA Auto) }

1
1. I : Cname List
2. z1 : nameset(I)
3. z2 : nameset(I)
4. i : nameset(I)
5. ¬(i = z1 ∈ Cname)
6. j : nameset(I)
7. j = z1 ∈ Cname
8. i = z2 ∈ Cname
⊢ (↑isname(z1)) ⇒ (↑isname(z2)) ⇒ (z1 = z2 ∈ extd-nameset(I)) ⇒ (i = j ∈ nameset(I))

2
1. I : Cname List
2. z1 : nameset(I)
3. z2 : nameset(I)
4. i : nameset(I)
5. ¬(i = z2 ∈ Cname)
6. ¬(i = z1 ∈ Cname)
7. j : nameset(I)
8. j = z1 ∈ Cname
⊢ (↑isname(i)) ⇒ (↑isname(z2)) ⇒ (i = z2 ∈ extd-nameset(I)) ⇒ (i = j ∈ nameset(I))

---

Latex:

---

Latex:

1.  I  :  Cname  List
2.  z1  :  nameset(I)
3.  z2  :  nameset(I)
4.  i  :  nameset(I)
5.  \mneg{}(i  =  z1)
6.  j  :  nameset(I)
7.  j  =  z1
\mvdash{}  (\muparrow{}isname(if  eq-cname(i;z2)  then  z1  else  i  fi  ))
{}\mRightarrow{}  (\muparrow{}isname(z2))
{}\mRightarrow{}  (if  eq-cname(i;z2)  then  z1  else  i  fi    =  z2)
{}\mRightarrow{}  (i  =  j)


By

---

Latex:
(BoolCase  \mkleeneopen{}eq-cname(i;z2)\mkleeneclose{}\mcdot{}  THENA  Auto)

---

Home Index