Step
*
2
of Lemma
norm-system_wf
1. M : Type ─→ Type
2. M[Top]
3. a : component(P.M[P]) List
⊢ norm-lg(λx.x) ∈ id-fun(LabeledDAG(pInTransit(P.M[P])))
BY
{ (Unfold `ldag` 0 THEN BLemma `id-fun-set`  THEN Auto) }
Latex:
Latex:
1.  M  :  Type  {}\mrightarrow{}  Type
2.  M[Top]
3.  a  :  component(P.M[P])  List
\mvdash{}  norm-lg(\mlambda{}x.x)  \mmember{}  id-fun(LabeledDAG(pInTransit(P.M[P])))
By
Latex:
(Unfold  `ldag`  0  THEN  BLemma  `id-fun-set`    THEN  Auto)
Home
Index