Step | Hyp | Ref
| Expression |
1 | | simpl 483 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π
β NrmRing) |
2 | | nrgring 24171 |
. . . . . . 7
β’ (π
β NrmRing β π
β Ring) |
3 | 2 | adantr 481 |
. . . . . 6
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π
β Ring) |
4 | | ringgrp 20054 |
. . . . . 6
β’ (π
β Ring β π
β Grp) |
5 | 3, 4 | syl 17 |
. . . . 5
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π
β Grp) |
6 | | simpr1 1194 |
. . . . 5
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π΄ β π) |
7 | | simpr2 1195 |
. . . . 5
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π΅ β π) |
8 | | nmmul.x |
. . . . . 6
β’ π = (Baseβπ
) |
9 | | eqid 2732 |
. . . . . 6
β’
(-gβπ
) = (-gβπ
) |
10 | 8, 9 | grpsubcl 18899 |
. . . . 5
β’ ((π
β Grp β§ π΄ β π β§ π΅ β π) β (π΄(-gβπ
)π΅) β π) |
11 | 5, 6, 7, 10 | syl3anc 1371 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (π΄(-gβπ
)π΅) β π) |
12 | | simpr3 1196 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β πΆ β π) |
13 | | nmmul.n |
. . . . 5
β’ π = (normβπ
) |
14 | | nmmul.t |
. . . . 5
β’ Β· =
(.rβπ
) |
15 | 8, 13, 14 | nmmul 24172 |
. . . 4
β’ ((π
β NrmRing β§ (π΄(-gβπ
)π΅) β π β§ πΆ β π) β (πβ((π΄(-gβπ
)π΅) Β· πΆ)) = ((πβ(π΄(-gβπ
)π΅)) Β· (πβπΆ))) |
16 | 1, 11, 12, 15 | syl3anc 1371 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (πβ((π΄(-gβπ
)π΅) Β· πΆ)) = ((πβ(π΄(-gβπ
)π΅)) Β· (πβπΆ))) |
17 | 8, 14, 9, 3, 6, 7, 12 | ringsubdir 20113 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β ((π΄(-gβπ
)π΅) Β· πΆ) = ((π΄ Β· πΆ)(-gβπ
)(π΅ Β· πΆ))) |
18 | 17 | fveq2d 6892 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (πβ((π΄(-gβπ
)π΅) Β· πΆ)) = (πβ((π΄ Β· πΆ)(-gβπ
)(π΅ Β· πΆ)))) |
19 | 16, 18 | eqtr3d 2774 |
. 2
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β ((πβ(π΄(-gβπ
)π΅)) Β· (πβπΆ)) = (πβ((π΄ Β· πΆ)(-gβπ
)(π΅ Β· πΆ)))) |
20 | | nrgngp 24170 |
. . . . 5
β’ (π
β NrmRing β π
β NrmGrp) |
21 | 20 | adantr 481 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π
β NrmGrp) |
22 | | nrgdsdi.d |
. . . . 5
β’ π· = (distβπ
) |
23 | 13, 8, 9, 22 | ngpds 24104 |
. . . 4
β’ ((π
β NrmGrp β§ π΄ β π β§ π΅ β π) β (π΄π·π΅) = (πβ(π΄(-gβπ
)π΅))) |
24 | 21, 6, 7, 23 | syl3anc 1371 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (π΄π·π΅) = (πβ(π΄(-gβπ
)π΅))) |
25 | 24 | oveq1d 7420 |
. 2
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β ((π΄π·π΅) Β· (πβπΆ)) = ((πβ(π΄(-gβπ
)π΅)) Β· (πβπΆ))) |
26 | 8, 14 | ringcl 20066 |
. . . 4
β’ ((π
β Ring β§ π΄ β π β§ πΆ β π) β (π΄ Β· πΆ) β π) |
27 | 3, 6, 12, 26 | syl3anc 1371 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (π΄ Β· πΆ) β π) |
28 | 8, 14 | ringcl 20066 |
. . . 4
β’ ((π
β Ring β§ π΅ β π β§ πΆ β π) β (π΅ Β· πΆ) β π) |
29 | 3, 7, 12, 28 | syl3anc 1371 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (π΅ Β· πΆ) β π) |
30 | 13, 8, 9, 22 | ngpds 24104 |
. . 3
β’ ((π
β NrmGrp β§ (π΄ Β· πΆ) β π β§ (π΅ Β· πΆ) β π) β ((π΄ Β· πΆ)π·(π΅ Β· πΆ)) = (πβ((π΄ Β· πΆ)(-gβπ
)(π΅ Β· πΆ)))) |
31 | 21, 27, 29, 30 | syl3anc 1371 |
. 2
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β ((π΄ Β· πΆ)π·(π΅ Β· πΆ)) = (πβ((π΄ Β· πΆ)(-gβπ
)(π΅ Β· πΆ)))) |
32 | 19, 25, 31 | 3eqtr4d 2782 |
1
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β ((π΄π·π΅) Β· (πβπΆ)) = ((π΄ Β· πΆ)π·(π΅ Β· πΆ))) |