Step
*
1
2
1
1
1
1
1
of Lemma
fg-hom_wf
.....equality..... 
1. X : Type
2. G : Group{i}
3. f : X ⟶ |G|
4. w : free-word(X)
5. w2 : (X + X) List@i
6. w3 : (X + X) List@i
7. TC(λx,y. word-rel(X;x;y)) w2 w3
8. ∀x:(X + X) List. (fg-hom(G;f;x) ∈ |G|)
9. x : (X + X) List@i
10. y : (X + X) List@i
11. x@0 : X + X@i
12. y@0 : X + X@i
13. a : (X + X) List@i
14. b : (X + X) List@i
15. x@0 = -y@0
16. x = (a @ [x@0; y@0] @ b) ∈ ((X + X) List)
17. y = (a @ b) ∈ ((X + X) List)
⊢ fg-hom(G;f;[x@0; y@0]) = e ∈ |G|
BY
{ (RepeatFor 2 (Thin (-1))
   THEN RepeatFor 3 (D -1)
   THEN (RWO "-1 -2" 0 THENA Auto)
   THEN RepUR ``fg-hom`` 0
   THEN RW GrpNormC 0
   THEN Auto) }
Latex:
Latex:
.....equality..... 
1.  X  :  Type
2.  G  :  Group\{i\}
3.  f  :  X  {}\mrightarrow{}  |G|
4.  w  :  free-word(X)
5.  w2  :  (X  +  X)  List@i
6.  w3  :  (X  +  X)  List@i
7.  TC(\mlambda{}x,y.  word-rel(X;x;y))  w2  w3
8.  \mforall{}x:(X  +  X)  List.  (fg-hom(G;f;x)  \mmember{}  |G|)
9.  x  :  (X  +  X)  List@i
10.  y  :  (X  +  X)  List@i
11.  x@0  :  X  +  X@i
12.  y@0  :  X  +  X@i
13.  a  :  (X  +  X)  List@i
14.  b  :  (X  +  X)  List@i
15.  x@0  =  -y@0
16.  x  =  (a  @  [x@0;  y@0]  @  b)
17.  y  =  (a  @  b)
\mvdash{}  fg-hom(G;f;[x@0;  y@0])  =  e
By
Latex:
(RepeatFor  2  (Thin  (-1))
  THEN  RepeatFor  3  (D  -1)
  THEN  (RWO  "-1  -2"  0  THENA  Auto)
  THEN  RepUR  ``fg-hom``  0
  THEN  RW  GrpNormC  0
  THEN  Auto)
Home
Index