Step | Hyp | Ref
| Expression |
1 | | gexcl.1 |
. . . . . 6
โข ๐ = (Baseโ๐บ) |
2 | | gexcl.2 |
. . . . . 6
โข ๐ธ = (gExโ๐บ) |
3 | | gexid.3 |
. . . . . 6
โข ยท =
(.gโ๐บ) |
4 | | gexid.4 |
. . . . . 6
โข 0 =
(0gโ๐บ) |
5 | 1, 2, 3, 4 | gexdvdsi 19445 |
. . . . 5
โข ((๐บ โ Grp โง ๐ฅ โ ๐ โง ๐ธ โฅ ๐) โ (๐ ยท ๐ฅ) = 0 ) |
6 | 5 | 3expia 1121 |
. . . 4
โข ((๐บ โ Grp โง ๐ฅ โ ๐) โ (๐ธ โฅ ๐ โ (๐ ยท ๐ฅ) = 0 )) |
7 | 6 | ralrimdva 3154 |
. . 3
โข (๐บ โ Grp โ (๐ธ โฅ ๐ โ โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 )) |
8 | 7 | adantr 481 |
. 2
โข ((๐บ โ Grp โง ๐ โ โค) โ (๐ธ โฅ ๐ โ โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 )) |
9 | | noel 4329 |
. . . . . . 7
โข ยฌ
(absโ๐) โ
โ
|
10 | | simprr 771 |
. . . . . . . . . 10
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
{๐ฆ โ โ โฃ
โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } =
โ
) |
11 | 10 | eleq2d 2819 |
. . . . . . . . 9
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
((absโ๐) โ
{๐ฆ โ โ โฃ
โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } โ (absโ๐) โ
โ
)) |
12 | | oveq1 7412 |
. . . . . . . . . . . 12
โข (๐ฆ = (absโ๐) โ (๐ฆ ยท ๐ฅ) = ((absโ๐) ยท ๐ฅ)) |
13 | 12 | eqeq1d 2734 |
. . . . . . . . . . 11
โข (๐ฆ = (absโ๐) โ ((๐ฆ ยท ๐ฅ) = 0 โ ((absโ๐) ยท ๐ฅ) = 0 )) |
14 | 13 | ralbidv 3177 |
. . . . . . . . . 10
โข (๐ฆ = (absโ๐) โ (โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 โ โ๐ฅ โ ๐ ((absโ๐) ยท ๐ฅ) = 0 )) |
15 | 14 | elrab 3682 |
. . . . . . . . 9
โข
((absโ๐)
โ {๐ฆ โ โ
โฃ โ๐ฅ โ
๐ (๐ฆ ยท ๐ฅ) = 0 } โ ((absโ๐) โ โ โง
โ๐ฅ โ ๐ ((absโ๐) ยท ๐ฅ) = 0 )) |
16 | 11, 15 | bitr3di 285 |
. . . . . . . 8
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
((absโ๐) โ
โ
โ ((absโ๐) โ โ โง โ๐ฅ โ ๐ ((absโ๐) ยท ๐ฅ) = 0 ))) |
17 | 16 | rbaibd 541 |
. . . . . . 7
โข ((((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โง
โ๐ฅ โ ๐ ((absโ๐) ยท ๐ฅ) = 0 ) โ ((absโ๐) โ โ
โ
(absโ๐) โ
โ)) |
18 | 9, 17 | mtbii 325 |
. . . . . 6
โข ((((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โง
โ๐ฅ โ ๐ ((absโ๐) ยท ๐ฅ) = 0 ) โ ยฌ
(absโ๐) โ
โ) |
19 | 18 | ex 413 |
. . . . 5
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
(โ๐ฅ โ ๐ ((absโ๐) ยท ๐ฅ) = 0 โ ยฌ
(absโ๐) โ
โ)) |
20 | | nn0abscl 15255 |
. . . . . . . 8
โข (๐ โ โค โ
(absโ๐) โ
โ0) |
21 | 20 | ad2antlr 725 |
. . . . . . 7
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
(absโ๐) โ
โ0) |
22 | | elnn0 12470 |
. . . . . . 7
โข
((absโ๐)
โ โ0 โ ((absโ๐) โ โ โจ (absโ๐) = 0)) |
23 | 21, 22 | sylib 217 |
. . . . . 6
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
((absโ๐) โ
โ โจ (absโ๐)
= 0)) |
24 | 23 | ord 862 |
. . . . 5
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
(ยฌ (absโ๐) โ
โ โ (absโ๐) = 0)) |
25 | 19, 24 | syld 47 |
. . . 4
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
(โ๐ฅ โ ๐ ((absโ๐) ยท ๐ฅ) = 0 โ (absโ๐) = 0)) |
26 | | simpr 485 |
. . . . . . . . 9
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โง (absโ๐) = ๐) โ (absโ๐) = ๐) |
27 | 26 | oveq1d 7420 |
. . . . . . . 8
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โง (absโ๐) = ๐) โ ((absโ๐) ยท ๐ฅ) = (๐ ยท ๐ฅ)) |
28 | 27 | eqeq1d 2734 |
. . . . . . 7
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โง (absโ๐) = ๐) โ (((absโ๐) ยท ๐ฅ) = 0 โ (๐ ยท ๐ฅ) = 0 )) |
29 | | oveq1 7412 |
. . . . . . . . 9
โข
((absโ๐) =
-๐ โ ((absโ๐) ยท ๐ฅ) = (-๐ ยท ๐ฅ)) |
30 | 29 | eqeq1d 2734 |
. . . . . . . 8
โข
((absโ๐) =
-๐ โ
(((absโ๐) ยท ๐ฅ) = 0 โ (-๐ ยท ๐ฅ) = 0 )) |
31 | | eqid 2732 |
. . . . . . . . . . . 12
โข
(invgโ๐บ) = (invgโ๐บ) |
32 | 1, 3, 31 | mulgneg 18966 |
. . . . . . . . . . 11
โข ((๐บ โ Grp โง ๐ โ โค โง ๐ฅ โ ๐) โ (-๐ ยท ๐ฅ) = ((invgโ๐บ)โ(๐ ยท ๐ฅ))) |
33 | 32 | 3expa 1118 |
. . . . . . . . . 10
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ (-๐ ยท ๐ฅ) = ((invgโ๐บ)โ(๐ ยท ๐ฅ))) |
34 | 4, 31 | grpinvid 18880 |
. . . . . . . . . . . 12
โข (๐บ โ Grp โ
((invgโ๐บ)โ 0 ) = 0 ) |
35 | 34 | ad2antrr 724 |
. . . . . . . . . . 11
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ ((invgโ๐บ)โ 0 ) = 0 ) |
36 | 35 | eqcomd 2738 |
. . . . . . . . . 10
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ 0 =
((invgโ๐บ)โ 0 )) |
37 | 33, 36 | eqeq12d 2748 |
. . . . . . . . 9
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ ((-๐ ยท ๐ฅ) = 0 โ
((invgโ๐บ)โ(๐ ยท ๐ฅ)) = ((invgโ๐บ)โ 0 ))) |
38 | | simpll 765 |
. . . . . . . . . 10
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ ๐บ โ Grp) |
39 | 1, 3 | mulgcl 18965 |
. . . . . . . . . . 11
โข ((๐บ โ Grp โง ๐ โ โค โง ๐ฅ โ ๐) โ (๐ ยท ๐ฅ) โ ๐) |
40 | 39 | 3expa 1118 |
. . . . . . . . . 10
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ (๐ ยท ๐ฅ) โ ๐) |
41 | 1, 4 | grpidcl 18846 |
. . . . . . . . . . 11
โข (๐บ โ Grp โ 0 โ ๐) |
42 | 41 | ad2antrr 724 |
. . . . . . . . . 10
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ 0 โ ๐) |
43 | 1, 31, 38, 40, 42 | grpinv11 18888 |
. . . . . . . . 9
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ (((invgโ๐บ)โ(๐ ยท ๐ฅ)) = ((invgโ๐บ)โ 0 ) โ (๐ ยท ๐ฅ) = 0 )) |
44 | 37, 43 | bitrd 278 |
. . . . . . . 8
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ ((-๐ ยท ๐ฅ) = 0 โ (๐ ยท ๐ฅ) = 0 )) |
45 | 30, 44 | sylan9bbr 511 |
. . . . . . 7
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โง (absโ๐) = -๐) โ (((absโ๐) ยท ๐ฅ) = 0 โ (๐ ยท ๐ฅ) = 0 )) |
46 | | zre 12558 |
. . . . . . . . 9
โข (๐ โ โค โ ๐ โ
โ) |
47 | 46 | ad2antlr 725 |
. . . . . . . 8
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ ๐ โ โ) |
48 | 47 | absord 15358 |
. . . . . . 7
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ ((absโ๐) = ๐ โจ (absโ๐) = -๐)) |
49 | 28, 45, 48 | mpjaodan 957 |
. . . . . 6
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ฅ โ ๐) โ (((absโ๐) ยท ๐ฅ) = 0 โ (๐ ยท ๐ฅ) = 0 )) |
50 | 49 | ralbidva 3175 |
. . . . 5
โข ((๐บ โ Grp โง ๐ โ โค) โ
(โ๐ฅ โ ๐ ((absโ๐) ยท ๐ฅ) = 0 โ โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 )) |
51 | 50 | adantr 481 |
. . . 4
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
(โ๐ฅ โ ๐ ((absโ๐) ยท ๐ฅ) = 0 โ โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 )) |
52 | | 0dvds 16216 |
. . . . . 6
โข (๐ โ โค โ (0
โฅ ๐ โ ๐ = 0)) |
53 | 52 | ad2antlr 725 |
. . . . 5
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ (0
โฅ ๐ โ ๐ = 0)) |
54 | | simprl 769 |
. . . . . 6
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ ๐ธ = 0) |
55 | 54 | breq1d 5157 |
. . . . 5
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
(๐ธ โฅ ๐ โ 0 โฅ ๐)) |
56 | | zcn 12559 |
. . . . . . 7
โข (๐ โ โค โ ๐ โ
โ) |
57 | 56 | ad2antlr 725 |
. . . . . 6
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ ๐ โ
โ) |
58 | 57 | abs00ad 15233 |
. . . . 5
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
((absโ๐) = 0 โ
๐ = 0)) |
59 | 53, 55, 58 | 3bitr4rd 311 |
. . . 4
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
((absโ๐) = 0 โ
๐ธ โฅ ๐)) |
60 | 25, 51, 59 | 3imtr3d 292 |
. . 3
โข (((๐บ โ Grp โง ๐ โ โค) โง (๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
)) โ
(โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 โ ๐ธ โฅ ๐)) |
61 | | elrabi 3676 |
. . . 4
โข (๐ธ โ {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } โ ๐ธ โ โ) |
62 | 46 | adantl 482 |
. . . . . . . . . . . 12
โข ((๐บ โ Grp โง ๐ โ โค) โ ๐ โ
โ) |
63 | | nnrp 12981 |
. . . . . . . . . . . 12
โข (๐ธ โ โ โ ๐ธ โ
โ+) |
64 | | modval 13832 |
. . . . . . . . . . . 12
โข ((๐ โ โ โง ๐ธ โ โ+)
โ (๐ mod ๐ธ) = (๐ โ (๐ธ ยท (โโ(๐ / ๐ธ))))) |
65 | 62, 63, 64 | syl2an 596 |
. . . . . . . . . . 11
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ (๐ mod ๐ธ) = (๐ โ (๐ธ ยท (โโ(๐ / ๐ธ))))) |
66 | 65 | adantr 481 |
. . . . . . . . . 10
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ (๐ mod ๐ธ) = (๐ โ (๐ธ ยท (โโ(๐ / ๐ธ))))) |
67 | 66 | oveq1d 7420 |
. . . . . . . . 9
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ((๐ mod ๐ธ) ยท ๐ฅ) = ((๐ โ (๐ธ ยท (โโ(๐ / ๐ธ)))) ยท ๐ฅ)) |
68 | | simplll 773 |
. . . . . . . . . 10
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ๐บ โ Grp) |
69 | | simpllr 774 |
. . . . . . . . . 10
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ๐ โ
โค) |
70 | | nnz 12575 |
. . . . . . . . . . . 12
โข (๐ธ โ โ โ ๐ธ โ
โค) |
71 | 70 | ad2antlr 725 |
. . . . . . . . . . 11
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ๐ธ โ
โค) |
72 | | rerpdivcl 13000 |
. . . . . . . . . . . . . 14
โข ((๐ โ โ โง ๐ธ โ โ+)
โ (๐ / ๐ธ) โ
โ) |
73 | 62, 63, 72 | syl2an 596 |
. . . . . . . . . . . . 13
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ (๐ / ๐ธ) โ โ) |
74 | 73 | flcld 13759 |
. . . . . . . . . . . 12
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ
(โโ(๐ / ๐ธ)) โ
โค) |
75 | 74 | adantr 481 |
. . . . . . . . . . 11
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ
(โโ(๐ / ๐ธ)) โ
โค) |
76 | 71, 75 | zmulcld 12668 |
. . . . . . . . . 10
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ (๐ธ ยท (โโ(๐ / ๐ธ))) โ โค) |
77 | | simprl 769 |
. . . . . . . . . 10
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ๐ฅ โ ๐) |
78 | | eqid 2732 |
. . . . . . . . . . 11
โข
(-gโ๐บ) = (-gโ๐บ) |
79 | 1, 3, 78 | mulgsubdir 18988 |
. . . . . . . . . 10
โข ((๐บ โ Grp โง (๐ โ โค โง (๐ธ ยท (โโ(๐ / ๐ธ))) โ โค โง ๐ฅ โ ๐)) โ ((๐ โ (๐ธ ยท (โโ(๐ / ๐ธ)))) ยท ๐ฅ) = ((๐ ยท ๐ฅ)(-gโ๐บ)((๐ธ ยท (โโ(๐ / ๐ธ))) ยท ๐ฅ))) |
80 | 68, 69, 76, 77, 79 | syl13anc 1372 |
. . . . . . . . 9
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ((๐ โ (๐ธ ยท (โโ(๐ / ๐ธ)))) ยท ๐ฅ) = ((๐ ยท ๐ฅ)(-gโ๐บ)((๐ธ ยท (โโ(๐ / ๐ธ))) ยท ๐ฅ))) |
81 | | simprr 771 |
. . . . . . . . . . 11
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ (๐ ยท ๐ฅ) = 0 ) |
82 | | dvdsmul1 16217 |
. . . . . . . . . . . . 13
โข ((๐ธ โ โค โง
(โโ(๐ / ๐ธ)) โ โค) โ ๐ธ โฅ (๐ธ ยท (โโ(๐ / ๐ธ)))) |
83 | 71, 75, 82 | syl2anc 584 |
. . . . . . . . . . . 12
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ๐ธ โฅ (๐ธ ยท (โโ(๐ / ๐ธ)))) |
84 | 1, 2, 3, 4 | gexdvdsi 19445 |
. . . . . . . . . . . 12
โข ((๐บ โ Grp โง ๐ฅ โ ๐ โง ๐ธ โฅ (๐ธ ยท (โโ(๐ / ๐ธ)))) โ ((๐ธ ยท (โโ(๐ / ๐ธ))) ยท ๐ฅ) = 0 ) |
85 | 68, 77, 83, 84 | syl3anc 1371 |
. . . . . . . . . . 11
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ((๐ธ ยท (โโ(๐ / ๐ธ))) ยท ๐ฅ) = 0 ) |
86 | 81, 85 | oveq12d 7423 |
. . . . . . . . . 10
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ((๐ ยท ๐ฅ)(-gโ๐บ)((๐ธ ยท (โโ(๐ / ๐ธ))) ยท ๐ฅ)) = ( 0 (-gโ๐บ) 0 )) |
87 | | simpll 765 |
. . . . . . . . . . . 12
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ ๐บ โ Grp) |
88 | 1, 4, 78 | grpsubid 18903 |
. . . . . . . . . . . 12
โข ((๐บ โ Grp โง 0 โ ๐) โ ( 0 (-gโ๐บ) 0 ) = 0 ) |
89 | 87, 41, 88 | syl2anc2 585 |
. . . . . . . . . . 11
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ ( 0
(-gโ๐บ)
0 ) =
0
) |
90 | 89 | adantr 481 |
. . . . . . . . . 10
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ( 0
(-gโ๐บ)
0 ) =
0
) |
91 | 86, 90 | eqtrd 2772 |
. . . . . . . . 9
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ((๐ ยท ๐ฅ)(-gโ๐บ)((๐ธ ยท (โโ(๐ / ๐ธ))) ยท ๐ฅ)) = 0 ) |
92 | 67, 80, 91 | 3eqtrd 2776 |
. . . . . . . 8
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง (๐ฅ โ ๐ โง (๐ ยท ๐ฅ) = 0 )) โ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 ) |
93 | 92 | expr 457 |
. . . . . . 7
โข ((((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โง ๐ฅ โ ๐) โ ((๐ ยท ๐ฅ) = 0 โ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 )) |
94 | 93 | ralimdva 3167 |
. . . . . 6
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ
(โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 โ โ๐ฅ โ ๐ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 )) |
95 | | modlt 13841 |
. . . . . . . . 9
โข ((๐ โ โ โง ๐ธ โ โ+)
โ (๐ mod ๐ธ) < ๐ธ) |
96 | 62, 63, 95 | syl2an 596 |
. . . . . . . 8
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ (๐ mod ๐ธ) < ๐ธ) |
97 | | zmodcl 13852 |
. . . . . . . . . . 11
โข ((๐ โ โค โง ๐ธ โ โ) โ (๐ mod ๐ธ) โ
โ0) |
98 | 97 | adantll 712 |
. . . . . . . . . 10
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ (๐ mod ๐ธ) โ
โ0) |
99 | 98 | nn0red 12529 |
. . . . . . . . 9
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ (๐ mod ๐ธ) โ โ) |
100 | | nnre 12215 |
. . . . . . . . . 10
โข (๐ธ โ โ โ ๐ธ โ
โ) |
101 | 100 | adantl 482 |
. . . . . . . . 9
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ ๐ธ โ
โ) |
102 | 99, 101 | ltnled 11357 |
. . . . . . . 8
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ ((๐ mod ๐ธ) < ๐ธ โ ยฌ ๐ธ โค (๐ mod ๐ธ))) |
103 | 96, 102 | mpbid 231 |
. . . . . . 7
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ ยฌ
๐ธ โค (๐ mod ๐ธ)) |
104 | 1, 2, 3, 4 | gexlem2 19444 |
. . . . . . . . . . . . 13
โข ((๐บ โ Grp โง (๐ mod ๐ธ) โ โ โง โ๐ฅ โ ๐ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 ) โ ๐ธ โ (1...(๐ mod ๐ธ))) |
105 | | elfzle2 13501 |
. . . . . . . . . . . . 13
โข (๐ธ โ (1...(๐ mod ๐ธ)) โ ๐ธ โค (๐ mod ๐ธ)) |
106 | 104, 105 | syl 17 |
. . . . . . . . . . . 12
โข ((๐บ โ Grp โง (๐ mod ๐ธ) โ โ โง โ๐ฅ โ ๐ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 ) โ ๐ธ โค (๐ mod ๐ธ)) |
107 | 106 | 3expia 1121 |
. . . . . . . . . . 11
โข ((๐บ โ Grp โง (๐ mod ๐ธ) โ โ) โ (โ๐ฅ โ ๐ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 โ ๐ธ โค (๐ mod ๐ธ))) |
108 | 107 | impancom 452 |
. . . . . . . . . 10
โข ((๐บ โ Grp โง โ๐ฅ โ ๐ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 ) โ ((๐ mod ๐ธ) โ โ โ ๐ธ โค (๐ mod ๐ธ))) |
109 | 108 | con3d 152 |
. . . . . . . . 9
โข ((๐บ โ Grp โง โ๐ฅ โ ๐ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 ) โ (ยฌ ๐ธ โค (๐ mod ๐ธ) โ ยฌ (๐ mod ๐ธ) โ โ)) |
110 | 109 | ex 413 |
. . . . . . . 8
โข (๐บ โ Grp โ
(โ๐ฅ โ ๐ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 โ (ยฌ ๐ธ โค (๐ mod ๐ธ) โ ยฌ (๐ mod ๐ธ) โ โ))) |
111 | 110 | ad2antrr 724 |
. . . . . . 7
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ
(โ๐ฅ โ ๐ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 โ (ยฌ ๐ธ โค (๐ mod ๐ธ) โ ยฌ (๐ mod ๐ธ) โ โ))) |
112 | 103, 111 | mpid 44 |
. . . . . 6
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ
(โ๐ฅ โ ๐ ((๐ mod ๐ธ) ยท ๐ฅ) = 0 โ ยฌ (๐ mod ๐ธ) โ โ)) |
113 | | elnn0 12470 |
. . . . . . . 8
โข ((๐ mod ๐ธ) โ โ0 โ ((๐ mod ๐ธ) โ โ โจ (๐ mod ๐ธ) = 0)) |
114 | 98, 113 | sylib 217 |
. . . . . . 7
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ ((๐ mod ๐ธ) โ โ โจ (๐ mod ๐ธ) = 0)) |
115 | 114 | ord 862 |
. . . . . 6
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ (ยฌ
(๐ mod ๐ธ) โ โ โ (๐ mod ๐ธ) = 0)) |
116 | 94, 112, 115 | 3syld 60 |
. . . . 5
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ
(โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 โ (๐ mod ๐ธ) = 0)) |
117 | | simpr 485 |
. . . . . 6
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ ๐ธ โ
โ) |
118 | | simplr 767 |
. . . . . 6
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ ๐ โ
โค) |
119 | | dvdsval3 16197 |
. . . . . 6
โข ((๐ธ โ โ โง ๐ โ โค) โ (๐ธ โฅ ๐ โ (๐ mod ๐ธ) = 0)) |
120 | 117, 118,
119 | syl2anc 584 |
. . . . 5
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ (๐ธ โฅ ๐ โ (๐ mod ๐ธ) = 0)) |
121 | 116, 120 | sylibrd 258 |
. . . 4
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ โ) โ
(โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 โ ๐ธ โฅ ๐)) |
122 | 61, 121 | sylan2 593 |
. . 3
โข (((๐บ โ Grp โง ๐ โ โค) โง ๐ธ โ {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 }) โ (โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 โ ๐ธ โฅ ๐)) |
123 | | eqid 2732 |
. . . . 5
โข {๐ฆ โ โ โฃ
โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } |
124 | 1, 3, 4, 2, 123 | gexlem1 19441 |
. . . 4
โข (๐บ โ Grp โ ((๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
) โจ ๐ธ โ {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 })) |
125 | 124 | adantr 481 |
. . 3
โข ((๐บ โ Grp โง ๐ โ โค) โ ((๐ธ = 0 โง {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 } = โ
) โจ ๐ธ โ {๐ฆ โ โ โฃ โ๐ฅ โ ๐ (๐ฆ ยท ๐ฅ) = 0 })) |
126 | 60, 122, 125 | mpjaodan 957 |
. 2
โข ((๐บ โ Grp โง ๐ โ โค) โ
(โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 โ ๐ธ โฅ ๐)) |
127 | 8, 126 | impbid 211 |
1
โข ((๐บ โ Grp โง ๐ โ โค) โ (๐ธ โฅ ๐ โ โ๐ฅ โ ๐ (๐ ยท ๐ฅ) = 0 )) |