Step | Hyp | Ref
| Expression |
1 | | dvdsrspss.b |
. . . . . 6
β’ π΅ = (Baseβπ
) |
2 | | dvdsrspss.d |
. . . . . 6
β’ β₯ =
(β₯rβπ
) |
3 | | dvdsruassoi.2 |
. . . . . 6
β’ Β· =
(.rβπ
) |
4 | 1, 2, 3 | dvdsr 20175 |
. . . . 5
β’ (π β₯ π β (π β π΅ β§ βπ‘ β π΅ (π‘ Β· π) = π)) |
5 | | dvdsrspss.x |
. . . . . 6
β’ (π β π β π΅) |
6 | 5 | biantrurd 533 |
. . . . 5
β’ (π β (βπ‘ β π΅ (π‘ Β· π) = π β (π β π΅ β§ βπ‘ β π΅ (π‘ Β· π) = π))) |
7 | 4, 6 | bitr4id 289 |
. . . 4
β’ (π β (π β₯ π β βπ‘ β π΅ (π‘ Β· π) = π)) |
8 | 1, 2, 3 | dvdsr 20175 |
. . . . 5
β’ (π β₯ π β (π β π΅ β§ βπ β π΅ (π Β· π) = π)) |
9 | | dvdsrspss.y |
. . . . . 6
β’ (π β π β π΅) |
10 | 9 | biantrurd 533 |
. . . . 5
β’ (π β (βπ β π΅ (π Β· π) = π β (π β π΅ β§ βπ β π΅ (π Β· π) = π))) |
11 | 8, 10 | bitr4id 289 |
. . . 4
β’ (π β (π β₯ π β βπ β π΅ (π Β· π) = π)) |
12 | 7, 11 | anbi12d 631 |
. . 3
β’ (π β ((π β₯ π β§ π β₯ π) β (βπ‘ β π΅ (π‘ Β· π) = π β§ βπ β π΅ (π Β· π) = π))) |
13 | | dvdsruasso.r |
. . . . . . . . . . . . . . 15
β’ (π β π
β IDomn) |
14 | 13 | idomringd 32370 |
. . . . . . . . . . . . . 14
β’ (π β π
β Ring) |
15 | | dvdsruassoi.1 |
. . . . . . . . . . . . . . 15
β’ π = (Unitβπ
) |
16 | | eqid 2732 |
. . . . . . . . . . . . . . 15
β’
(1rβπ
) = (1rβπ
) |
17 | 15, 16 | 1unit 20187 |
. . . . . . . . . . . . . 14
β’ (π
β Ring β
(1rβπ
)
β π) |
18 | 14, 17 | syl 17 |
. . . . . . . . . . . . 13
β’ (π β (1rβπ
) β π) |
19 | 18 | ad5antr 732 |
. . . . . . . . . . . 12
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β (1rβπ
) β π) |
20 | | oveq1 7415 |
. . . . . . . . . . . . . 14
β’ (π’ = (1rβπ
) β (π’ Β· π) = ((1rβπ
) Β· π)) |
21 | 20 | eqeq1d 2734 |
. . . . . . . . . . . . 13
β’ (π’ = (1rβπ
) β ((π’ Β· π) = π β ((1rβπ
) Β· π) = π)) |
22 | 21 | adantl 482 |
. . . . . . . . . . . 12
β’
(((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β§ π’ = (1rβπ
)) β ((π’ Β· π) = π β ((1rβπ
) Β· π) = π)) |
23 | 14 | ad5antr 732 |
. . . . . . . . . . . . . 14
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β π
β Ring) |
24 | 5 | ad5antr 732 |
. . . . . . . . . . . . . 14
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β π β π΅) |
25 | 1, 3, 16, 23, 24 | ringlidmd 20088 |
. . . . . . . . . . . . 13
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β ((1rβπ
) Β· π) = π) |
26 | | simpr 485 |
. . . . . . . . . . . . 13
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β π = (0gβπ
)) |
27 | 26 | oveq2d 7424 |
. . . . . . . . . . . . . 14
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β (π‘ Β· π) = (π‘ Β·
(0gβπ
))) |
28 | | simplr 767 |
. . . . . . . . . . . . . 14
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β (π‘ Β· π) = π) |
29 | | simpllr 774 |
. . . . . . . . . . . . . . 15
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β π‘ β π΅) |
30 | | eqid 2732 |
. . . . . . . . . . . . . . . 16
β’
(0gβπ
) = (0gβπ
) |
31 | 1, 3, 30 | ringrz 20107 |
. . . . . . . . . . . . . . 15
β’ ((π
β Ring β§ π‘ β π΅) β (π‘ Β·
(0gβπ
)) =
(0gβπ
)) |
32 | 23, 29, 31 | syl2anc 584 |
. . . . . . . . . . . . . 14
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β (π‘ Β·
(0gβπ
)) =
(0gβπ
)) |
33 | 27, 28, 32 | 3eqtr3rd 2781 |
. . . . . . . . . . . . 13
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β (0gβπ
) = π) |
34 | 25, 26, 33 | 3eqtrd 2776 |
. . . . . . . . . . . 12
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β ((1rβπ
) Β· π) = π) |
35 | 19, 22, 34 | rspcedvd 3614 |
. . . . . . . . . . 11
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π = (0gβπ
)) β βπ’ β π (π’ Β· π) = π) |
36 | | isidom 20921 |
. . . . . . . . . . . . . . . 16
β’ (π
β IDomn β (π
β CRing β§ π
β Domn)) |
37 | 13, 36 | sylib 217 |
. . . . . . . . . . . . . . 15
β’ (π β (π
β CRing β§ π
β Domn)) |
38 | 37 | simpld 495 |
. . . . . . . . . . . . . 14
β’ (π β π
β CRing) |
39 | 38 | ad5antr 732 |
. . . . . . . . . . . . 13
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β π
β CRing) |
40 | | simp-5r 784 |
. . . . . . . . . . . . 13
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β π β π΅) |
41 | | simpllr 774 |
. . . . . . . . . . . . 13
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β π‘ β π΅) |
42 | 5 | ad5antr 732 |
. . . . . . . . . . . . . . . 16
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β π β π΅) |
43 | | simpr 485 |
. . . . . . . . . . . . . . . 16
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β π β (0gβπ
)) |
44 | | eldifsn 4790 |
. . . . . . . . . . . . . . . 16
β’ (π β (π΅ β {(0gβπ
)}) β (π β π΅ β§ π β (0gβπ
))) |
45 | 42, 43, 44 | sylanbrc 583 |
. . . . . . . . . . . . . . 15
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β π β (π΅ β {(0gβπ
)})) |
46 | 14 | ad5antr 732 |
. . . . . . . . . . . . . . . 16
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β π
β Ring) |
47 | 1, 3, 46, 40, 41 | ringcld 20079 |
. . . . . . . . . . . . . . 15
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β (π Β· π‘) β π΅) |
48 | 1, 16 | ringidcl 20082 |
. . . . . . . . . . . . . . . 16
β’ (π
β Ring β
(1rβπ
)
β π΅) |
49 | 46, 48 | syl 17 |
. . . . . . . . . . . . . . 15
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β (1rβπ
) β π΅) |
50 | 13 | ad5antr 732 |
. . . . . . . . . . . . . . 15
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β π
β IDomn) |
51 | | simplr 767 |
. . . . . . . . . . . . . . . . . 18
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β (π‘ Β· π) = π) |
52 | 51 | oveq2d 7424 |
. . . . . . . . . . . . . . . . 17
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β (π Β· (π‘ Β· π)) = (π Β· π)) |
53 | | simp-4r 782 |
. . . . . . . . . . . . . . . . 17
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β (π Β· π) = π) |
54 | 52, 53 | eqtrd 2772 |
. . . . . . . . . . . . . . . 16
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β (π Β· (π‘ Β· π)) = π) |
55 | 1, 3, 46, 40, 41, 42 | ringassd 20078 |
. . . . . . . . . . . . . . . 16
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β ((π Β· π‘) Β· π) = (π Β· (π‘ Β· π))) |
56 | 1, 3, 16, 46, 42 | ringlidmd 20088 |
. . . . . . . . . . . . . . . 16
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β ((1rβπ
) Β· π) = π) |
57 | 54, 55, 56 | 3eqtr4d 2782 |
. . . . . . . . . . . . . . 15
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β ((π Β· π‘) Β· π) = ((1rβπ
) Β· π)) |
58 | 1, 30, 3, 45, 47, 49, 50, 57 | idomrcan 32372 |
. . . . . . . . . . . . . 14
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β (π Β· π‘) = (1rβπ
)) |
59 | 46, 17 | syl 17 |
. . . . . . . . . . . . . 14
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β (1rβπ
) β π) |
60 | 58, 59 | eqeltrd 2833 |
. . . . . . . . . . . . 13
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β (π Β· π‘) β π) |
61 | 15, 3, 1 | unitmulclb 20194 |
. . . . . . . . . . . . . 14
β’ ((π
β CRing β§ π β π΅ β§ π‘ β π΅) β ((π Β· π‘) β π β (π β π β§ π‘ β π))) |
62 | 61 | simplbda 500 |
. . . . . . . . . . . . 13
β’ (((π
β CRing β§ π β π΅ β§ π‘ β π΅) β§ (π Β· π‘) β π) β π‘ β π) |
63 | 39, 40, 41, 60, 62 | syl31anc 1373 |
. . . . . . . . . . . 12
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β π‘ β π) |
64 | | oveq1 7415 |
. . . . . . . . . . . . . 14
β’ (π’ = π‘ β (π’ Β· π) = (π‘ Β· π)) |
65 | 64 | eqeq1d 2734 |
. . . . . . . . . . . . 13
β’ (π’ = π‘ β ((π’ Β· π) = π β (π‘ Β· π) = π)) |
66 | 65 | adantl 482 |
. . . . . . . . . . . 12
β’
(((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β§ π’ = π‘) β ((π’ Β· π) = π β (π‘ Β· π) = π)) |
67 | 63, 66, 51 | rspcedvd 3614 |
. . . . . . . . . . 11
β’
((((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β§ π β (0gβπ
)) β βπ’ β π (π’ Β· π) = π) |
68 | 35, 67 | pm2.61dane 3029 |
. . . . . . . . . 10
β’
(((((π β§ π β π΅) β§ (π Β· π) = π) β§ π‘ β π΅) β§ (π‘ Β· π) = π) β βπ’ β π (π’ Β· π) = π) |
69 | 68 | r19.29an 3158 |
. . . . . . . . 9
β’ ((((π β§ π β π΅) β§ (π Β· π) = π) β§ βπ‘ β π΅ (π‘ Β· π) = π) β βπ’ β π (π’ Β· π) = π) |
70 | 69 | an32s 650 |
. . . . . . . 8
β’ ((((π β§ π β π΅) β§ βπ‘ β π΅ (π‘ Β· π) = π) β§ (π Β· π) = π) β βπ’ β π (π’ Β· π) = π) |
71 | 70 | ex 413 |
. . . . . . 7
β’ (((π β§ π β π΅) β§ βπ‘ β π΅ (π‘ Β· π) = π) β ((π Β· π) = π β βπ’ β π (π’ Β· π) = π)) |
72 | 71 | an32s 650 |
. . . . . 6
β’ (((π β§ βπ‘ β π΅ (π‘ Β· π) = π) β§ π β π΅) β ((π Β· π) = π β βπ’ β π (π’ Β· π) = π)) |
73 | 72 | imp 407 |
. . . . 5
β’ ((((π β§ βπ‘ β π΅ (π‘ Β· π) = π) β§ π β π΅) β§ (π Β· π) = π) β βπ’ β π (π’ Β· π) = π) |
74 | 73 | r19.29an 3158 |
. . . 4
β’ (((π β§ βπ‘ β π΅ (π‘ Β· π) = π) β§ βπ β π΅ (π Β· π) = π) β βπ’ β π (π’ Β· π) = π) |
75 | 74 | anasss 467 |
. . 3
β’ ((π β§ (βπ‘ β π΅ (π‘ Β· π) = π β§ βπ β π΅ (π Β· π) = π)) β βπ’ β π (π’ Β· π) = π) |
76 | 12, 75 | sylbida 592 |
. 2
β’ ((π β§ (π β₯ π β§ π β₯ π)) β βπ’ β π (π’ Β· π) = π) |
77 | | dvdsrspss.k |
. . . 4
β’ πΎ = (RSpanβπ
) |
78 | 5 | ad2antrr 724 |
. . . 4
β’ (((π β§ π’ β π) β§ (π’ Β· π) = π) β π β π΅) |
79 | 9 | ad2antrr 724 |
. . . 4
β’ (((π β§ π’ β π) β§ (π’ Β· π) = π) β π β π΅) |
80 | 14 | ad2antrr 724 |
. . . 4
β’ (((π β§ π’ β π) β§ (π’ Β· π) = π) β π
β Ring) |
81 | | simplr 767 |
. . . 4
β’ (((π β§ π’ β π) β§ (π’ Β· π) = π) β π’ β π) |
82 | | simpr 485 |
. . . 4
β’ (((π β§ π’ β π) β§ (π’ Β· π) = π) β (π’ Β· π) = π) |
83 | 1, 77, 2, 78, 79, 15, 3, 80, 81, 82 | dvdsruassoi 32484 |
. . 3
β’ (((π β§ π’ β π) β§ (π’ Β· π) = π) β (π β₯ π β§ π β₯ π)) |
84 | 83 | r19.29an 3158 |
. 2
β’ ((π β§ βπ’ β π (π’ Β· π) = π) β (π β₯ π β§ π β₯ π)) |
85 | 76, 84 | impbida 799 |
1
β’ (π β ((π β₯ π β§ π β₯ π) β βπ’ β π (π’ Β· π) = π)) |