Step | Hyp | Ref
| Expression |
1 | | simpll 765 |
. . . 4
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β π
β NrmRing) |
2 | | simprl 769 |
. . . 4
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β π΄ β π) |
3 | | nrgring 24179 |
. . . . . 6
β’ (π
β NrmRing β π
β Ring) |
4 | 3 | ad2antrr 724 |
. . . . 5
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β π
β Ring) |
5 | | simprr 771 |
. . . . 5
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β π΅ β π) |
6 | | nmdvr.u |
. . . . . 6
β’ π = (Unitβπ
) |
7 | | eqid 2732 |
. . . . . 6
β’
(invrβπ
) = (invrβπ
) |
8 | | nmdvr.x |
. . . . . 6
β’ π = (Baseβπ
) |
9 | 6, 7, 8 | ringinvcl 20205 |
. . . . 5
β’ ((π
β Ring β§ π΅ β π) β ((invrβπ
)βπ΅) β π) |
10 | 4, 5, 9 | syl2anc 584 |
. . . 4
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β ((invrβπ
)βπ΅) β π) |
11 | | nmdvr.n |
. . . . 5
β’ π = (normβπ
) |
12 | | eqid 2732 |
. . . . 5
β’
(.rβπ
) = (.rβπ
) |
13 | 8, 11, 12 | nmmul 24180 |
. . . 4
β’ ((π
β NrmRing β§ π΄ β π β§ ((invrβπ
)βπ΅) β π) β (πβ(π΄(.rβπ
)((invrβπ
)βπ΅))) = ((πβπ΄) Β· (πβ((invrβπ
)βπ΅)))) |
14 | 1, 2, 10, 13 | syl3anc 1371 |
. . 3
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβ(π΄(.rβπ
)((invrβπ
)βπ΅))) = ((πβπ΄) Β· (πβ((invrβπ
)βπ΅)))) |
15 | | simplr 767 |
. . . . 5
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β π
β NzRing) |
16 | 11, 6, 7 | nminvr 24185 |
. . . . 5
β’ ((π
β NrmRing β§ π
β NzRing β§ π΅ β π) β (πβ((invrβπ
)βπ΅)) = (1 / (πβπ΅))) |
17 | 1, 15, 5, 16 | syl3anc 1371 |
. . . 4
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβ((invrβπ
)βπ΅)) = (1 / (πβπ΅))) |
18 | 17 | oveq2d 7424 |
. . 3
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β ((πβπ΄) Β· (πβ((invrβπ
)βπ΅))) = ((πβπ΄) Β· (1 / (πβπ΅)))) |
19 | 14, 18 | eqtrd 2772 |
. 2
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβ(π΄(.rβπ
)((invrβπ
)βπ΅))) = ((πβπ΄) Β· (1 / (πβπ΅)))) |
20 | | nmdvr.d |
. . . . 5
β’ / =
(/rβπ
) |
21 | 8, 12, 6, 7, 20 | dvrval 20216 |
. . . 4
β’ ((π΄ β π β§ π΅ β π) β (π΄ / π΅) = (π΄(.rβπ
)((invrβπ
)βπ΅))) |
22 | 21 | adantl 482 |
. . 3
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (π΄ / π΅) = (π΄(.rβπ
)((invrβπ
)βπ΅))) |
23 | 22 | fveq2d 6895 |
. 2
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβ(π΄ / π΅)) = (πβ(π΄(.rβπ
)((invrβπ
)βπ΅)))) |
24 | | nrgngp 24178 |
. . . . . 6
β’ (π
β NrmRing β π
β NrmGrp) |
25 | 24 | ad2antrr 724 |
. . . . 5
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β π
β NrmGrp) |
26 | 8, 11 | nmcl 24124 |
. . . . 5
β’ ((π
β NrmGrp β§ π΄ β π) β (πβπ΄) β β) |
27 | 25, 2, 26 | syl2anc 584 |
. . . 4
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβπ΄) β β) |
28 | 27 | recnd 11241 |
. . 3
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβπ΄) β β) |
29 | 8, 6 | unitss 20189 |
. . . . . 6
β’ π β π |
30 | 29, 5 | sselid 3980 |
. . . . 5
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β π΅ β π) |
31 | 8, 11 | nmcl 24124 |
. . . . 5
β’ ((π
β NrmGrp β§ π΅ β π) β (πβπ΅) β β) |
32 | 25, 30, 31 | syl2anc 584 |
. . . 4
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβπ΅) β β) |
33 | 32 | recnd 11241 |
. . 3
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβπ΅) β β) |
34 | 11, 6 | unitnmn0 24184 |
. . . . 5
β’ ((π
β NrmRing β§ π
β NzRing β§ π΅ β π) β (πβπ΅) β 0) |
35 | 34 | 3expa 1118 |
. . . 4
β’ (((π
β NrmRing β§ π
β NzRing) β§ π΅ β π) β (πβπ΅) β 0) |
36 | 35 | adantrl 714 |
. . 3
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβπ΅) β 0) |
37 | 28, 33, 36 | divrecd 11992 |
. 2
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β ((πβπ΄) / (πβπ΅)) = ((πβπ΄) Β· (1 / (πβπ΅)))) |
38 | 19, 23, 37 | 3eqtr4d 2782 |
1
β’ (((π
β NrmRing β§ π
β NzRing) β§ (π΄ β π β§ π΅ β π)) β (πβ(π΄ / π΅)) = ((πβπ΄) / (πβπ΅))) |