Step | Hyp | Ref
| Expression |
1 | | zre 12558 |
. . . . . 6
โข (๐ โ โค โ ๐ โ
โ) |
2 | | nnrp 12981 |
. . . . . 6
โข (๐ โ โ โ ๐ โ
โ+) |
3 | | modval 13832 |
. . . . . 6
โข ((๐ โ โ โง ๐ โ โ+)
โ (๐ mod ๐) = (๐ โ (๐ ยท (โโ(๐ / ๐))))) |
4 | 1, 2, 3 | syl2an 596 |
. . . . 5
โข ((๐ โ โค โง ๐ โ โ) โ (๐ mod ๐) = (๐ โ (๐ ยท (โโ(๐ / ๐))))) |
5 | 4 | 3ad2ant2 1134 |
. . . 4
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ (๐ mod ๐) = (๐ โ (๐ ยท (โโ(๐ / ๐))))) |
6 | 5 | oveq1d 7420 |
. . 3
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ mod ๐) ยท ๐) = ((๐ โ (๐ ยท (โโ(๐ / ๐)))) ยท ๐)) |
7 | | zcn 12559 |
. . . . . . 7
โข (๐ โ โค โ ๐ โ
โ) |
8 | 7 | adantr 481 |
. . . . . 6
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โ) |
9 | | nnz 12575 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โค) |
10 | 9 | adantl 482 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โค) |
11 | | nnre 12215 |
. . . . . . . . . . 11
โข (๐ โ โ โ ๐ โ
โ) |
12 | | nnne0 12242 |
. . . . . . . . . . 11
โข (๐ โ โ โ ๐ โ 0) |
13 | | redivcl 11929 |
. . . . . . . . . . 11
โข ((๐ โ โ โง ๐ โ โ โง ๐ โ 0) โ (๐ / ๐) โ โ) |
14 | 1, 11, 12, 13 | syl3an 1160 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ โง ๐ โ โ) โ (๐ / ๐) โ โ) |
15 | 14 | 3anidm23 1421 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ (๐ / ๐) โ โ) |
16 | 15 | flcld 13759 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ
(โโ(๐ / ๐)) โ
โค) |
17 | 10, 16 | zmulcld 12668 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ (๐ ยท (โโ(๐ / ๐))) โ โค) |
18 | 17 | zcnd 12663 |
. . . . . 6
โข ((๐ โ โค โง ๐ โ โ) โ (๐ ยท (โโ(๐ / ๐))) โ โ) |
19 | 8, 18 | negsubd 11573 |
. . . . 5
โข ((๐ โ โค โง ๐ โ โ) โ (๐ + -(๐ ยท (โโ(๐ / ๐)))) = (๐ โ (๐ ยท (โโ(๐ / ๐))))) |
20 | 19 | 3ad2ant2 1134 |
. . . 4
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ (๐ + -(๐ ยท (โโ(๐ / ๐)))) = (๐ โ (๐ ยท (โโ(๐ / ๐))))) |
21 | 20 | oveq1d 7420 |
. . 3
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ + -(๐ ยท (โโ(๐ / ๐)))) ยท ๐) = ((๐ โ (๐ ยท (โโ(๐ / ๐)))) ยท ๐)) |
22 | | simp1 1136 |
. . . 4
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ๐บ โ Grp) |
23 | | simpl 483 |
. . . . 5
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โค) |
24 | 23 | 3ad2ant2 1134 |
. . . 4
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ๐ โ
โค) |
25 | 10 | 3ad2ant2 1134 |
. . . . . 6
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ๐ โ
โค) |
26 | 16 | 3ad2ant2 1134 |
. . . . . 6
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ
(โโ(๐ / ๐)) โ
โค) |
27 | 25, 26 | zmulcld 12668 |
. . . . 5
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ (๐ ยท (โโ(๐ / ๐))) โ โค) |
28 | 27 | znegcld 12664 |
. . . 4
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ -(๐ ยท (โโ(๐ / ๐))) โ โค) |
29 | | simpl 483 |
. . . . 5
โข ((๐ โ ๐ต โง (๐ ยท ๐) = 0 ) โ ๐ โ ๐ต) |
30 | 29 | 3ad2ant3 1135 |
. . . 4
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ๐ โ ๐ต) |
31 | | mulgmodid.b |
. . . . 5
โข ๐ต = (Baseโ๐บ) |
32 | | mulgmodid.t |
. . . . 5
โข ยท =
(.gโ๐บ) |
33 | | eqid 2732 |
. . . . 5
โข
(+gโ๐บ) = (+gโ๐บ) |
34 | 31, 32, 33 | mulgdir 18980 |
. . . 4
โข ((๐บ โ Grp โง (๐ โ โค โง -(๐ ยท (โโ(๐ / ๐))) โ โค โง ๐ โ ๐ต)) โ ((๐ + -(๐ ยท (โโ(๐ / ๐)))) ยท ๐) = ((๐ ยท ๐)(+gโ๐บ)(-(๐ ยท (โโ(๐ / ๐))) ยท ๐))) |
35 | 22, 24, 28, 30, 34 | syl13anc 1372 |
. . 3
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ + -(๐ ยท (โโ(๐ / ๐)))) ยท ๐) = ((๐ ยท ๐)(+gโ๐บ)(-(๐ ยท (โโ(๐ / ๐))) ยท ๐))) |
36 | 6, 21, 35 | 3eqtr2d 2778 |
. 2
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ mod ๐) ยท ๐) = ((๐ ยท ๐)(+gโ๐บ)(-(๐ ยท (โโ(๐ / ๐))) ยท ๐))) |
37 | | nncn 12216 |
. . . . . . . 8
โข (๐ โ โ โ ๐ โ
โ) |
38 | 37 | adantl 482 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โ) |
39 | 16 | zcnd 12663 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ
(โโ(๐ / ๐)) โ
โ) |
40 | 38, 39 | mulneg2d 11664 |
. . . . . 6
โข ((๐ โ โค โง ๐ โ โ) โ (๐ ยท -(โโ(๐ / ๐))) = -(๐ ยท (โโ(๐ / ๐)))) |
41 | 40 | 3ad2ant2 1134 |
. . . . 5
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ (๐ ยท -(โโ(๐ / ๐))) = -(๐ ยท (โโ(๐ / ๐)))) |
42 | 41 | oveq1d 7420 |
. . . 4
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ ยท -(โโ(๐ / ๐))) ยท ๐) = (-(๐ ยท (โโ(๐ / ๐))) ยท ๐)) |
43 | 15 | 3ad2ant2 1134 |
. . . . . . . 8
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ (๐ / ๐) โ โ) |
44 | 43 | flcld 13759 |
. . . . . . 7
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ
(โโ(๐ / ๐)) โ
โค) |
45 | 44 | znegcld 12664 |
. . . . . 6
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ
-(โโ(๐ / ๐)) โ
โค) |
46 | 31, 32 | mulgassr 18986 |
. . . . . 6
โข ((๐บ โ Grp โง
(-(โโ(๐ / ๐)) โ โค โง ๐ โ โค โง ๐ โ ๐ต)) โ ((๐ ยท -(โโ(๐ / ๐))) ยท ๐) = (-(โโ(๐ / ๐)) ยท (๐ ยท ๐))) |
47 | 22, 45, 25, 30, 46 | syl13anc 1372 |
. . . . 5
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ ยท -(โโ(๐ / ๐))) ยท ๐) = (-(โโ(๐ / ๐)) ยท (๐ ยท ๐))) |
48 | | oveq2 7413 |
. . . . . . 7
โข ((๐ ยท ๐) = 0 โ
(-(โโ(๐ / ๐)) ยท (๐ ยท ๐)) = (-(โโ(๐ / ๐)) ยท 0 )) |
49 | 48 | adantl 482 |
. . . . . 6
โข ((๐ โ ๐ต โง (๐ ยท ๐) = 0 ) โ
(-(โโ(๐ / ๐)) ยท (๐ ยท ๐)) = (-(โโ(๐ / ๐)) ยท 0 )) |
50 | 49 | 3ad2ant3 1135 |
. . . . 5
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ
(-(โโ(๐ / ๐)) ยท (๐ ยท ๐)) = (-(โโ(๐ / ๐)) ยท 0 )) |
51 | | mulgmodid.o |
. . . . . . 7
โข 0 =
(0gโ๐บ) |
52 | 31, 32, 51 | mulgz 18976 |
. . . . . 6
โข ((๐บ โ Grp โง
-(โโ(๐ / ๐)) โ โค) โ
(-(โโ(๐ / ๐)) ยท 0 ) = 0 ) |
53 | 22, 45, 52 | syl2anc 584 |
. . . . 5
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ
(-(โโ(๐ / ๐)) ยท 0 ) = 0 ) |
54 | 47, 50, 53 | 3eqtrd 2776 |
. . . 4
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ ยท -(โโ(๐ / ๐))) ยท ๐) = 0 ) |
55 | 42, 54 | eqtr3d 2774 |
. . 3
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ (-(๐ ยท (โโ(๐ / ๐))) ยท ๐) = 0 ) |
56 | 55 | oveq2d 7421 |
. 2
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ ยท ๐)(+gโ๐บ)(-(๐ ยท (โโ(๐ / ๐))) ยท ๐)) = ((๐ ยท ๐)(+gโ๐บ) 0 )) |
57 | | id 22 |
. . . 4
โข (๐บ โ Grp โ ๐บ โ Grp) |
58 | 31, 32 | mulgcl 18965 |
. . . 4
โข ((๐บ โ Grp โง ๐ โ โค โง ๐ โ ๐ต) โ (๐ ยท ๐) โ ๐ต) |
59 | 57, 23, 29, 58 | syl3an 1160 |
. . 3
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ (๐ ยท ๐) โ ๐ต) |
60 | 31, 33, 51 | grprid 18849 |
. . 3
โข ((๐บ โ Grp โง (๐ ยท ๐) โ ๐ต) โ ((๐ ยท ๐)(+gโ๐บ) 0 ) = (๐ ยท ๐)) |
61 | 22, 59, 60 | syl2anc 584 |
. 2
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ ยท ๐)(+gโ๐บ) 0 ) = (๐ ยท ๐)) |
62 | 36, 56, 61 | 3eqtrd 2776 |
1
โข ((๐บ โ Grp โง (๐ โ โค โง ๐ โ โ) โง (๐ โ ๐ต โง (๐ ยท ๐) = 0 )) โ ((๐ mod ๐) ยท ๐) = (๐ ยท ๐)) |