Step
*
of Lemma
extended-face-map1
No Annotations
∀I:Cname List. ∀x:nameset(I). ∀i:ℕ2. ∀y1,y2:Cname.
  (x:=i)[y1:=y2] = ((x:=i) o rename-one-name(y1;y2)) ∈ name-morph([y1 / I];[y2 / I-[x]]) 
  supposing (¬(y2 ∈ I-[x])) ∧ (¬(y1 ∈ I))
BY
{ (Auto THEN BLemma `name-morphs-equal` THEN Auto) }
1
.....wf..... 
1. I : Cname List
2. x : nameset(I)
3. i : ℕ2
4. y1 : Cname
5. y2 : Cname
6. ¬(y2 ∈ I-[x])
7. ¬(y1 ∈ I)
⊢ ((x:=i) o rename-one-name(y1;y2)) ∈ nameset([y1 / I]) ⟶ extd-nameset([y2 / I-[x]])
2
1. I : Cname List
2. x : nameset(I)
3. i : ℕ2
4. y1 : Cname
5. y2 : Cname
6. ¬(y2 ∈ I-[x])
7. ¬(y1 ∈ I)
⊢ (x:=i)[y1:=y2] = ((x:=i) o rename-one-name(y1;y2)) ∈ (nameset([y1 / I]) ⟶ extd-nameset([y2 / I-[x]]))
Latex:
Latex:
No  Annotations
\mforall{}I:Cname  List.  \mforall{}x:nameset(I).  \mforall{}i:\mBbbN{}2.  \mforall{}y1,y2:Cname.
    (x:=i)[y1:=y2]  =  ((x:=i)  o  rename-one-name(y1;y2))  supposing  (\mneg{}(y2  \mmember{}  I-[x]))  \mwedge{}  (\mneg{}(y1  \mmember{}  I))
By
Latex:
(Auto  THEN  BLemma  `name-morphs-equal`  THEN  Auto)
Home
Index