Proof of Theorem dchrabs
Step | Hyp | Ref
| Expression |
1 | | dchrabs.g |
. . . . . . 7
DChr   |
2 | | dchrabs.z |
. . . . . . 7
ℤ/nℤ   |
3 | | dchrabs.d |
. . . . . . 7
     |
4 | | eqid 2622 |
. . . . . . 7
         |
5 | | dchrabs.x |
. . . . . . 7
   |
6 | 1, 2, 3, 4, 5 | dchrf 24967 |
. . . . . 6
           |
7 | | dchrabs.u |
. . . . . . . 8
Unit   |
8 | 4, 7 | unitss 18660 |
. . . . . . 7
     |
9 | | dchrabs.a |
. . . . . . 7
   |
10 | 8, 9 | sseldi 3601 |
. . . . . 6
       |
11 | 6, 10 | ffvelrnd 6360 |
. . . . 5
       |
12 | 1, 2, 3, 4, 7, 5, 10 | dchrn0 24975 |
. . . . . 6
         |
13 | 9, 12 | mpbird 247 |
. . . . 5
       |
14 | 11, 13 | absrpcld 14187 |
. . . 4
           |
15 | 1, 3 | dchrrcl 24965 |
. . . . . . . 8
   |
16 | 2, 4 | znfi 19908 |
. . . . . . . 8
       |
17 | 5, 15, 16 | 3syl 18 |
. . . . . . 7
       |
18 | | ssfi 8180 |
. . . . . . 7
             |
19 | 17, 8, 18 | sylancl 694 |
. . . . . 6
   |
20 | | hashcl 13147 |
. . . . . 6
       |
21 | 19, 20 | syl 17 |
. . . . 5
       |
22 | 21 | nn0red 11352 |
. . . 4
       |
23 | 22 | recnd 10068 |
. . . . 5
       |
24 | | ne0i 3921 |
. . . . . . . 8
   |
25 | 9, 24 | syl 17 |
. . . . . . 7
   |
26 | | hashnncl 13157 |
. . . . . . . 8
     
   |
27 | 19, 26 | syl 17 |
. . . . . . 7
     
   |
28 | 25, 27 | mpbird 247 |
. . . . . 6
       |
29 | 28 | nnne0d 11065 |
. . . . 5
       |
30 | 23, 29 | reccld 10794 |
. . . 4
         |
31 | 14, 22, 30 | cxpmuld 24480 |
. . 3
                                                  |
32 | 23, 29 | recidd 10796 |
. . . 4
               |
33 | 32 | oveq2d 6666 |
. . 3
                                     |
34 | 11 | abscld 14175 |
. . . . . . 7
           |
35 | 34 | recnd 10068 |
. . . . . 6
           |
36 | | cxpexp 24414 |
. . . . . 6
                                                |
37 | 35, 21, 36 | syl2anc 693 |
. . . . 5
                                  |
38 | 11, 21 | absexpd 14191 |
. . . . 5
                                   |
39 | | cnring 19768 |
. . . . . . . . . . 11
ℂfld  |
40 | | cnfldbas 19750 |
. . . . . . . . . . . . 13
  ℂfld |
41 | | cnfld0 19770 |
. . . . . . . . . . . . 13
  ℂfld |
42 | | cndrng 19775 |
. . . . . . . . . . . . 13
ℂfld  |
43 | 40, 41, 42 | drngui 18753 |
. . . . . . . . . . . 12
    Unit ℂfld |
44 | | eqid 2622 |
. . . . . . . . . . . 12
mulGrp ℂfld mulGrp ℂfld |
45 | 43, 44 | unitsubm 18670 |
. . . . . . . . . . 11
ℂfld     SubMnd mulGrp ℂfld   |
46 | 39, 45 | mp1i 13 |
. . . . . . . . . 10
     SubMnd mulGrp ℂfld   |
47 | | eldifsn 4317 |
. . . . . . . . . . 11
                     |
48 | 11, 13, 47 | sylanbrc 698 |
. . . . . . . . . 10
           |
49 | | eqid 2622 |
. . . . . . . . . . 11
.g mulGrp ℂfld .g mulGrp ℂfld  |
50 | | eqid 2622 |
. . . . . . . . . . 11
 mulGrp ℂfld ↾s 
     mulGrp ℂfld
↾s       |
51 | | eqid 2622 |
. . . . . . . . . . 11
.g  mulGrp ℂfld
↾s       .g  mulGrp ℂfld
↾s        |
52 | 49, 50, 51 | submmulg 17586 |
. . . . . . . . . 10
      SubMnd mulGrp ℂfld    
               .g mulGrp ℂfld             .g  mulGrp ℂfld
↾s               |
53 | 46, 21, 48, 52 | syl3anc 1326 |
. . . . . . . . 9
       .g mulGrp ℂfld             .g  mulGrp ℂfld
↾s               |
54 | | eqid 2622 |
. . . . . . . . . . . 12
 mulGrp 
↾s   mulGrp  ↾s   |
55 | 1, 2, 3, 7, 54, 50, 5 | dchrghm 24981 |
. . . . . . . . . . 11
     mulGrp 
↾s   mulGrp ℂfld ↾s 
       |
56 | 21 | nn0zd 11480 |
. . . . . . . . . . 11
       |
57 | 7, 54 | unitgrpbas 18666 |
. . . . . . . . . . . 12
    mulGrp  ↾s    |
58 | | eqid 2622 |
. . . . . . . . . . . 12
.g  mulGrp  ↾s   .g  mulGrp  ↾s    |
59 | 57, 58, 51 | ghmmulg 17672 |
. . . . . . . . . . 11
      mulGrp 
