Metamath Proof Explorer


Theorem cnfldexp

Description: The exponentiation operator in the field of complex numbers (for nonnegative exponents). (Contributed by Mario Carneiro, 15-Jun-2015)

Ref Expression
Assertion cnfldexp AB0BmulGrpfldA=AB

Proof

Step Hyp Ref Expression
1 oveq1 x=0xmulGrpfldA=0mulGrpfldA
2 oveq2 x=0Ax=A0
3 1 2 eqeq12d x=0xmulGrpfldA=Ax0mulGrpfldA=A0
4 3 imbi2d x=0AxmulGrpfldA=AxA0mulGrpfldA=A0
5 oveq1 x=yxmulGrpfldA=ymulGrpfldA
6 oveq2 x=yAx=Ay
7 5 6 eqeq12d x=yxmulGrpfldA=AxymulGrpfldA=Ay
8 7 imbi2d x=yAxmulGrpfldA=AxAymulGrpfldA=Ay
9 oveq1 x=y+1xmulGrpfldA=y+1mulGrpfldA
10 oveq2 x=y+1Ax=Ay+1
11 9 10 eqeq12d x=y+1xmulGrpfldA=Axy+1mulGrpfldA=Ay+1
12 11 imbi2d x=y+1AxmulGrpfldA=AxAy+1mulGrpfldA=Ay+1
13 oveq1 x=BxmulGrpfldA=BmulGrpfldA
14 oveq2 x=BAx=AB
15 13 14 eqeq12d x=BxmulGrpfldA=AxBmulGrpfldA=AB
16 15 imbi2d x=BAxmulGrpfldA=AxABmulGrpfldA=AB
17 eqid mulGrpfld=mulGrpfld
18 cnfldbas =Basefld
19 17 18 mgpbas =BasemulGrpfld
20 cnfld1 1=1fld
21 17 20 ringidval 1=0mulGrpfld
22 eqid mulGrpfld=mulGrpfld
23 19 21 22 mulg0 A0mulGrpfldA=1
24 exp0 AA0=1
25 23 24 eqtr4d A0mulGrpfldA=A0
26 oveq1 ymulGrpfldA=AyymulGrpfldAA=AyA
27 cnring fldRing
28 17 ringmgp fldRingmulGrpfldMnd
29 27 28 ax-mp mulGrpfldMnd
30 cnfldmul ×=fld
31 17 30 mgpplusg ×=+mulGrpfld
32 19 22 31 mulgnn0p1 mulGrpfldMndy0Ay+1mulGrpfldA=ymulGrpfldAA
33 29 32 mp3an1 y0Ay+1mulGrpfldA=ymulGrpfldAA
34 33 ancoms Ay0y+1mulGrpfldA=ymulGrpfldAA
35 expp1 Ay0Ay+1=AyA
36 34 35 eqeq12d Ay0y+1mulGrpfldA=Ay+1ymulGrpfldAA=AyA
37 26 36 imbitrrid Ay0ymulGrpfldA=Ayy+1mulGrpfldA=Ay+1
38 37 expcom y0AymulGrpfldA=Ayy+1mulGrpfldA=Ay+1
39 38 a2d y0AymulGrpfldA=AyAy+1mulGrpfldA=Ay+1
40 4 8 12 16 25 39 nn0ind B0ABmulGrpfldA=AB
41 40 impcom AB0BmulGrpfldA=AB