Metamath Proof Explorer


Theorem zlmnm

Description: Norm of a ZZ -module (if present). (Contributed by Thierry Arnoux, 8-Nov-2017)

Ref Expression
Hypotheses zlmlem2.1 𝑊 = ( ℤMod ‘ 𝐺 )
zlmnm.1 𝑁 = ( norm ‘ 𝐺 )
Assertion zlmnm ( 𝐺𝑉𝑁 = ( norm ‘ 𝑊 ) )

Proof

Step Hyp Ref Expression
1 zlmlem2.1 𝑊 = ( ℤMod ‘ 𝐺 )
2 zlmnm.1 𝑁 = ( norm ‘ 𝐺 )
3 eqid ( Base ‘ 𝐺 ) = ( Base ‘ 𝐺 )
4 1 3 zlmbas ( Base ‘ 𝐺 ) = ( Base ‘ 𝑊 )
5 4 a1i ( 𝐺𝑉 → ( Base ‘ 𝐺 ) = ( Base ‘ 𝑊 ) )
6 eqid ( +g𝐺 ) = ( +g𝐺 )
7 1 6 zlmplusg ( +g𝐺 ) = ( +g𝑊 )
8 7 a1i ( 𝐺𝑉 → ( +g𝐺 ) = ( +g𝑊 ) )
9 eqid ( dist ‘ 𝐺 ) = ( dist ‘ 𝐺 )
10 1 9 zlmds ( 𝐺𝑉 → ( dist ‘ 𝐺 ) = ( dist ‘ 𝑊 ) )
11 5 8 10 nmpropd ( 𝐺𝑉 → ( norm ‘ 𝐺 ) = ( norm ‘ 𝑊 ) )
12 2 11 syl5eq ( 𝐺𝑉𝑁 = ( norm ‘ 𝑊 ) )