MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  2cshw Structured version   Visualization version   GIF version

Theorem 2cshw 14765
Description: Cyclically shifting a word two times. (Contributed by AV, 7-Apr-2018.) (Revised by AV, 4-Jun-2018.) (Revised by AV, 31-Oct-2018.)
Assertion
Ref Expression
2cshw ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑊 cyclShift 𝑀) cyclShift 𝑁) = (𝑊 cyclShift (𝑀 + 𝑁)))

Proof of Theorem 2cshw
Dummy variable 𝑖 is distinct from all other variables.
StepHypRef Expression
1 cshwlen 14751 . . . 4 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ) → (♯‘(𝑊 cyclShift 𝑀)) = (♯‘𝑊))
213adant3 1129 . . 3 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (♯‘(𝑊 cyclShift 𝑀)) = (♯‘𝑊))
3 cshwcl 14750 . . . . 5 (𝑊 ∈ Word 𝑉 → (𝑊 cyclShift 𝑀) ∈ Word 𝑉)
4 cshwlen 14751 . . . . 5 (((𝑊 cyclShift 𝑀) ∈ Word 𝑉𝑁 ∈ ℤ) → (♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)) = (♯‘(𝑊 cyclShift 𝑀)))
53, 4sylan 579 . . . 4 ((𝑊 ∈ Word 𝑉𝑁 ∈ ℤ) → (♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)) = (♯‘(𝑊 cyclShift 𝑀)))
653adant2 1128 . . 3 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)) = (♯‘(𝑊 cyclShift 𝑀)))
7 simp1 1133 . . . 4 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑊 ∈ Word 𝑉)
8 zaddcl 12601 . . . . 5 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 + 𝑁) ∈ ℤ)
983adant1 1127 . . . 4 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 + 𝑁) ∈ ℤ)
10 cshwlen 14751 . . . 4 ((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝑁) ∈ ℤ) → (♯‘(𝑊 cyclShift (𝑀 + 𝑁))) = (♯‘𝑊))
117, 9, 10syl2anc 583 . . 3 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (♯‘(𝑊 cyclShift (𝑀 + 𝑁))) = (♯‘𝑊))
122, 6, 113eqtr4d 2774 . 2 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)) = (♯‘(𝑊 cyclShift (𝑀 + 𝑁))))
136, 2eqtrd 2764 . . . . . 6 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)) = (♯‘𝑊))
1413oveq2d 7418 . . . . 5 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (0..^(♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁))) = (0..^(♯‘𝑊)))
1514eleq2d 2811 . . . 4 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑖 ∈ (0..^(♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁))) ↔ 𝑖 ∈ (0..^(♯‘𝑊))))
1633ad2ant1 1130 . . . . . . . 8 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑊 cyclShift 𝑀) ∈ Word 𝑉)
1716adantr 480 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (𝑊 cyclShift 𝑀) ∈ Word 𝑉)
18 simpl3 1190 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → 𝑁 ∈ ℤ)
192oveq2d 7418 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (0..^(♯‘(𝑊 cyclShift 𝑀))) = (0..^(♯‘𝑊)))
2019eleq2d 2811 . . . . . . . 8 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑖 ∈ (0..^(♯‘(𝑊 cyclShift 𝑀))) ↔ 𝑖 ∈ (0..^(♯‘𝑊))))
2120biimpar 477 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → 𝑖 ∈ (0..^(♯‘(𝑊 cyclShift 𝑀))))
22 cshwidxmod 14755 . . . . . . 7 (((𝑊 cyclShift 𝑀) ∈ Word 𝑉𝑁 ∈ ℤ ∧ 𝑖 ∈ (0..^(♯‘(𝑊 cyclShift 𝑀)))) → (((𝑊 cyclShift 𝑀) cyclShift 𝑁)‘𝑖) = ((𝑊 cyclShift 𝑀)‘((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀)))))
2317, 18, 21, 22syl3anc 1368 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (((𝑊 cyclShift 𝑀) cyclShift 𝑁)‘𝑖) = ((𝑊 cyclShift 𝑀)‘((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀)))))
24 simpl1 1188 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → 𝑊 ∈ Word 𝑉)
25 simpl2 1189 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → 𝑀 ∈ ℤ)
26 elfzo0 13674 . . . . . . . . . . 11 (𝑖 ∈ (0..^(♯‘𝑊)) ↔ (𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ ∧ 𝑖 < (♯‘𝑊)))
27 nn0z 12582 . . . . . . . . . . . . . . . 16 (𝑖 ∈ ℕ0𝑖 ∈ ℤ)
2827ad2antrr 723 . . . . . . . . . . . . . . 15 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → 𝑖 ∈ ℤ)
29 simpr3 1193 . . . . . . . . . . . . . . 15 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → 𝑁 ∈ ℤ)
3028, 29zaddcld 12669 . . . . . . . . . . . . . 14 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → (𝑖 + 𝑁) ∈ ℤ)
31 simplr 766 . . . . . . . . . . . . . 14 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → (♯‘𝑊) ∈ ℕ)
3230, 31jca 511 . . . . . . . . . . . . 13 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → ((𝑖 + 𝑁) ∈ ℤ ∧ (♯‘𝑊) ∈ ℕ))
3332ex 412 . . . . . . . . . . . 12 ((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) → ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑖 + 𝑁) ∈ ℤ ∧ (♯‘𝑊) ∈ ℕ)))
34333adant3 1129 . . . . . . . . . . 11 ((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ ∧ 𝑖 < (♯‘𝑊)) → ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑖 + 𝑁) ∈ ℤ ∧ (♯‘𝑊) ∈ ℕ)))
3526, 34sylbi 216 . . . . . . . . . 10 (𝑖 ∈ (0..^(♯‘𝑊)) → ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑖 + 𝑁) ∈ ℤ ∧ (♯‘𝑊) ∈ ℕ)))
3635impcom 407 . . . . . . . . 9 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → ((𝑖 + 𝑁) ∈ ℤ ∧ (♯‘𝑊) ∈ ℕ))
37 zmodfzo 13860 . . . . . . . . 9 (((𝑖 + 𝑁) ∈ ℤ ∧ (♯‘𝑊) ∈ ℕ) → ((𝑖 + 𝑁) mod (♯‘𝑊)) ∈ (0..^(♯‘𝑊)))
3836, 37syl 17 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → ((𝑖 + 𝑁) mod (♯‘𝑊)) ∈ (0..^(♯‘𝑊)))
391oveq2d 7418 . . . . . . . . . . 11 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ) → ((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) = ((𝑖 + 𝑁) mod (♯‘𝑊)))
4039eleq1d 2810 . . . . . . . . . 10 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ) → (((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) ∈ (0..^(♯‘𝑊)) ↔ ((𝑖 + 𝑁) mod (♯‘𝑊)) ∈ (0..^(♯‘𝑊))))
41403adant3 1129 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) ∈ (0..^(♯‘𝑊)) ↔ ((𝑖 + 𝑁) mod (♯‘𝑊)) ∈ (0..^(♯‘𝑊))))
4241adantr 480 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) ∈ (0..^(♯‘𝑊)) ↔ ((𝑖 + 𝑁) mod (♯‘𝑊)) ∈ (0..^(♯‘𝑊))))
4338, 42mpbird 257 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → ((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) ∈ (0..^(♯‘𝑊)))
44 cshwidxmod 14755 . . . . . . 7 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ ((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) ∈ (0..^(♯‘𝑊))) → ((𝑊 cyclShift 𝑀)‘((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀)))) = (𝑊‘((((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) + 𝑀) mod (♯‘𝑊))))
4524, 25, 43, 44syl3anc 1368 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → ((𝑊 cyclShift 𝑀)‘((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀)))) = (𝑊‘((((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) + 𝑀) mod (♯‘𝑊))))
46 nn0re 12480 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ ℕ0𝑖 ∈ ℝ)
4746ad2antrr 723 . . . . . . . . . . . . . . . 16 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → 𝑖 ∈ ℝ)
48 zre 12561 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℤ → 𝑁 ∈ ℝ)
4948ad2antll 726 . . . . . . . . . . . . . . . 16 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → 𝑁 ∈ ℝ)
5047, 49readdcld 11242 . . . . . . . . . . . . . . 15 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → (𝑖 + 𝑁) ∈ ℝ)
51 zre 12561 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℤ → 𝑀 ∈ ℝ)
5251ad2antrl 725 . . . . . . . . . . . . . . 15 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → 𝑀 ∈ ℝ)
53 nnrp 12986 . . . . . . . . . . . . . . . 16 ((♯‘𝑊) ∈ ℕ → (♯‘𝑊) ∈ ℝ+)
5453ad2antlr 724 . . . . . . . . . . . . . . 15 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → (♯‘𝑊) ∈ ℝ+)
55 modaddmod 13876 . . . . . . . . . . . . . . 15 (((𝑖 + 𝑁) ∈ ℝ ∧ 𝑀 ∈ ℝ ∧ (♯‘𝑊) ∈ ℝ+) → ((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊)) = (((𝑖 + 𝑁) + 𝑀) mod (♯‘𝑊)))
5650, 52, 54, 55syl3anc 1368 . . . . . . . . . . . . . 14 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → ((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊)) = (((𝑖 + 𝑁) + 𝑀) mod (♯‘𝑊)))
57 nn0cn 12481 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ ℕ0𝑖 ∈ ℂ)
5857ad2antrr 723 . . . . . . . . . . . . . . . 16 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → 𝑖 ∈ ℂ)
59 zcn 12562 . . . . . . . . . . . . . . . . 17 (𝑀 ∈ ℤ → 𝑀 ∈ ℂ)
6059ad2antrl 725 . . . . . . . . . . . . . . . 16 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → 𝑀 ∈ ℂ)
61 zcn 12562 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ ℤ → 𝑁 ∈ ℂ)
6261ad2antll 726 . . . . . . . . . . . . . . . 16 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → 𝑁 ∈ ℂ)
63 add32r 11432 . . . . . . . . . . . . . . . 16 ((𝑖 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝑁 ∈ ℂ) → (𝑖 + (𝑀 + 𝑁)) = ((𝑖 + 𝑁) + 𝑀))
6458, 60, 62, 63syl3anc 1368 . . . . . . . . . . . . . . 15 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → (𝑖 + (𝑀 + 𝑁)) = ((𝑖 + 𝑁) + 𝑀))
6564oveq1d 7417 . . . . . . . . . . . . . 14 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → ((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊)) = (((𝑖 + 𝑁) + 𝑀) mod (♯‘𝑊)))
6656, 65eqtr4d 2767 . . . . . . . . . . . . 13 (((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ)) → ((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊)) = ((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊)))
6766ex 412 . . . . . . . . . . . 12 ((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ) → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊)) = ((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊))))
68673adant3 1129 . . . . . . . . . . 11 ((𝑖 ∈ ℕ0 ∧ (♯‘𝑊) ∈ ℕ ∧ 𝑖 < (♯‘𝑊)) → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊)) = ((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊))))
6926, 68sylbi 216 . . . . . . . . . 10 (𝑖 ∈ (0..^(♯‘𝑊)) → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊)) = ((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊))))
7069impcom 407 . . . . . . . . 9 (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → ((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊)) = ((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊)))
71703adantl1 1163 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → ((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊)) = ((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊)))
7271fveq2d 6886 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (𝑊‘((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊))) = (𝑊‘((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊))))
732adantr 480 . . . . . . . . . 10 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (♯‘(𝑊 cyclShift 𝑀)) = (♯‘𝑊))
7473oveq2d 7418 . . . . . . . . 9 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → ((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) = ((𝑖 + 𝑁) mod (♯‘𝑊)))
7574oveq1d 7417 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) + 𝑀) = (((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀))
7675fvoveq1d 7424 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (𝑊‘((((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) + 𝑀) mod (♯‘𝑊))) = (𝑊‘((((𝑖 + 𝑁) mod (♯‘𝑊)) + 𝑀) mod (♯‘𝑊))))
779adantr 480 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (𝑀 + 𝑁) ∈ ℤ)
78 simpr 484 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → 𝑖 ∈ (0..^(♯‘𝑊)))
79 cshwidxmod 14755 . . . . . . . 8 ((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝑁) ∈ ℤ ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖) = (𝑊‘((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊))))
8024, 77, 78, 79syl3anc 1368 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖) = (𝑊‘((𝑖 + (𝑀 + 𝑁)) mod (♯‘𝑊))))
8172, 76, 803eqtr4d 2774 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (𝑊‘((((𝑖 + 𝑁) mod (♯‘(𝑊 cyclShift 𝑀))) + 𝑀) mod (♯‘𝑊))) = ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖))
8223, 45, 813eqtrd 2768 . . . . 5 (((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ 𝑖 ∈ (0..^(♯‘𝑊))) → (((𝑊 cyclShift 𝑀) cyclShift 𝑁)‘𝑖) = ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖))
8382ex 412 . . . 4 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑖 ∈ (0..^(♯‘𝑊)) → (((𝑊 cyclShift 𝑀) cyclShift 𝑁)‘𝑖) = ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖)))
8415, 83sylbid 239 . . 3 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑖 ∈ (0..^(♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁))) → (((𝑊 cyclShift 𝑀) cyclShift 𝑁)‘𝑖) = ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖)))
8584ralrimiv 3137 . 2 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ∀𝑖 ∈ (0..^(♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)))(((𝑊 cyclShift 𝑀) cyclShift 𝑁)‘𝑖) = ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖))
86 cshwcl 14750 . . . . 5 ((𝑊 cyclShift 𝑀) ∈ Word 𝑉 → ((𝑊 cyclShift 𝑀) cyclShift 𝑁) ∈ Word 𝑉)
873, 86syl 17 . . . 4 (𝑊 ∈ Word 𝑉 → ((𝑊 cyclShift 𝑀) cyclShift 𝑁) ∈ Word 𝑉)
88 cshwcl 14750 . . . 4 (𝑊 ∈ Word 𝑉 → (𝑊 cyclShift (𝑀 + 𝑁)) ∈ Word 𝑉)
89 eqwrd 14509 . . . 4 ((((𝑊 cyclShift 𝑀) cyclShift 𝑁) ∈ Word 𝑉 ∧ (𝑊 cyclShift (𝑀 + 𝑁)) ∈ Word 𝑉) → (((𝑊 cyclShift 𝑀) cyclShift 𝑁) = (𝑊 cyclShift (𝑀 + 𝑁)) ↔ ((♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)) = (♯‘(𝑊 cyclShift (𝑀 + 𝑁))) ∧ ∀𝑖 ∈ (0..^(♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)))(((𝑊 cyclShift 𝑀) cyclShift 𝑁)‘𝑖) = ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖))))
9087, 88, 89syl2anc 583 . . 3 (𝑊 ∈ Word 𝑉 → (((𝑊 cyclShift 𝑀) cyclShift 𝑁) = (𝑊 cyclShift (𝑀 + 𝑁)) ↔ ((♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)) = (♯‘(𝑊 cyclShift (𝑀 + 𝑁))) ∧ ∀𝑖 ∈ (0..^(♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)))(((𝑊 cyclShift 𝑀) cyclShift 𝑁)‘𝑖) = ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖))))
91903ad2ant1 1130 . 2 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑊 cyclShift 𝑀) cyclShift 𝑁) = (𝑊 cyclShift (𝑀 + 𝑁)) ↔ ((♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)) = (♯‘(𝑊 cyclShift (𝑀 + 𝑁))) ∧ ∀𝑖 ∈ (0..^(♯‘((𝑊 cyclShift 𝑀) cyclShift 𝑁)))(((𝑊 cyclShift 𝑀) cyclShift 𝑁)‘𝑖) = ((𝑊 cyclShift (𝑀 + 𝑁))‘𝑖))))
9212, 85, 91mpbir2and 710 1 ((𝑊 ∈ Word 𝑉𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑊 cyclShift 𝑀) cyclShift 𝑁) = (𝑊 cyclShift (𝑀 + 𝑁)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395  w3a 1084   = wceq 1533  wcel 2098  wral 3053   class class class wbr 5139  cfv 6534  (class class class)co 7402  cc 11105  cr 11106  0cc0 11107   + caddc 11110   < clt 11247  cn 12211  0cn0 12471  cz 12557  +crp 12975  ..^cfzo 13628   mod cmo 13835  chash 14291  Word cword 14466   cyclShift ccsh 14740
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5276  ax-sep 5290  ax-nul 5297  ax-pow 5354  ax-pr 5418  ax-un 7719  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184  ax-pre-sup 11185
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3771  df-csb 3887  df-dif 3944  df-un 3946  df-in 3948  df-ss 3958  df-pss 3960  df-nul 4316  df-if 4522  df-pw 4597  df-sn 4622  df-pr 4624  df-op 4628  df-uni 4901  df-int 4942  df-iun 4990  df-br 5140  df-opab 5202  df-mpt 5223  df-tr 5257  df-id 5565  df-eprel 5571  df-po 5579  df-so 5580  df-fr 5622  df-we 5624  df-xp 5673  df-rel 5674  df-cnv 5675  df-co 5676  df-dm 5677  df-rn 5678  df-res 5679  df-ima 5680  df-pred 6291  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6486  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-riota 7358  df-ov 7405  df-oprab 7406  df-mpo 7407  df-om 7850  df-1st 7969  df-2nd 7970  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-er 8700  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-sup 9434  df-inf 9435  df-card 9931  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-sub 11445  df-neg 11446  df-div 11871  df-nn 12212  df-2 12274  df-n0 12472  df-z 12558  df-uz 12822  df-rp 12976  df-fz 13486  df-fzo 13629  df-fl 13758  df-mod 13836  df-hash 14292  df-word 14467  df-concat 14523  df-substr 14593  df-pfx 14623  df-csh 14741
This theorem is referenced by:  2cshwid  14766  2cshwcom  14768  cshweqdif2  14771  2cshwcshw  14778  cshwcshid  14780  cshwcsh2id  14781  cshwshashlem2  17035
  Copyright terms: Public domain W3C validator