Step | Hyp | Ref
| Expression |
1 | | oveq1 7412 |
. . . . . . . 8
โข (๐ฅ = 0 โ (๐ฅ ยท ๐) = (0 ยท ๐)) |
2 | 1 | oveq1d 7420 |
. . . . . . 7
โข (๐ฅ = 0 โ ((๐ฅ ยท ๐) ร ๐) = ((0 ยท ๐) ร ๐)) |
3 | | oveq1 7412 |
. . . . . . 7
โข (๐ฅ = 0 โ (๐ฅ ยท (๐ ร ๐)) = (0 ยท (๐ ร ๐))) |
4 | 2, 3 | eqeq12d 2748 |
. . . . . 6
โข (๐ฅ = 0 โ (((๐ฅ ยท ๐) ร ๐) = (๐ฅ ยท (๐ ร ๐)) โ ((0 ยท ๐) ร ๐) = (0 ยท (๐ ร ๐)))) |
5 | 4 | imbi2d 340 |
. . . . 5
โข (๐ฅ = 0 โ ((((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((๐ฅ ยท ๐) ร ๐) = (๐ฅ ยท (๐ ร ๐))) โ (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((0 ยท ๐) ร ๐) = (0 ยท (๐ ร ๐))))) |
6 | | oveq1 7412 |
. . . . . . . 8
โข (๐ฅ = ๐ฆ โ (๐ฅ ยท ๐) = (๐ฆ ยท ๐)) |
7 | 6 | oveq1d 7420 |
. . . . . . 7
โข (๐ฅ = ๐ฆ โ ((๐ฅ ยท ๐) ร ๐) = ((๐ฆ ยท ๐) ร ๐)) |
8 | | oveq1 7412 |
. . . . . . 7
โข (๐ฅ = ๐ฆ โ (๐ฅ ยท (๐ ร ๐)) = (๐ฆ ยท (๐ ร ๐))) |
9 | 7, 8 | eqeq12d 2748 |
. . . . . 6
โข (๐ฅ = ๐ฆ โ (((๐ฅ ยท ๐) ร ๐) = (๐ฅ ยท (๐ ร ๐)) โ ((๐ฆ ยท ๐) ร ๐) = (๐ฆ ยท (๐ ร ๐)))) |
10 | 9 | imbi2d 340 |
. . . . 5
โข (๐ฅ = ๐ฆ โ ((((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((๐ฅ ยท ๐) ร ๐) = (๐ฅ ยท (๐ ร ๐))) โ (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((๐ฆ ยท ๐) ร ๐) = (๐ฆ ยท (๐ ร ๐))))) |
11 | | oveq1 7412 |
. . . . . . . 8
โข (๐ฅ = (๐ฆ + 1) โ (๐ฅ ยท ๐) = ((๐ฆ + 1) ยท ๐)) |
12 | 11 | oveq1d 7420 |
. . . . . . 7
โข (๐ฅ = (๐ฆ + 1) โ ((๐ฅ ยท ๐) ร ๐) = (((๐ฆ + 1) ยท ๐) ร ๐)) |
13 | | oveq1 7412 |
. . . . . . 7
โข (๐ฅ = (๐ฆ + 1) โ (๐ฅ ยท (๐ ร ๐)) = ((๐ฆ + 1) ยท (๐ ร ๐))) |
14 | 12, 13 | eqeq12d 2748 |
. . . . . 6
โข (๐ฅ = (๐ฆ + 1) โ (((๐ฅ ยท ๐) ร ๐) = (๐ฅ ยท (๐ ร ๐)) โ (((๐ฆ + 1) ยท ๐) ร ๐) = ((๐ฆ + 1) ยท (๐ ร ๐)))) |
15 | 14 | imbi2d 340 |
. . . . 5
โข (๐ฅ = (๐ฆ + 1) โ ((((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((๐ฅ ยท ๐) ร ๐) = (๐ฅ ยท (๐ ร ๐))) โ (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ (((๐ฆ + 1) ยท ๐) ร ๐) = ((๐ฆ + 1) ยท (๐ ร ๐))))) |
16 | | oveq1 7412 |
. . . . . . . 8
โข (๐ฅ = ๐ โ (๐ฅ ยท ๐) = (๐ ยท ๐)) |
17 | 16 | oveq1d 7420 |
. . . . . . 7
โข (๐ฅ = ๐ โ ((๐ฅ ยท ๐) ร ๐) = ((๐ ยท ๐) ร ๐)) |
18 | | oveq1 7412 |
. . . . . . 7
โข (๐ฅ = ๐ โ (๐ฅ ยท (๐ ร ๐)) = (๐ ยท (๐ ร ๐))) |
19 | 17, 18 | eqeq12d 2748 |
. . . . . 6
โข (๐ฅ = ๐ โ (((๐ฅ ยท ๐) ร ๐) = (๐ฅ ยท (๐ ร ๐)) โ ((๐ ยท ๐) ร ๐) = (๐ ยท (๐ ร ๐)))) |
20 | 19 | imbi2d 340 |
. . . . 5
โข (๐ฅ = ๐ โ ((((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((๐ฅ ยท ๐) ร ๐) = (๐ฅ ยท (๐ ร ๐))) โ (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((๐ ยท ๐) ร ๐) = (๐ ยท (๐ ร ๐))))) |
21 | | simpr 485 |
. . . . . . 7
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ๐
โ SRing) |
22 | | simpr 485 |
. . . . . . . 8
โข ((๐ โ ๐ต โง ๐ โ ๐ต) โ ๐ โ ๐ต) |
23 | 22 | adantr 481 |
. . . . . . 7
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ๐ โ ๐ต) |
24 | | srgmulgass.b |
. . . . . . . 8
โข ๐ต = (Baseโ๐
) |
25 | | srgmulgass.t |
. . . . . . . 8
โข ร =
(.rโ๐
) |
26 | | eqid 2732 |
. . . . . . . 8
โข
(0gโ๐
) = (0gโ๐
) |
27 | 24, 25, 26 | srglz 20024 |
. . . . . . 7
โข ((๐
โ SRing โง ๐ โ ๐ต) โ ((0gโ๐
) ร ๐) = (0gโ๐
)) |
28 | 21, 23, 27 | syl2anc 584 |
. . . . . 6
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ
((0gโ๐
)
ร
๐) =
(0gโ๐
)) |
29 | | simpl 483 |
. . . . . . . . 9
โข ((๐ โ ๐ต โง ๐ โ ๐ต) โ ๐ โ ๐ต) |
30 | 29 | adantr 481 |
. . . . . . . 8
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ๐ โ ๐ต) |
31 | | srgmulgass.m |
. . . . . . . . 9
โข ยท =
(.gโ๐
) |
32 | 24, 26, 31 | mulg0 18951 |
. . . . . . . 8
โข (๐ โ ๐ต โ (0 ยท ๐) = (0gโ๐
)) |
33 | 30, 32 | syl 17 |
. . . . . . 7
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ (0 ยท ๐) = (0gโ๐
)) |
34 | 33 | oveq1d 7420 |
. . . . . 6
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((0 ยท ๐) ร ๐) = ((0gโ๐
) ร ๐)) |
35 | 24, 25 | srgcl 20009 |
. . . . . . . 8
โข ((๐
โ SRing โง ๐ โ ๐ต โง ๐ โ ๐ต) โ (๐ ร ๐) โ ๐ต) |
36 | 21, 30, 23, 35 | syl3anc 1371 |
. . . . . . 7
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ (๐ ร ๐) โ ๐ต) |
37 | 24, 26, 31 | mulg0 18951 |
. . . . . . 7
โข ((๐ ร ๐) โ ๐ต โ (0 ยท (๐ ร ๐)) = (0gโ๐
)) |
38 | 36, 37 | syl 17 |
. . . . . 6
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ (0 ยท (๐ ร ๐)) = (0gโ๐
)) |
39 | 28, 34, 38 | 3eqtr4d 2782 |
. . . . 5
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((0 ยท ๐) ร ๐) = (0 ยท (๐ ร ๐))) |
40 | | srgmnd 20006 |
. . . . . . . . . . . . . 14
โข (๐
โ SRing โ ๐
โ Mnd) |
41 | 40 | adantl 482 |
. . . . . . . . . . . . 13
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ๐
โ Mnd) |
42 | 41 | adantl 482 |
. . . . . . . . . . . 12
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ ๐
โ Mnd) |
43 | | simpl 483 |
. . . . . . . . . . . 12
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ ๐ฆ โ โ0) |
44 | 30 | adantl 482 |
. . . . . . . . . . . 12
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ ๐ โ ๐ต) |
45 | | eqid 2732 |
. . . . . . . . . . . . 13
โข
(+gโ๐
) = (+gโ๐
) |
46 | 24, 31, 45 | mulgnn0p1 18959 |
. . . . . . . . . . . 12
โข ((๐
โ Mnd โง ๐ฆ โ โ0
โง ๐ โ ๐ต) โ ((๐ฆ + 1) ยท ๐) = ((๐ฆ ยท ๐)(+gโ๐
)๐)) |
47 | 42, 43, 44, 46 | syl3anc 1371 |
. . . . . . . . . . 11
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ ((๐ฆ + 1) ยท ๐) = ((๐ฆ ยท ๐)(+gโ๐
)๐)) |
48 | 47 | oveq1d 7420 |
. . . . . . . . . 10
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ (((๐ฆ + 1) ยท ๐) ร ๐) = (((๐ฆ ยท ๐)(+gโ๐
)๐) ร ๐)) |
49 | 21 | adantl 482 |
. . . . . . . . . . 11
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ ๐
โ SRing) |
50 | 24, 31, 42, 43, 44 | mulgnn0cld 18969 |
. . . . . . . . . . 11
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ (๐ฆ ยท ๐) โ ๐ต) |
51 | 23 | adantl 482 |
. . . . . . . . . . 11
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ ๐ โ ๐ต) |
52 | 24, 45, 25 | srgdir 20014 |
. . . . . . . . . . 11
โข ((๐
โ SRing โง ((๐ฆ ยท ๐) โ ๐ต โง ๐ โ ๐ต โง ๐ โ ๐ต)) โ (((๐ฆ ยท ๐)(+gโ๐
)๐) ร ๐) = (((๐ฆ ยท ๐) ร ๐)(+gโ๐
)(๐ ร ๐))) |
53 | 49, 50, 44, 51, 52 | syl13anc 1372 |
. . . . . . . . . 10
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ (((๐ฆ ยท ๐)(+gโ๐
)๐) ร ๐) = (((๐ฆ ยท ๐) ร ๐)(+gโ๐
)(๐ ร ๐))) |
54 | 48, 53 | eqtrd 2772 |
. . . . . . . . 9
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ (((๐ฆ + 1) ยท ๐) ร ๐) = (((๐ฆ ยท ๐) ร ๐)(+gโ๐
)(๐ ร ๐))) |
55 | 54 | adantr 481 |
. . . . . . . 8
โข (((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โง ((๐ฆ ยท ๐) ร ๐) = (๐ฆ ยท (๐ ร ๐))) โ (((๐ฆ + 1) ยท ๐) ร ๐) = (((๐ฆ ยท ๐) ร ๐)(+gโ๐
)(๐ ร ๐))) |
56 | | oveq1 7412 |
. . . . . . . . 9
โข (((๐ฆ ยท ๐) ร ๐) = (๐ฆ ยท (๐ ร ๐)) โ (((๐ฆ ยท ๐) ร ๐)(+gโ๐
)(๐ ร ๐)) = ((๐ฆ ยท (๐ ร ๐))(+gโ๐
)(๐ ร ๐))) |
57 | 35 | 3expb 1120 |
. . . . . . . . . . . . 13
โข ((๐
โ SRing โง (๐ โ ๐ต โง ๐ โ ๐ต)) โ (๐ ร ๐) โ ๐ต) |
58 | 57 | ancoms 459 |
. . . . . . . . . . . 12
โข (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ (๐ ร ๐) โ ๐ต) |
59 | 58 | adantl 482 |
. . . . . . . . . . 11
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ (๐ ร ๐) โ ๐ต) |
60 | 24, 31, 45 | mulgnn0p1 18959 |
. . . . . . . . . . 11
โข ((๐
โ Mnd โง ๐ฆ โ โ0
โง (๐ ร ๐) โ ๐ต) โ ((๐ฆ + 1) ยท (๐ ร ๐)) = ((๐ฆ ยท (๐ ร ๐))(+gโ๐
)(๐ ร ๐))) |
61 | 42, 43, 59, 60 | syl3anc 1371 |
. . . . . . . . . 10
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ ((๐ฆ + 1) ยท (๐ ร ๐)) = ((๐ฆ ยท (๐ ร ๐))(+gโ๐
)(๐ ร ๐))) |
62 | 61 | eqcomd 2738 |
. . . . . . . . 9
โข ((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โ ((๐ฆ ยท (๐ ร ๐))(+gโ๐
)(๐ ร ๐)) = ((๐ฆ + 1) ยท (๐ ร ๐))) |
63 | 56, 62 | sylan9eqr 2794 |
. . . . . . . 8
โข (((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โง ((๐ฆ ยท ๐) ร ๐) = (๐ฆ ยท (๐ ร ๐))) โ (((๐ฆ ยท ๐) ร ๐)(+gโ๐
)(๐ ร ๐)) = ((๐ฆ + 1) ยท (๐ ร ๐))) |
64 | 55, 63 | eqtrd 2772 |
. . . . . . 7
โข (((๐ฆ โ โ0
โง ((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing)) โง ((๐ฆ ยท ๐) ร ๐) = (๐ฆ ยท (๐ ร ๐))) โ (((๐ฆ + 1) ยท ๐) ร ๐) = ((๐ฆ + 1) ยท (๐ ร ๐))) |
65 | 64 | exp31 420 |
. . . . . 6
โข (๐ฆ โ โ0
โ (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ (((๐ฆ ยท ๐) ร ๐) = (๐ฆ ยท (๐ ร ๐)) โ (((๐ฆ + 1) ยท ๐) ร ๐) = ((๐ฆ + 1) ยท (๐ ร ๐))))) |
66 | 65 | a2d 29 |
. . . . 5
โข (๐ฆ โ โ0
โ ((((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((๐ฆ ยท ๐) ร ๐) = (๐ฆ ยท (๐ ร ๐))) โ (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ (((๐ฆ + 1) ยท ๐) ร ๐) = ((๐ฆ + 1) ยท (๐ ร ๐))))) |
67 | 5, 10, 15, 20, 39, 66 | nn0ind 12653 |
. . . 4
โข (๐ โ โ0
โ (((๐ โ ๐ต โง ๐ โ ๐ต) โง ๐
โ SRing) โ ((๐ ยท ๐) ร ๐) = (๐ ยท (๐ ร ๐)))) |
68 | 67 | expd 416 |
. . 3
โข (๐ โ โ0
โ ((๐ โ ๐ต โง ๐ โ ๐ต) โ (๐
โ SRing โ ((๐ ยท ๐) ร ๐) = (๐ ยท (๐ ร ๐))))) |
69 | 68 | 3impib 1116 |
. 2
โข ((๐ โ โ0
โง ๐ โ ๐ต โง ๐ โ ๐ต) โ (๐
โ SRing โ ((๐ ยท ๐) ร ๐) = (๐ ยท (๐ ร ๐)))) |
70 | 69 | impcom 408 |
1
โข ((๐
โ SRing โง (๐ โ โ0
โง ๐ โ ๐ต โง ๐ โ ๐ต)) โ ((๐ ยท ๐) ร ๐) = (๐ ยท (๐ ร ๐))) |