Step |
Hyp |
Ref |
Expression |
1 |
|
mulgdi.b |
โข ๐ต = ( Base โ ๐บ ) |
2 |
|
mulgdi.m |
โข ยท = ( .g โ ๐บ ) |
3 |
|
mulgdi.p |
โข + = ( +g โ ๐บ ) |
4 |
|
ablcmn |
โข ( ๐บ โ Abel โ ๐บ โ CMnd ) |
5 |
4
|
ad2antrr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง ๐ โ โ0 ) โ ๐บ โ CMnd ) |
6 |
|
simpr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง ๐ โ โ0 ) โ ๐ โ โ0 ) |
7 |
|
simplr2 |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง ๐ โ โ0 ) โ ๐ โ ๐ต ) |
8 |
|
simplr3 |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง ๐ โ โ0 ) โ ๐ โ ๐ต ) |
9 |
1 2 3
|
mulgnn0di |
โข ( ( ๐บ โ CMnd โง ( ๐ โ โ0 โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ๐ ยท ( ๐ + ๐ ) ) = ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) |
10 |
5 6 7 8 9
|
syl13anc |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง ๐ โ โ0 ) โ ( ๐ ยท ( ๐ + ๐ ) ) = ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) |
11 |
4
|
ad2antrr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ๐บ โ CMnd ) |
12 |
|
simpr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ - ๐ โ โ0 ) |
13 |
|
simpr2 |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ๐ โ ๐ต ) |
14 |
13
|
adantr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ๐ โ ๐ต ) |
15 |
|
simpr3 |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ๐ โ ๐ต ) |
16 |
15
|
adantr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ๐ โ ๐ต ) |
17 |
1 2 3
|
mulgnn0di |
โข ( ( ๐บ โ CMnd โง ( - ๐ โ โ0 โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( - ๐ ยท ( ๐ + ๐ ) ) = ( ( - ๐ ยท ๐ ) + ( - ๐ ยท ๐ ) ) ) |
18 |
11 12 14 16 17
|
syl13anc |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( - ๐ ยท ( ๐ + ๐ ) ) = ( ( - ๐ ยท ๐ ) + ( - ๐ ยท ๐ ) ) ) |
19 |
|
ablgrp |
โข ( ๐บ โ Abel โ ๐บ โ Grp ) |
20 |
19
|
adantr |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ๐บ โ Grp ) |
21 |
|
simpr1 |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ๐ โ โค ) |
22 |
1 3
|
grpcl |
โข ( ( ๐บ โ Grp โง ๐ โ ๐ต โง ๐ โ ๐ต ) โ ( ๐ + ๐ ) โ ๐ต ) |
23 |
20 13 15 22
|
syl3anc |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ๐ + ๐ ) โ ๐ต ) |
24 |
|
eqid |
โข ( invg โ ๐บ ) = ( invg โ ๐บ ) |
25 |
1 2 24
|
mulgneg |
โข ( ( ๐บ โ Grp โง ๐ โ โค โง ( ๐ + ๐ ) โ ๐ต ) โ ( - ๐ ยท ( ๐ + ๐ ) ) = ( ( invg โ ๐บ ) โ ( ๐ ยท ( ๐ + ๐ ) ) ) ) |
26 |
20 21 23 25
|
syl3anc |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( - ๐ ยท ( ๐ + ๐ ) ) = ( ( invg โ ๐บ ) โ ( ๐ ยท ( ๐ + ๐ ) ) ) ) |
27 |
26
|
adantr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( - ๐ ยท ( ๐ + ๐ ) ) = ( ( invg โ ๐บ ) โ ( ๐ ยท ( ๐ + ๐ ) ) ) ) |
28 |
1 2 24
|
mulgneg |
โข ( ( ๐บ โ Grp โง ๐ โ โค โง ๐ โ ๐ต ) โ ( - ๐ ยท ๐ ) = ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) |
29 |
20 21 13 28
|
syl3anc |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( - ๐ ยท ๐ ) = ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) |
30 |
1 2 24
|
mulgneg |
โข ( ( ๐บ โ Grp โง ๐ โ โค โง ๐ โ ๐ต ) โ ( - ๐ ยท ๐ ) = ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) |
31 |
20 21 15 30
|
syl3anc |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( - ๐ ยท ๐ ) = ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) |
32 |
29 31
|
oveq12d |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ( - ๐ ยท ๐ ) + ( - ๐ ยท ๐ ) ) = ( ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) + ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) ) |
33 |
32
|
adantr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ( - ๐ ยท ๐ ) + ( - ๐ ยท ๐ ) ) = ( ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) + ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) ) |
34 |
18 27 33
|
3eqtr3d |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ( invg โ ๐บ ) โ ( ๐ ยท ( ๐ + ๐ ) ) ) = ( ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) + ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) ) |
35 |
|
simpl |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ๐บ โ Abel ) |
36 |
1 2
|
mulgcl |
โข ( ( ๐บ โ Grp โง ๐ โ โค โง ๐ โ ๐ต ) โ ( ๐ ยท ๐ ) โ ๐ต ) |
37 |
20 21 13 36
|
syl3anc |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ๐ ยท ๐ ) โ ๐ต ) |
38 |
1 2
|
mulgcl |
โข ( ( ๐บ โ Grp โง ๐ โ โค โง ๐ โ ๐ต ) โ ( ๐ ยท ๐ ) โ ๐ต ) |
39 |
20 21 15 38
|
syl3anc |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ๐ ยท ๐ ) โ ๐ต ) |
40 |
1 3 24
|
ablinvadd |
โข ( ( ๐บ โ Abel โง ( ๐ ยท ๐ ) โ ๐ต โง ( ๐ ยท ๐ ) โ ๐ต ) โ ( ( invg โ ๐บ ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) = ( ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) + ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) ) |
41 |
35 37 39 40
|
syl3anc |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ( invg โ ๐บ ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) = ( ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) + ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) ) |
42 |
41
|
adantr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ( invg โ ๐บ ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) = ( ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) + ( ( invg โ ๐บ ) โ ( ๐ ยท ๐ ) ) ) ) |
43 |
34 42
|
eqtr4d |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ( invg โ ๐บ ) โ ( ๐ ยท ( ๐ + ๐ ) ) ) = ( ( invg โ ๐บ ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) ) |
44 |
43
|
fveq2d |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ( invg โ ๐บ ) โ ( ( invg โ ๐บ ) โ ( ๐ ยท ( ๐ + ๐ ) ) ) ) = ( ( invg โ ๐บ ) โ ( ( invg โ ๐บ ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) ) ) |
45 |
1 2
|
mulgcl |
โข ( ( ๐บ โ Grp โง ๐ โ โค โง ( ๐ + ๐ ) โ ๐ต ) โ ( ๐ ยท ( ๐ + ๐ ) ) โ ๐ต ) |
46 |
20 21 23 45
|
syl3anc |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ๐ ยท ( ๐ + ๐ ) ) โ ๐ต ) |
47 |
46
|
adantr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ๐ ยท ( ๐ + ๐ ) ) โ ๐ต ) |
48 |
1 24
|
grpinvinv |
โข ( ( ๐บ โ Grp โง ( ๐ ยท ( ๐ + ๐ ) ) โ ๐ต ) โ ( ( invg โ ๐บ ) โ ( ( invg โ ๐บ ) โ ( ๐ ยท ( ๐ + ๐ ) ) ) ) = ( ๐ ยท ( ๐ + ๐ ) ) ) |
49 |
20 47 48
|
syl2an2r |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ( invg โ ๐บ ) โ ( ( invg โ ๐บ ) โ ( ๐ ยท ( ๐ + ๐ ) ) ) ) = ( ๐ ยท ( ๐ + ๐ ) ) ) |
50 |
1 3
|
grpcl |
โข ( ( ๐บ โ Grp โง ( ๐ ยท ๐ ) โ ๐ต โง ( ๐ ยท ๐ ) โ ๐ต ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) โ ๐ต ) |
51 |
20 37 39 50
|
syl3anc |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) โ ๐ต ) |
52 |
51
|
adantr |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) โ ๐ต ) |
53 |
1 24
|
grpinvinv |
โข ( ( ๐บ โ Grp โง ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) โ ๐ต ) โ ( ( invg โ ๐บ ) โ ( ( invg โ ๐บ ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) ) = ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) |
54 |
20 52 53
|
syl2an2r |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ( invg โ ๐บ ) โ ( ( invg โ ๐บ ) โ ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) ) = ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) |
55 |
44 49 54
|
3eqtr3d |
โข ( ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โง - ๐ โ โ0 ) โ ( ๐ ยท ( ๐ + ๐ ) ) = ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) |
56 |
|
elznn0 |
โข ( ๐ โ โค โ ( ๐ โ โ โง ( ๐ โ โ0 โจ - ๐ โ โ0 ) ) ) |
57 |
56
|
simprbi |
โข ( ๐ โ โค โ ( ๐ โ โ0 โจ - ๐ โ โ0 ) ) |
58 |
21 57
|
syl |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ๐ โ โ0 โจ - ๐ โ โ0 ) ) |
59 |
10 55 58
|
mpjaodan |
โข ( ( ๐บ โ Abel โง ( ๐ โ โค โง ๐ โ ๐ต โง ๐ โ ๐ต ) ) โ ( ๐ ยท ( ๐ + ๐ ) ) = ( ( ๐ ยท ๐ ) + ( ๐ ยท ๐ ) ) ) |