---

Step * 1 1 1 1 3 of Lemma name-morph-inv-eq

.....aux..... 
1. I : Cname List
2. J : Cname List
3. f : name-morph(I;J)
4. x : Cname
5. (x ∈ I)
6. ↑isname(f x)
7. f x ∈ nameset(J)
8. λi.(isname(f i) ∧b (f i =z f x)) ∈ nameset(I) ⟶ 𝔹
9. I ∈ nameset(I) List
10. (x ∈ filter(λi.(isname(f i) ∧b (f i =z f x));I))
11. x1 : Cname
⊢ istype(∃i:nameset(I). ((↑isname(f i)) ∧ ((f i) = x1 ∈ Cname)))
BY
{ (D 0 THEN Try ((D 0 THEN Try (FLemma `assert-isname` [-1]) THEN Auto)) THEN Auto) }

---

Latex:

---

Latex:
.....aux..... 
1.  I  :  Cname  List
2.  J  :  Cname  List
3.  f  :  name-morph(I;J)
4.  x  :  Cname
5.  (x  \mmember{}  I)
6.  \muparrow{}isname(f  x)
7.  f  x  \mmember{}  nameset(J)
8.  \mlambda{}i.(isname(f  i)  \mwedge{}\msubb{}  (f  i  =\msubz{}  f  x))  \mmember{}  nameset(I)  {}\mrightarrow{}  \mBbbB{}
9.  I  \mmember{}  nameset(I)  List
10.  (x  \mmember{}  filter(\mlambda{}i.(isname(f  i)  \mwedge{}\msubb{}  (f  i  =\msubz{}  f  x));I))
11.  x1  :  Cname
\mvdash{}  istype(\mexists{}i:nameset(I).  ((\muparrow{}isname(f  i))  \mwedge{}  ((f  i)  =  x1)))


By

---

Latex:
(D  0  THEN  Try  ((D  0  THEN  Try  (FLemma  `assert-isname`  [-1])  THEN  Auto))  THEN  Auto)

---

Home Index