Step | Hyp | Ref
| Expression |
1 | | simpl 483 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π
β NrmRing) |
2 | | simpr1 1194 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π΄ β π) |
3 | | nrgring 24179 |
. . . . . . 7
β’ (π
β NrmRing β π
β Ring) |
4 | 3 | adantr 481 |
. . . . . 6
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π
β Ring) |
5 | | ringgrp 20060 |
. . . . . 6
β’ (π
β Ring β π
β Grp) |
6 | 4, 5 | syl 17 |
. . . . 5
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π
β Grp) |
7 | | simpr2 1195 |
. . . . 5
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π΅ β π) |
8 | | simpr3 1196 |
. . . . 5
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β πΆ β π) |
9 | | nmmul.x |
. . . . . 6
β’ π = (Baseβπ
) |
10 | | eqid 2732 |
. . . . . 6
β’
(-gβπ
) = (-gβπ
) |
11 | 9, 10 | grpsubcl 18902 |
. . . . 5
β’ ((π
β Grp β§ π΅ β π β§ πΆ β π) β (π΅(-gβπ
)πΆ) β π) |
12 | 6, 7, 8, 11 | syl3anc 1371 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (π΅(-gβπ
)πΆ) β π) |
13 | | nmmul.n |
. . . . 5
β’ π = (normβπ
) |
14 | | nmmul.t |
. . . . 5
β’ Β· =
(.rβπ
) |
15 | 9, 13, 14 | nmmul 24180 |
. . . 4
β’ ((π
β NrmRing β§ π΄ β π β§ (π΅(-gβπ
)πΆ) β π) β (πβ(π΄ Β· (π΅(-gβπ
)πΆ))) = ((πβπ΄) Β· (πβ(π΅(-gβπ
)πΆ)))) |
16 | 1, 2, 12, 15 | syl3anc 1371 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (πβ(π΄ Β· (π΅(-gβπ
)πΆ))) = ((πβπ΄) Β· (πβ(π΅(-gβπ
)πΆ)))) |
17 | 9, 14, 10, 4, 2, 7,
8 | ringsubdi 20118 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (π΄ Β· (π΅(-gβπ
)πΆ)) = ((π΄ Β· π΅)(-gβπ
)(π΄ Β· πΆ))) |
18 | 17 | fveq2d 6895 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (πβ(π΄ Β· (π΅(-gβπ
)πΆ))) = (πβ((π΄ Β· π΅)(-gβπ
)(π΄ Β· πΆ)))) |
19 | 16, 18 | eqtr3d 2774 |
. 2
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β ((πβπ΄) Β· (πβ(π΅(-gβπ
)πΆ))) = (πβ((π΄ Β· π΅)(-gβπ
)(π΄ Β· πΆ)))) |
20 | | nrgngp 24178 |
. . . . 5
β’ (π
β NrmRing β π
β NrmGrp) |
21 | 20 | adantr 481 |
. . . 4
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β π
β NrmGrp) |
22 | | nrgdsdi.d |
. . . . 5
β’ π· = (distβπ
) |
23 | 13, 9, 10, 22 | ngpds 24112 |
. . . 4
β’ ((π
β NrmGrp β§ π΅ β π β§ πΆ β π) β (π΅π·πΆ) = (πβ(π΅(-gβπ
)πΆ))) |
24 | 21, 7, 8, 23 | syl3anc 1371 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (π΅π·πΆ) = (πβ(π΅(-gβπ
)πΆ))) |
25 | 24 | oveq2d 7424 |
. 2
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β ((πβπ΄) Β· (π΅π·πΆ)) = ((πβπ΄) Β· (πβ(π΅(-gβπ
)πΆ)))) |
26 | 9, 14 | ringcl 20072 |
. . . 4
β’ ((π
β Ring β§ π΄ β π β§ π΅ β π) β (π΄ Β· π΅) β π) |
27 | 4, 2, 7, 26 | syl3anc 1371 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (π΄ Β· π΅) β π) |
28 | 9, 14 | ringcl 20072 |
. . . 4
β’ ((π
β Ring β§ π΄ β π β§ πΆ β π) β (π΄ Β· πΆ) β π) |
29 | 4, 2, 8, 28 | syl3anc 1371 |
. . 3
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β (π΄ Β· πΆ) β π) |
30 | 13, 9, 10, 22 | ngpds 24112 |
. . 3
β’ ((π
β NrmGrp β§ (π΄ Β· π΅) β π β§ (π΄ Β· πΆ) β π) β ((π΄ Β· π΅)π·(π΄ Β· πΆ)) = (πβ((π΄ Β· π΅)(-gβπ
)(π΄ Β· πΆ)))) |
31 | 21, 27, 29, 30 | syl3anc 1371 |
. 2
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β ((π΄ Β· π΅)π·(π΄ Β· πΆ)) = (πβ((π΄ Β· π΅)(-gβπ
)(π΄ Β· πΆ)))) |
32 | 19, 25, 31 | 3eqtr4d 2782 |
1
β’ ((π
β NrmRing β§ (π΄ β π β§ π΅ β π β§ πΆ β π)) β ((πβπ΄) Β· (π΅π·πΆ)) = ((π΄ Β· π΅)π·(π΄ Β· πΆ))) |