Step | Hyp | Ref
| Expression |
1 | | simp1 1136 |
. . . 4
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β πΉ β (π
RingHom π)) |
2 | | simp21 1206 |
. . . 4
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β π΄ β π) |
3 | | simp23 1208 |
. . . 4
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β πΆ β π) |
4 | | rhmdvd.x |
. . . . 5
β’ π = (Baseβπ
) |
5 | | rhmdvd.m |
. . . . 5
β’ Β· =
(.rβπ
) |
6 | | eqid 2732 |
. . . . 5
β’
(.rβπ) = (.rβπ) |
7 | 4, 5, 6 | rhmmul 20263 |
. . . 4
β’ ((πΉ β (π
RingHom π) β§ π΄ β π β§ πΆ β π) β (πΉβ(π΄ Β· πΆ)) = ((πΉβπ΄)(.rβπ)(πΉβπΆ))) |
8 | 1, 2, 3, 7 | syl3anc 1371 |
. . 3
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β (πΉβ(π΄ Β· πΆ)) = ((πΉβπ΄)(.rβπ)(πΉβπΆ))) |
9 | | simp22 1207 |
. . . 4
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β π΅ β π) |
10 | 4, 5, 6 | rhmmul 20263 |
. . . 4
β’ ((πΉ β (π
RingHom π) β§ π΅ β π β§ πΆ β π) β (πΉβ(π΅ Β· πΆ)) = ((πΉβπ΅)(.rβπ)(πΉβπΆ))) |
11 | 1, 9, 3, 10 | syl3anc 1371 |
. . 3
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β (πΉβ(π΅ Β· πΆ)) = ((πΉβπ΅)(.rβπ)(πΉβπΆ))) |
12 | 8, 11 | oveq12d 7426 |
. 2
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β ((πΉβ(π΄ Β· πΆ)) / (πΉβ(π΅ Β· πΆ))) = (((πΉβπ΄)(.rβπ)(πΉβπΆ)) / ((πΉβπ΅)(.rβπ)(πΉβπΆ)))) |
13 | | rhmrcl2 20255 |
. . . 4
β’ (πΉ β (π
RingHom π) β π β Ring) |
14 | 13 | 3ad2ant1 1133 |
. . 3
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β π β Ring) |
15 | | eqid 2732 |
. . . . . 6
β’
(Baseβπ) =
(Baseβπ) |
16 | 4, 15 | rhmf 20262 |
. . . . 5
β’ (πΉ β (π
RingHom π) β πΉ:πβΆ(Baseβπ)) |
17 | 16 | 3ad2ant1 1133 |
. . . 4
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β πΉ:πβΆ(Baseβπ)) |
18 | 17, 2 | ffvelcdmd 7087 |
. . 3
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β (πΉβπ΄) β (Baseβπ)) |
19 | | simp3l 1201 |
. . 3
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β (πΉβπ΅) β π) |
20 | | simp3r 1202 |
. . 3
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β (πΉβπΆ) β π) |
21 | | rhmdvd.u |
. . . 4
β’ π = (Unitβπ) |
22 | | rhmdvd.d |
. . . 4
β’ / =
(/rβπ) |
23 | 15, 21, 22, 6 | dvrcan5 32380 |
. . 3
β’ ((π β Ring β§ ((πΉβπ΄) β (Baseβπ) β§ (πΉβπ΅) β π β§ (πΉβπΆ) β π)) β (((πΉβπ΄)(.rβπ)(πΉβπΆ)) / ((πΉβπ΅)(.rβπ)(πΉβπΆ))) = ((πΉβπ΄) / (πΉβπ΅))) |
24 | 14, 18, 19, 20, 23 | syl13anc 1372 |
. 2
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β (((πΉβπ΄)(.rβπ)(πΉβπΆ)) / ((πΉβπ΅)(.rβπ)(πΉβπΆ))) = ((πΉβπ΄) / (πΉβπ΅))) |
25 | 12, 24 | eqtr2d 2773 |
1
β’ ((πΉ β (π
RingHom π) β§ (π΄ β π β§ π΅ β π β§ πΆ β π) β§ ((πΉβπ΅) β π β§ (πΉβπΆ) β π)) β ((πΉβπ΄) / (πΉβπ΅)) = ((πΉβ(π΄ Β· πΆ)) / (πΉβ(π΅ Β· πΆ)))) |