Metamath Proof Explorer


Theorem dvdschrmulg

Description: In a ring, any multiple of the characteristics annihilates all elements. (Contributed by Thierry Arnoux, 6-Sep-2016)

Ref Expression
Hypotheses dvdschrmulg.1 โŠข ๐ถ = ( chr โ€˜ ๐‘… )
dvdschrmulg.2 โŠข ๐ต = ( Base โ€˜ ๐‘… )
dvdschrmulg.3 โŠข ยท = ( .g โ€˜ ๐‘… )
dvdschrmulg.4 โŠข 0 = ( 0g โ€˜ ๐‘… )
Assertion dvdschrmulg ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ๐‘ ยท ๐ด ) = 0 )

Proof

Step Hyp Ref Expression
1 dvdschrmulg.1 โŠข ๐ถ = ( chr โ€˜ ๐‘… )
2 dvdschrmulg.2 โŠข ๐ต = ( Base โ€˜ ๐‘… )
3 dvdschrmulg.3 โŠข ยท = ( .g โ€˜ ๐‘… )
4 dvdschrmulg.4 โŠข 0 = ( 0g โ€˜ ๐‘… )
5 simp1 โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ๐‘… โˆˆ Ring )
6 dvdszrcl โŠข ( ๐ถ โˆฅ ๐‘ โ†’ ( ๐ถ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„ค ) )
7 6 simprd โŠข ( ๐ถ โˆฅ ๐‘ โ†’ ๐‘ โˆˆ โ„ค )
8 7 3ad2ant2 โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ๐‘ โˆˆ โ„ค )
9 eqid โŠข ( 1r โ€˜ ๐‘… ) = ( 1r โ€˜ ๐‘… )
10 2 9 ringidcl โŠข ( ๐‘… โˆˆ Ring โ†’ ( 1r โ€˜ ๐‘… ) โˆˆ ๐ต )
11 5 10 syl โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( 1r โ€˜ ๐‘… ) โˆˆ ๐ต )
12 simp3 โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ๐ด โˆˆ ๐ต )
13 eqid โŠข ( .r โ€˜ ๐‘… ) = ( .r โ€˜ ๐‘… )
14 2 3 13 mulgass2 โŠข ( ( ๐‘… โˆˆ Ring โˆง ( ๐‘ โˆˆ โ„ค โˆง ( 1r โ€˜ ๐‘… ) โˆˆ ๐ต โˆง ๐ด โˆˆ ๐ต ) ) โ†’ ( ( ๐‘ ยท ( 1r โ€˜ ๐‘… ) ) ( .r โ€˜ ๐‘… ) ๐ด ) = ( ๐‘ ยท ( ( 1r โ€˜ ๐‘… ) ( .r โ€˜ ๐‘… ) ๐ด ) ) )
15 5 8 11 12 14 syl13anc โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ( ๐‘ ยท ( 1r โ€˜ ๐‘… ) ) ( .r โ€˜ ๐‘… ) ๐ด ) = ( ๐‘ ยท ( ( 1r โ€˜ ๐‘… ) ( .r โ€˜ ๐‘… ) ๐ด ) ) )
16 ringgrp โŠข ( ๐‘… โˆˆ Ring โ†’ ๐‘… โˆˆ Grp )
17 5 16 syl โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ๐‘… โˆˆ Grp )
18 eqid โŠข ( od โ€˜ ๐‘… ) = ( od โ€˜ ๐‘… )
19 18 9 1 chrval โŠข ( ( od โ€˜ ๐‘… ) โ€˜ ( 1r โ€˜ ๐‘… ) ) = ๐ถ
20 simp2 โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ๐ถ โˆฅ ๐‘ )
21 19 20 eqbrtrid โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ( od โ€˜ ๐‘… ) โ€˜ ( 1r โ€˜ ๐‘… ) ) โˆฅ ๐‘ )
22 2 18 3 4 oddvdsi โŠข ( ( ๐‘… โˆˆ Grp โˆง ( 1r โ€˜ ๐‘… ) โˆˆ ๐ต โˆง ( ( od โ€˜ ๐‘… ) โ€˜ ( 1r โ€˜ ๐‘… ) ) โˆฅ ๐‘ ) โ†’ ( ๐‘ ยท ( 1r โ€˜ ๐‘… ) ) = 0 )
23 17 11 21 22 syl3anc โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ๐‘ ยท ( 1r โ€˜ ๐‘… ) ) = 0 )
24 23 oveq1d โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ( ๐‘ ยท ( 1r โ€˜ ๐‘… ) ) ( .r โ€˜ ๐‘… ) ๐ด ) = ( 0 ( .r โ€˜ ๐‘… ) ๐ด ) )
25 2 13 4 ringlz โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ด โˆˆ ๐ต ) โ†’ ( 0 ( .r โ€˜ ๐‘… ) ๐ด ) = 0 )
26 25 3adant2 โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( 0 ( .r โ€˜ ๐‘… ) ๐ด ) = 0 )
27 24 26 eqtrd โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ( ๐‘ ยท ( 1r โ€˜ ๐‘… ) ) ( .r โ€˜ ๐‘… ) ๐ด ) = 0 )
28 2 13 9 ringlidm โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ( 1r โ€˜ ๐‘… ) ( .r โ€˜ ๐‘… ) ๐ด ) = ๐ด )
29 28 3adant2 โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ( 1r โ€˜ ๐‘… ) ( .r โ€˜ ๐‘… ) ๐ด ) = ๐ด )
30 29 oveq2d โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ๐‘ ยท ( ( 1r โ€˜ ๐‘… ) ( .r โ€˜ ๐‘… ) ๐ด ) ) = ( ๐‘ ยท ๐ด ) )
31 15 27 30 3eqtr3rd โŠข ( ( ๐‘… โˆˆ Ring โˆง ๐ถ โˆฅ ๐‘ โˆง ๐ด โˆˆ ๐ต ) โ†’ ( ๐‘ ยท ๐ด ) = 0 )