---

Step * of Lemma extend-name-morph-irrelevant

∀I,K:Cname List. ∀f:name-morph(I;K).  (f = f[fresh-cname(I):=fresh-cname(K)] ∈ name-morph(I;K))
BY
{ (Auto
   THEN BLemma `name-morphs-equal`
   THEN Auto
   THEN (FunExt THENA Auto)
   THEN RepUR ``extend-name-morph`` 0
   THEN AutoSplit
   THEN Contradict (-1)
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}I,K:Cname  List.  \mforall{}f:name-morph(I;K).    (f  =  f[fresh-cname(I):=fresh-cname(K)])


By

---

Latex:
(Auto
  THEN  BLemma  `name-morphs-equal`
  THEN  Auto
  THEN  (FunExt  THENA  Auto)
  THEN  RepUR  ``extend-name-morph``  0
  THEN  AutoSplit
  THEN  Contradict  (-1)
  THEN  Auto)

---

Home Index