Metamath Proof Explorer


Theorem psgnghm

Description: The sign is a homomorphism from the finitary permutation group to the numeric signs. (Contributed by Stefan O'Rear, 28-Aug-2015)

Ref Expression
Hypotheses psgnghm.s S = SymGrp D
psgnghm.n N = pmSgn D
psgnghm.f F = S 𝑠 dom N
psgnghm.u U = mulGrp fld 𝑠 1 1
Assertion psgnghm D V N F GrpHom U

Proof

Step Hyp Ref Expression
1 psgnghm.s S = SymGrp D
2 psgnghm.n N = pmSgn D
3 psgnghm.f F = S 𝑠 dom N
4 psgnghm.u U = mulGrp fld 𝑠 1 1
5 eqid Base S = Base S
6 eqid x Base S | dom x I Fin = x Base S | dom x I Fin
7 1 5 6 2 psgnfn N Fn x Base S | dom x I Fin
8 fndm N Fn x Base S | dom x I Fin dom N = x Base S | dom x I Fin
9 7 8 ax-mp dom N = x Base S | dom x I Fin
10 9 ssrab3 dom N Base S
11 3 5 ressbas2 dom N Base S dom N = Base F
12 10 11 ax-mp dom N = Base F
13 4 cnmsgnbas 1 1 = Base U
14 12 fvexi dom N V
15 eqid + S = + S
16 3 15 ressplusg dom N V + S = + F
17 14 16 ax-mp + S = + F
18 prex 1 1 V
19 eqid mulGrp fld = mulGrp fld
20 cnfldmul × = fld
21 19 20 mgpplusg × = + mulGrp fld
22 4 21 ressplusg 1 1 V × = + U
23 18 22 ax-mp × = + U
24 1 2 psgndmsubg D V dom N SubGrp S
25 3 subggrp dom N SubGrp S F Grp
26 24 25 syl D V F Grp
27 4 cnmsgngrp U Grp
28 27 a1i D V U Grp
29 fnfun N Fn x Base S | dom x I Fin Fun N
30 7 29 ax-mp Fun N
31 funfn Fun N N Fn dom N
32 30 31 mpbi N Fn dom N
33 32 a1i D V N Fn dom N
34 eqid ran pmTrsp D = ran pmTrsp D
35 1 34 2 psgnvali x dom N z Word ran pmTrsp D x = S z N x = 1 z
36 lencl z Word ran pmTrsp D z 0
37 36 nn0zd z Word ran pmTrsp D z
38 m1expcl2 z 1 z 1 1
39 prcom 1 1 = 1 1
40 38 39 eleqtrdi z 1 z 1 1
41 eleq1a 1 z 1 1 N x = 1 z N x 1 1
42 37 40 41 3syl z Word ran pmTrsp D N x = 1 z N x 1 1
43 42 adantld z Word ran pmTrsp D x = S z N x = 1 z N x 1 1
44 43 rexlimiv z Word ran pmTrsp D x = S z N x = 1 z N x 1 1
45 44 a1i D V z Word ran pmTrsp D x = S z N x = 1 z N x 1 1
46 35 45 syl5 D V x dom N N x 1 1
47 46 ralrimiv D V x dom N N x 1 1
48 ffnfv N : dom N 1 1 N Fn dom N x dom N N x 1 1
49 33 47 48 sylanbrc D V N : dom N 1 1
50 ccatcl z Word ran pmTrsp D w Word ran pmTrsp D z ++ w Word ran pmTrsp D
51 1 34 2 psgnvalii D V z ++ w Word ran pmTrsp D N S z ++ w = 1 z ++ w
52 50 51 sylan2 D V z Word ran pmTrsp D w Word ran pmTrsp D N S z ++ w = 1 z ++ w
53 1 symggrp D V S Grp
54 grpmnd S Grp S Mnd
55 53 54 syl D V S Mnd
56 34 1 5 symgtrf ran pmTrsp D Base S
57 sswrd ran pmTrsp D Base S Word ran pmTrsp D Word Base S
58 56 57 ax-mp Word ran pmTrsp D Word Base S
59 58 sseli z Word ran pmTrsp D z Word Base S
60 58 sseli w Word ran pmTrsp D w Word Base S
61 5 15 gsumccat S Mnd z Word Base S w Word Base S S z ++ w = S z + S S w
62 55 59 60 61 syl3an D V z Word ran pmTrsp D w Word ran pmTrsp D S z ++ w = S z + S S w
63 62 3expb D V z Word ran pmTrsp D w Word ran pmTrsp D S z ++ w = S z + S S w
64 63 fveq2d D V z Word ran pmTrsp D w Word ran pmTrsp D N S z ++ w = N S z + S S w
65 ccatlen z Word ran pmTrsp D w Word ran pmTrsp D z ++ w = z + w
66 65 adantl D V z Word ran pmTrsp D w Word ran pmTrsp D z ++ w = z + w
67 66 oveq2d D V z Word ran pmTrsp D w Word ran pmTrsp D 1 z ++ w = 1 z + w
68 neg1cn 1
69 68 a1i D V z Word ran pmTrsp D w Word ran pmTrsp D 1
70 lencl w Word ran pmTrsp D w 0
71 70 ad2antll D V z Word ran pmTrsp D w Word ran pmTrsp D w 0
72 36 ad2antrl D V z Word ran pmTrsp D w Word ran pmTrsp D z 0
73 69 71 72 expaddd D V z Word ran pmTrsp D w Word ran pmTrsp D 1 z + w = 1 z 1 w
74 67 73 eqtrd D V z Word ran pmTrsp D w Word ran pmTrsp D 1 z ++ w = 1 z 1 w
75 52 64 74 3eqtr3d D V z Word ran pmTrsp D w Word ran pmTrsp D N S z + S S w = 1 z 1 w
76 oveq12 x = S z y = S w x + S y = S z + S S w
77 76 fveq2d x = S z y = S w N x + S y = N S z + S S w
78 oveq12 N x = 1 z N y = 1 w N x N y = 1 z 1 w
79 77 78 eqeqan12d x = S z y = S w N x = 1 z N y = 1 w N x + S y = N x N y N S z + S S w = 1 z 1 w
80 79 an4s x = S z N x = 1 z y = S w N y = 1 w N x + S y = N x N y N S z + S S w = 1 z 1 w
81 75 80 syl5ibrcom D V z Word ran pmTrsp D w Word ran pmTrsp D x = S z N x = 1 z y = S w N y = 1 w N x + S y = N x N y
82 81 rexlimdvva D V z Word ran pmTrsp D w Word ran pmTrsp D x = S z N x = 1 z y = S w N y = 1 w N x + S y = N x N y
83 1 34 2 psgnvali y dom N w Word ran pmTrsp D y = S w N y = 1 w
84 35 83 anim12i x dom N y dom N z Word ran pmTrsp D x = S z N x = 1 z w Word ran pmTrsp D y = S w N y = 1 w
85 reeanv z Word ran pmTrsp D w Word ran pmTrsp D x = S z N x = 1 z y = S w N y = 1 w z Word ran pmTrsp D x = S z N x = 1 z w Word ran pmTrsp D y = S w N y = 1 w
86 84 85 sylibr x dom N y dom N z Word ran pmTrsp D w Word ran pmTrsp D x = S z N x = 1 z y = S w N y = 1 w
87 82 86 impel D V x dom N y dom N N x + S y = N x N y
88 12 13 17 23 26 28 49 87 isghmd D V N F GrpHom U