Metamath Proof Explorer


Theorem efabl

Description: The image of a subgroup of the group + , under the exponential function of a scaled complex number, is an Abelian group. (Contributed by Paul Chapman, 25-Apr-2008) (Revised by Mario Carneiro, 12-May-2014) (Revised by Thierry Arnoux, 26-Jan-2020)

Ref Expression
Hypotheses efabl.1 F = x X e A x
efabl.2 G = mulGrp fld 𝑠 ran F
efabl.3 φ A
efabl.4 φ X SubGrp fld
Assertion efabl φ G Abel

Proof

Step Hyp Ref Expression
1 efabl.1 F = x X e A x
2 efabl.2 G = mulGrp fld 𝑠 ran F
3 efabl.3 φ A
4 efabl.4 φ X SubGrp fld
5 eqid Base fld 𝑠 X = Base fld 𝑠 X
6 eqid Base G = Base G
7 eqid + fld 𝑠 X = + fld 𝑠 X
8 eqid + G = + G
9 simp1 φ x Base fld 𝑠 X y Base fld 𝑠 X φ
10 simp2 φ x Base fld 𝑠 X y Base fld 𝑠 X x Base fld 𝑠 X
11 eqid fld 𝑠 X = fld 𝑠 X
12 11 subgbas X SubGrp fld X = Base fld 𝑠 X
13 4 12 syl φ X = Base fld 𝑠 X
14 13 3ad2ant1 φ x Base fld 𝑠 X y Base fld 𝑠 X X = Base fld 𝑠 X
15 10 14 eleqtrrd φ x Base fld 𝑠 X y Base fld 𝑠 X x X
16 simp3 φ x Base fld 𝑠 X y Base fld 𝑠 X y Base fld 𝑠 X
17 16 14 eleqtrrd φ x Base fld 𝑠 X y Base fld 𝑠 X y X
18 3 4 jca φ A X SubGrp fld
19 1 efgh A X SubGrp fld x X y X F x + y = F x F y
20 18 19 syl3an1 φ x X y X F x + y = F x F y
21 cnfldadd + = + fld
22 11 21 ressplusg X SubGrp fld + = + fld 𝑠 X
23 4 22 syl φ + = + fld 𝑠 X
24 23 3ad2ant1 φ x X y X + = + fld 𝑠 X
25 24 oveqd φ x X y X x + y = x + fld 𝑠 X y
26 25 fveq2d φ x X y X F x + y = F x + fld 𝑠 X y
27 mptexg X SubGrp fld x X e A x V
28 1 27 eqeltrid X SubGrp fld F V
29 rnexg F V ran F V
30 4 28 29 3syl φ ran F V
31 eqid mulGrp fld = mulGrp fld
32 cnfldmul × = fld
33 31 32 mgpplusg × = + mulGrp fld
34 2 33 ressplusg ran F V × = + G
35 30 34 syl φ × = + G
36 35 3ad2ant1 φ x X y X × = + G
37 36 oveqd φ x X y X F x F y = F x + G F y
38 20 26 37 3eqtr3d φ x X y X F x + fld 𝑠 X y = F x + G F y
39 9 15 17 38 syl3anc φ x Base fld 𝑠 X y Base fld 𝑠 X F x + fld 𝑠 X y = F x + G F y
40 fvex e A x V
41 40 1 fnmpti F Fn X
42 dffn4 F Fn X F : X onto ran F
43 41 42 mpbi F : X onto ran F
44 eqidd φ F = F
45 eff exp :
46 45 a1i φ x X exp :
47 3 adantr φ x X A
48 cnfldbas = Base fld
49 48 subgss X SubGrp fld X
50 4 49 syl φ X
51 50 sselda φ x X x
52 47 51 mulcld φ x X A x
53 46 52 ffvelrnd φ x X e A x
54 53 ralrimiva φ x X e A x
55 1 rnmptss x X e A x ran F
56 31 48 mgpbas = Base mulGrp fld
57 2 56 ressbas2 ran F ran F = Base G
58 54 55 57 3syl φ ran F = Base G
59 44 13 58 foeq123d φ F : X onto ran F F : Base fld 𝑠 X onto Base G
60 43 59 mpbii φ F : Base fld 𝑠 X onto Base G
61 cnring fld Ring
62 ringabl fld Ring fld Abel
63 61 62 ax-mp fld Abel
64 11 subgabl fld Abel X SubGrp fld fld 𝑠 X Abel
65 63 4 64 sylancr φ fld 𝑠 X Abel
66 5 6 7 8 39 60 65 ghmabl φ G Abel