Step
*
1
2
3
of Lemma
name-morph-extend_wf
.....wf..... 
1. I : Cname List
2. J : Cname List
3. f : name-morph(I;J)
4. v : Cname
5. ¬(v ∈ I)
6. fresh-cname(I) = v ∈ {x:Cname| ¬(x ∈ I)} 
7. v1 : Cname
8. ¬(v1 ∈ J)
9. fresh-cname(J) = v1 ∈ {x:Cname| ¬(x ∈ J)} 
10. extd-nameset(J) ⊆r extd-nameset([v1 / J])
11. f1 : nameset([v / I]) ⟶ extd-nameset([v1 / J])
⊢ istype(∀i,j:nameset([v / I]).
           ((↑isname(f1 i))
           
⇒ (↑isname(f1 j))
           
⇒ ((f1 i) = (f1 j) ∈ extd-nameset([v1 / J]))
           
⇒ (i = j ∈ nameset([v / I]))))
BY
{ TACTIC:Auto }
Latex:
Latex:
.....wf..... 
1.  I  :  Cname  List
2.  J  :  Cname  List
3.  f  :  name-morph(I;J)
4.  v  :  Cname
5.  \mneg{}(v  \mmember{}  I)
6.  fresh-cname(I)  =  v
7.  v1  :  Cname
8.  \mneg{}(v1  \mmember{}  J)
9.  fresh-cname(J)  =  v1
10.  extd-nameset(J)  \msubseteq{}r  extd-nameset([v1  /  J])
11.  f1  :  nameset([v  /  I])  {}\mrightarrow{}  extd-nameset([v1  /  J])
\mvdash{}  istype(\mforall{}i,j:nameset([v  /  I]).
                      ((\muparrow{}isname(f1  i))  {}\mRightarrow{}  (\muparrow{}isname(f1  j))  {}\mRightarrow{}  ((f1  i)  =  (f1  j))  {}\mRightarrow{}  (i  =  j)))
By
Latex:
TACTIC:Auto
Home
Index