Step
*
3
1
of Lemma
free-group-functor_wf
.....wf..... 
1. X : Type
⊢ fg-lift(free-group(X);λx@0.free-letter(x@0)) ∈ MonHom(free-group(X),free-group(X))
BY
{ (GenConcl ⌜(λx.free-letter(x)) = g ∈ (X ⟶ |free-group(X)|)⌝⋅ THEN Auto) }
Latex:
Latex:
.....wf..... 
1.  X  :  Type
\mvdash{}  fg-lift(free-group(X);\mlambda{}x@0.free-letter(x@0))  \mmember{}  MonHom(free-group(X),free-group(X))
By
Latex:
(GenConcl  \mkleeneopen{}(\mlambda{}x.free-letter(x))  =  g\mkleeneclose{}\mcdot{}  THEN  Auto)
Home
Index