Step
*
1
of Lemma
name-morph-degeneracy-map
1. I : Cname List
2. J : Cname List
3. f : name-morph(I;J)
⊢ degeneracy-map(f) ∈ name-morph(filter(λx.isname(f x);I);J)
BY
{ (MemCD THEN Try (Fold `name-morph-domain` 0) THEN Try (BLemma `name-morph_subtype_domain`) THEN Auto) }
Latex:
Latex:
1.  I  :  Cname  List
2.  J  :  Cname  List
3.  f  :  name-morph(I;J)
\mvdash{}  degeneracy-map(f)  \mmember{}  name-morph(filter(\mlambda{}x.isname(f  x);I);J)
By
Latex:
(MemCD
  THEN  Try  (Fold  `name-morph-domain`  0)
  THEN  Try  (BLemma  `name-morph\_subtype\_domain`)
  THEN  Auto)
Home
Index