↾s   mulGrp ℂfld ↾s 
        
            .g  mulGrp 
↾s            .g  mulGrp ℂfld ↾s                 |
60 | 55, 56, 9, 59 | syl3anc 1326 |
. . . . . . . . . 10
            .g  mulGrp 
↾s            .g  mulGrp ℂfld ↾s                 |
61 | 5, 15 | syl 17 |
. . . . . . . . . . . . . . . . 17
   |
62 | 61 | nnnn0d 11351 |
. . . . . . . . . . . . . . . 16
   |
63 | 2 | zncrng 19893 |
. . . . . . . . . . . . . . . 16

  |
64 | | crngring 18558 |
. . . . . . . . . . . . . . . 16

  |
65 | 62, 63, 64 | 3syl 18 |
. . . . . . . . . . . . . . 15
   |
66 | 7, 54 | unitgrp 18667 |
. . . . . . . . . . . . . . 15

 mulGrp 
↾s    |
67 | 65, 66 | syl 17 |
. . . . . . . . . . . . . 14
  mulGrp  ↾s    |
68 | | eqid 2622 |
. . . . . . . . . . . . . . 15
    mulGrp 
↾s       mulGrp  ↾s    |
69 | 57, 68 | oddvds2 17983 |
. . . . . . . . . . . . . 14
   mulGrp  ↾s 
      mulGrp  ↾s     
      |
70 | 67, 19, 9, 69 | syl3anc 1326 |
. . . . . . . . . . . . 13
      mulGrp  ↾s     
      |
71 | | eqid 2622 |
. . . . . . . . . . . . . . 15
    mulGrp 
↾s       mulGrp  ↾s    |
72 | 57, 68, 58, 71 | oddvds 17966 |
. . . . . . . . . . . . . 14
   mulGrp  ↾s             mulGrp 
↾s         
      .g  mulGrp  ↾s         mulGrp 
↾s      |
73 | 67, 9, 56, 72 | syl3anc 1326 |
. . . . . . . . . . . . 13
       mulGrp 
↾s         
      .g  mulGrp  ↾s         mulGrp 
↾s      |
74 | 70, 73 | mpbid 222 |
. . . . . . . . . . . 12
       .g  mulGrp 
↾s         mulGrp 
↾s     |
75 | | eqid 2622 |
. . . . . . . . . . . . . 14
         |
76 | 7, 54, 75 | unitgrpid 18669 |
. . . . . . . . . . . . 13

        mulGrp  ↾s     |
77 | 65, 76 | syl 17 |
. . . . . . . . . . . 12
         mulGrp 
↾s     |
78 | 74, 77 | eqtr4d 2659 |
. . . . . . . . . . 11
       .g  mulGrp 
↾s           |
79 | 78 | fveq2d 6195 |
. . . . . . . . . 10
            .g  mulGrp 
↾s                  |
80 | | fvres 6207 |
. . . . . . . . . . . 12
             |
81 | 9, 80 | syl 17 |
. . . . . . . . . . 11
             |
82 | 81 | oveq2d 6666 |
. . . . . . . . . 10
       .g  mulGrp ℂfld ↾s                     .g  mulGrp ℂfld
↾s               |
83 | 60, 79, 82 | 3eqtr3d 2664 |
. . . . . . . . 9
                 .g  mulGrp ℂfld
↾s               |
84 | 7, 75 | 1unit 18658 |
. . . . . . . . . 10

      |
85 | | fvres 6207 |
. . . . . . . . . 10
                         |
86 | 65, 84, 85 | 3syl 18 |
. . . . . . . . 9
                     |
87 | 53, 83, 86 | 3eqtr2d 2662 |
. . . . . . . 8
       .g mulGrp ℂfld                 |
88 | | cnfldexp 19779 |
. . . . . . . . 9
                 .g mulGrp ℂfld                     |
89 | 11, 21, 88 | syl2anc 693 |
. . . . . . . 8
       .g mulGrp ℂfld                     |
90 | 1, 2, 3 | dchrmhm 24966 |
. . . . . . . . . 10
 mulGrp  MndHom mulGrp ℂfld  |
91 | 90, 5 | sseldi 3601 |
. . . . . . . . 9
  mulGrp  MndHom mulGrp ℂfld   |
92 | | eqid 2622 |
. . . . . . . . . . 11
mulGrp  mulGrp   |
93 | 92, 75 | ringidval 18503 |
. . . . . . . . . 10
       mulGrp    |
94 | | cnfld1 19771 |
. . . . . . . . . . 11
  ℂfld |
95 | 44, 94 | ringidval 18503 |
. . . . . . . . . 10
   mulGrp ℂfld  |
96 | 93, 95 | mhm0 17343 |
. . . . . . . . 9
  mulGrp 
MndHom mulGrp ℂfld           |
97 | 91, 96 | syl 17 |
. . . . . . . 8
           |
98 | 87, 89, 97 | 3eqtr3d 2664 |
. . . . . . 7
               |
99 | 98 | fveq2d 6195 |
. . . . . 6
                       |
100 | | abs1 14037 |
. . . . . 6
     |
101 | 99, 100 | syl6eq 2672 |
. . . . 5
                   |
102 | 37, 38, 101 | 3eqtr2d 2662 |
. . . 4
                  |
103 | 102 | oveq1d 6665 |
. . 3
                                    |
104 | 31, 33, 103 | 3eqtr3d 2664 |
. 2
                       |
105 | 35 | cxp1d 24452 |
. 2
                      |
106 | 30 | 1cxpd 24453 |
. 2
            |
107 | 104, 105,
106 | 3eqtr3d 2664 |
1
           |