Metamath Proof Explorer


Theorem zlmds

Description: Distance in a ZZ -module (if present). (Contributed by Thierry Arnoux, 8-Nov-2017) (Proof shortened by AV, 11-Nov-2024)

Ref Expression
Hypotheses zlmlem2.1 ⊢ W = ℤMod ⁡ G
zlmds.1 ⊢ D = dist ⁡ G
Assertion zlmds ⊢ G ∈ V → D = dist ⁡ W

Proof

Step Hyp Ref Expression
1 zlmlem2.1 ⊢ W = ℤMod ⁡ G
2 zlmds.1 ⊢ D = dist ⁡ G
3 eqid ⊢ ⋅ G = ⋅ G
4 1 3 zlmval ⊢ G ∈ V → W = G sSet Scalar ⁡ ndx ℤ ring sSet ⋅ ndx ⋅ G
5 4 fveq2d ⊢ G ∈ V → dist ⁡ W = dist ⁡ G sSet Scalar ⁡ ndx ℤ ring sSet ⋅ ndx ⋅ G
6 dsid ⊢ dist = Slot dist ⁡ ndx
7 slotsdnscsi ⊢ dist ⁡ ndx ≠ Scalar ⁡ ndx ∧ dist ⁡ ndx ≠ ⋅ ndx ∧ dist ⁡ ndx ≠ ⋅ 𝑖 ⁡ ndx
8 7 simp1i ⊢ dist ⁡ ndx ≠ Scalar ⁡ ndx
9 6 8 setsnid ⊢ dist ⁡ G = dist ⁡ G sSet Scalar ⁡ ndx ℤ ring
10 7 simp2i ⊢ dist ⁡ ndx ≠ ⋅ ndx
11 6 10 setsnid ⊢ dist ⁡ G sSet Scalar ⁡ ndx ℤ ring = dist ⁡ G sSet Scalar ⁡ ndx ℤ ring sSet ⋅ ndx ⋅ G
12 9 11 eqtri ⊢ dist ⁡ G = dist ⁡ G sSet Scalar ⁡ ndx ℤ ring sSet ⋅ ndx ⋅ G
13 5 12 eqtr4di ⊢ G ∈ V → dist ⁡ W = dist ⁡ G
14 2 13 eqtr4id ⊢ G ∈ V → D = dist ⁡ W