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

Theorem swrdswrd 14600
Description: A subword of a subword is a subword. (Contributed by Alexander van der Vekens, 4-Apr-2018.)
Assertion
Ref Expression
swrdswrd ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)))

Proof of Theorem swrdswrd
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 swrdcl 14540 . . . . . 6 (𝑊 ∈ Word 𝑉 → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
213ad2ant1 1134 . . . . 5 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
32adantr 482 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
4 elfz0ubfz0 13552 . . . . 5 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → 𝐾 ∈ (0...𝐿))
54adantl 483 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐾 ∈ (0...𝐿))
6 elfzuz 13444 . . . . . . . . 9 (𝐾 ∈ (0...(𝑁𝑀)) → 𝐾 ∈ (ℤ‘0))
76adantl 483 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → 𝐾 ∈ (ℤ‘0))
8 fzss1 13487 . . . . . . . 8 (𝐾 ∈ (ℤ‘0) → (𝐾...(𝑁𝑀)) ⊆ (0...(𝑁𝑀)))
97, 8syl 17 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → (𝐾...(𝑁𝑀)) ⊆ (0...(𝑁𝑀)))
109sseld 3948 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → 𝐿 ∈ (0...(𝑁𝑀))))
1110impr 456 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐿 ∈ (0...(𝑁𝑀)))
12 3ancomb 1100 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ↔ (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
1312biimpi 215 . . . . . . . 8 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
1413adantr 482 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
15 swrdlen 14542 . . . . . . 7 ((𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))) → (♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)) = (𝑁𝑀))
1614, 15syl 17 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)) = (𝑁𝑀))
1716oveq2d 7378 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩))) = (0...(𝑁𝑀)))
1811, 17eleqtrrd 2841 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐿 ∈ (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩))))
19 swrdval2 14541 . . . 4 (((𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉𝐾 ∈ (0...𝐿) ∧ 𝐿 ∈ (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))))
203, 5, 18, 19syl3anc 1372 . . 3 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))))
21 fvex 6860 . . . . . 6 ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) ∈ V
22 eqid 2737 . . . . . 6 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))
2321, 22fnmpti 6649 . . . . 5 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) Fn (0..^(𝐿𝐾))
2423a1i 11 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) Fn (0..^(𝐿𝐾)))
25 swrdswrdlem 14599 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))))
26 swrdvalfn 14546 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
2725, 26syl 17 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
28 elfzelz 13448 . . . . . . . . . 10 (𝑀 ∈ (0...𝑁) → 𝑀 ∈ ℤ)
29 elfzelz 13448 . . . . . . . . . . 11 (𝐿 ∈ (𝐾...(𝑁𝑀)) → 𝐿 ∈ ℤ)
30 elfzelz 13448 . . . . . . . . . . 11 (𝐾 ∈ (0...(𝑁𝑀)) → 𝐾 ∈ ℤ)
31 zcn 12511 . . . . . . . . . . . . . 14 (𝑀 ∈ ℤ → 𝑀 ∈ ℂ)
3231adantr 482 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝑀 ∈ ℂ)
33 zcn 12511 . . . . . . . . . . . . . 14 (𝐿 ∈ ℤ → 𝐿 ∈ ℂ)
3433ad2antrl 727 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝐿 ∈ ℂ)
35 zcn 12511 . . . . . . . . . . . . . 14 (𝐾 ∈ ℤ → 𝐾 ∈ ℂ)
3635ad2antll 728 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝐾 ∈ ℂ)
37 pnpcan 11447 . . . . . . . . . . . . . 14 ((𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑀 + 𝐿) − (𝑀 + 𝐾)) = (𝐿𝐾))
3837eqcomd 2743 . . . . . . . . . . . . 13 ((𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
3932, 34, 36, 38syl3anc 1372 . . . . . . . . . . . 12 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
4039expcom 415 . . . . . . . . . . 11 ((𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4129, 30, 40syl2anr 598 . . . . . . . . . 10 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4228, 41syl5com 31 . . . . . . . . 9 (𝑀 ∈ (0...𝑁) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
43423ad2ant3 1136 . . . . . . . 8 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4443imp 408 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
4544oveq2d 7378 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0..^(𝐿𝐾)) = (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4645fneq2d 6601 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^(𝐿𝐾)) ↔ (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
4727, 46mpbird 257 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^(𝐿𝐾)))
48 simpr 486 . . . . . . 7 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → 𝑦 ∈ (0..^(𝐿𝐾)))
49 fvex 6860 . . . . . . 7 (𝑊‘((𝑦 + 𝐾) + 𝑀)) ∈ V
50 oveq1 7369 . . . . . . . . 9 (𝑥 = 𝑦 → (𝑥 + 𝐾) = (𝑦 + 𝐾))
5150fvoveq1d 7384 . . . . . . . 8 (𝑥 = 𝑦 → (𝑊‘((𝑥 + 𝐾) + 𝑀)) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
52 eqid 2737 . . . . . . . 8 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))
5351, 52fvmptg 6951 . . . . . . 7 ((𝑦 ∈ (0..^(𝐿𝐾)) ∧ (𝑊‘((𝑦 + 𝐾) + 𝑀)) ∈ V) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
5448, 49, 53sylancl 587 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
55 zcn 12511 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ℤ → 𝑦 ∈ ℂ)
5655, 31, 353anim123i 1152 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ))
57563expa 1119 . . . . . . . . . . . . . . . 16 (((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ))
58 add32r 11381 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝑦 + (𝑀 + 𝐾)) = ((𝑦 + 𝐾) + 𝑀))
5958eqcomd 2743 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
6057, 59syl 17 . . . . . . . . . . . . . . 15 (((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
6160exp31 421 . . . . . . . . . . . . . 14 (𝑦 ∈ ℤ → (𝑀 ∈ ℤ → (𝐾 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6261com13 88 . . . . . . . . . . . . 13 (𝐾 ∈ ℤ → (𝑀 ∈ ℤ → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6330, 62syl 17 . . . . . . . . . . . 12 (𝐾 ∈ (0...(𝑁𝑀)) → (𝑀 ∈ ℤ → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6463adantr 482 . . . . . . . . . . 11 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑀 ∈ ℤ → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6528, 64syl5com 31 . . . . . . . . . 10 (𝑀 ∈ (0...𝑁) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
66653ad2ant3 1136 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6766imp 408 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾))))
68 elfzoelz 13579 . . . . . . . 8 (𝑦 ∈ (0..^(𝐿𝐾)) → 𝑦 ∈ ℤ)
6967, 68impel 507 . . . . . . 7 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
7069fveq2d 6851 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑊‘((𝑦 + 𝐾) + 𝑀)) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
7154, 70eqtrd 2777 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
7213ad3antrrr 729 . . . . . . . 8 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
73 elfz2nn0 13539 . . . . . . . . . . . . 13 (𝐾 ∈ (0...(𝑁𝑀)) ↔ (𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0𝐾 ≤ (𝑁𝑀)))
74 elfz2 13438 . . . . . . . . . . . . . . . 16 (𝐿 ∈ (𝐾...(𝑁𝑀)) ↔ ((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ (𝐾𝐿𝐿 ≤ (𝑁𝑀))))
75 elfzo0 13620 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ (0..^(𝐿𝐾)) ↔ (𝑥 ∈ ℕ0 ∧ (𝐿𝐾) ∈ ℕ ∧ 𝑥 < (𝐿𝐾)))
76 nn0re 12429 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑥 ∈ ℕ0𝑥 ∈ ℝ)
7776ad2antrl 727 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝑥 ∈ ℝ)
78 nn0re 12429 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐾 ∈ ℕ0𝐾 ∈ ℝ)
7978adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝐾 ∈ ℝ)
80 zre 12510 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐿 ∈ ℤ → 𝐿 ∈ ℝ)
8180ad2antll 728 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝐿 ∈ ℝ)
82 ltaddsub 11636 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑥 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((𝑥 + 𝐾) < 𝐿𝑥 < (𝐿𝐾)))
8382bicomd 222 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑥 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝐿 ∈ ℝ) → (𝑥 < (𝐿𝐾) ↔ (𝑥 + 𝐾) < 𝐿))
8477, 79, 81, 83syl3anc 1372 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 < (𝐿𝐾) ↔ (𝑥 + 𝐾) < 𝐿))
85 nn0addcl 12455 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝑥 + 𝐾) ∈ ℕ0)
8685ex 414 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑥 ∈ ℕ0 → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℕ0))
8786adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℕ0))
8887impcom 409 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 + 𝐾) ∈ ℕ0)
8988ad3antrrr 729 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) ∈ ℕ0)
90 elnn0z 12519 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑥 + 𝐾) ∈ ℕ0 ↔ ((𝑥 + 𝐾) ∈ ℤ ∧ 0 ≤ (𝑥 + 𝐾)))
91 0red 11165 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → 0 ∈ ℝ)
92 zre 12510 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44 ((𝑥 + 𝐾) ∈ ℤ → (𝑥 + 𝐾) ∈ ℝ)
9392adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (𝑥 + 𝐾) ∈ ℝ)
9480adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → 𝐿 ∈ ℝ)
95 lelttr 11252 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 ((0 ∈ ℝ ∧ (𝑥 + 𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → 0 < 𝐿))
9691, 93, 94, 95syl3anc 1372 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → 0 < 𝐿))
97 0red 11165 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → 0 ∈ ℝ)
9880adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → 𝐿 ∈ ℝ)
99 nn0re 12429 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 48 ((𝑁𝑀) ∈ ℕ0 → (𝑁𝑀) ∈ ℝ)
10099adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → (𝑁𝑀) ∈ ℝ)
101 ltletr 11254 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((0 ∈ ℝ ∧ 𝐿 ∈ ℝ ∧ (𝑁𝑀) ∈ ℝ) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → 0 < (𝑁𝑀)))
10297, 98, 100, 101syl3anc 1372 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 46 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → 0 < (𝑁𝑀)))
103 elnnnn0b 12464 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 48 ((𝑁𝑀) ∈ ℕ ↔ ((𝑁𝑀) ∈ ℕ0 ∧ 0 < (𝑁𝑀)))
104103simplbi2 502 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝑁𝑀) ∈ ℕ0 → (0 < (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))
105104adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 46 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → (0 < (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))
106102, 105syld 47 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 45 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → (𝑁𝑀) ∈ ℕ))
107106exp4b 432 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44 (𝐿 ∈ ℤ → ((𝑁𝑀) ∈ ℕ0 → (0 < 𝐿 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
108107com23 86 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (𝐿 ∈ ℤ → (0 < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
109108adantl 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (0 < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
11096, 109syld 47 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
111110expd 417 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (0 ≤ (𝑥 + 𝐾) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))
112111a1d 25 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (0 ≤ (𝑥 + 𝐾) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))))
113112ex 414 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑥 + 𝐾) ∈ ℤ → (𝐿 ∈ ℤ → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (0 ≤ (𝑥 + 𝐾) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))))
114113com24 95 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ((𝑥 + 𝐾) ∈ ℤ → (0 ≤ (𝑥 + 𝐾) → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))))
115114imp 408 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (((𝑥 + 𝐾) ∈ ℤ ∧ 0 ≤ (𝑥 + 𝐾)) → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))))
11690, 115sylbi 216 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑥 + 𝐾) ∈ ℕ0 → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))))
11785, 116mpcom 38 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))
118117impancom 453 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))
119118impcom 409 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
120119imp41 427 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑁𝑀) ∈ ℕ)
121 nn0readdcl 12486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝑥 + 𝐾) ∈ ℝ)
122121ex 414 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (𝑥 ∈ ℕ0 → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℝ))
123122adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℝ))
124123impcom 409 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 + 𝐾) ∈ ℝ)
125 ltletr 11254 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝑥 + 𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ ∧ (𝑁𝑀) ∈ ℝ) → (((𝑥 + 𝐾) < 𝐿𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) < (𝑁𝑀)))
126124, 81, 99, 125syl2an3an 1423 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑁𝑀) ∈ ℕ0) → (((𝑥 + 𝐾) < 𝐿𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) < (𝑁𝑀)))
127126exp4b 432 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑁𝑀) ∈ ℕ0 → ((𝑥 + 𝐾) < 𝐿 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) < (𝑁𝑀)))))
128127com23 86 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) < (𝑁𝑀)))))
129128imp41 427 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) < (𝑁𝑀))
130 elfzo0 13620 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)) ↔ ((𝑥 + 𝐾) ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ ∧ (𝑥 + 𝐾) < (𝑁𝑀)))
13189, 120, 129, 130syl3anbrc 1344 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))
132131exp41 436 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
13384, 132sylbid 239 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 < (𝐿𝐾) → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
134133ex 414 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝐾 ∈ ℕ0 → ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝑥 < (𝐿𝐾) → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))))
135134com24 95 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝐾 ∈ ℕ0 → ((𝑁𝑀) ∈ ℕ0 → (𝑥 < (𝐿𝐾) → ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))))
136135imp 408 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 < (𝐿𝐾) → ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
137136com13 88 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝑥 < (𝐿𝐾) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
138137impancom 453 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑥 ∈ ℕ0𝑥 < (𝐿𝐾)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
1391383adant2 1132 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ ℕ0 ∧ (𝐿𝐾) ∈ ℕ ∧ 𝑥 < (𝐿𝐾)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
14075, 139sylbi 216 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ (0..^(𝐿𝐾)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
141140com14 96 . . . . . . . . . . . . . . . . . . . 20 (𝐿 ≤ (𝑁𝑀) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
142141adantl 483 . . . . . . . . . . . . . . . . . . 19 ((𝐾𝐿𝐿 ≤ (𝑁𝑀)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
143142com12 32 . . . . . . . . . . . . . . . . . 18 (𝐿 ∈ ℤ → ((𝐾𝐿𝐿 ≤ (𝑁𝑀)) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
1441433ad2ant3 1136 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((𝐾𝐿𝐿 ≤ (𝑁𝑀)) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
145144imp 408 . . . . . . . . . . . . . . . 16 (((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ (𝐾𝐿𝐿 ≤ (𝑁𝑀))) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
14674, 145sylbi 216 . . . . . . . . . . . . . . 15 (𝐿 ∈ (𝐾...(𝑁𝑀)) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
147146com12 32 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
1481473adant3 1133 . . . . . . . . . . . . 13 ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0𝐾 ≤ (𝑁𝑀)) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
14973, 148sylbi 216 . . . . . . . . . . . 12 (𝐾 ∈ (0...(𝑁𝑀)) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
150149imp 408 . . . . . . . . . . 11 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))
151150adantl 483 . . . . . . . . . 10 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))
152151adantr 482 . . . . . . . . 9 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))
153152imp 408 . . . . . . . 8 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))
154 swrdfv 14543 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))) ∧ (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))) → ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) = (𝑊‘((𝑥 + 𝐾) + 𝑀)))
15572, 153, 154syl2anc 585 . . . . . . 7 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) = (𝑊‘((𝑥 + 𝐾) + 𝑀)))
156155mpteq2dva 5210 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀))))
157156fveq1d 6849 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))‘𝑦) = ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦))
15825adantr 482 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))))
15931, 33, 353anim123i 1152 . . . . . . . . . . . . . . . . . 18 ((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ))
1601593expa 1119 . . . . . . . . . . . . . . . . 17 (((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ))
161160, 38syl 17 . . . . . . . . . . . . . . . 16 (((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
162161exp31 421 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℤ → (𝐿 ∈ ℤ → (𝐾 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
163162com3l 89 . . . . . . . . . . . . . 14 (𝐿 ∈ ℤ → (𝐾 ∈ ℤ → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
16429, 163syl 17 . . . . . . . . . . . . 13 (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝐾 ∈ ℤ → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
16530, 164mpan9 508 . . . . . . . . . . . 12 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
16628, 165syl5com 31 . . . . . . . . . . 11 (𝑀 ∈ (0...𝑁) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
1671663ad2ant3 1136 . . . . . . . . . 10 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
168167imp 408 . . . . . . . . 9 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
169168oveq2d 7378 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0..^(𝐿𝐾)) = (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
170169eleq2d 2824 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑦 ∈ (0..^(𝐿𝐾)) ↔ 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
171170biimpa 478 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
172 swrdfv 14543 . . . . . 6 (((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))) ∧ 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
173158, 171, 172syl2anc 585 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
17471, 157, 1733eqtr4d 2787 . . . 4 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))‘𝑦) = ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦))
17524, 47, 174eqfnfvd 6990 . . 3 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩))
17620, 175eqtrd 2777 . 2 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩))
177176ex 414 1 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 397  w3a 1088   = wceq 1542  wcel 2107  Vcvv 3448  wss 3915  cop 4597   class class class wbr 5110  cmpt 5193   Fn wfn 6496  cfv 6501  (class class class)co 7362  cc 11056  cr 11057  0cc0 11058   + caddc 11061   < clt 11196  cle 11197  cmin 11392  cn 12160  0cn0 12420  cz 12506  cuz 12770  ...cfz 13431  ..^cfzo 13574  chash 14237  Word cword 14409   substr csubstr 14535
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2708  ax-rep 5247  ax-sep 5261  ax-nul 5268  ax-pow 5325  ax-pr 5389  ax-un 7677  ax-cnex 11114  ax-resscn 11115  ax-1cn 11116  ax-icn 11117  ax-addcl 11118  ax-addrcl 11119  ax-mulcl 11120  ax-mulrcl 11121  ax-mulcom 11122  ax-addass 11123  ax-mulass 11124  ax-distr 11125  ax-i2m1 11126  ax-1ne0 11127  ax-1rid 11128  ax-rnegex 11129  ax-rrecex 11130  ax-cnre 11131  ax-pre-lttri 11132  ax-pre-lttrn 11133  ax-pre-ltadd 11134  ax-pre-mulgt0 11135
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2890  df-ne 2945  df-nel 3051  df-ral 3066  df-rex 3075  df-reu 3357  df-rab 3411  df-v 3450  df-sbc 3745  df-csb 3861  df-dif 3918  df-un 3920  df-in 3922  df-ss 3932  df-pss 3934  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4871  df-int 4913  df-iun 4961  df-br 5111  df-opab 5173  df-mpt 5194  df-tr 5228  df-id 5536  df-eprel 5542  df-po 5550  df-so 5551  df-fr 5593  df-we 5595  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6258  df-ord 6325  df-on 6326  df-lim 6327  df-suc 6328  df-iota 6453  df-fun 6503  df-fn 6504  df-f 6505  df-f1 6506  df-fo 6507  df-f1o 6508  df-fv 6509  df-riota 7318  df-ov 7365  df-oprab 7366  df-mpo 7367  df-om 7808  df-1st 7926  df-2nd 7927  df-frecs 8217  df-wrecs 8248  df-recs 8322  df-rdg 8361  df-1o 8417  df-er 8655  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-card 9882  df-pnf 11198  df-mnf 11199  df-xr 11200  df-ltxr 11201  df-le 11202  df-sub 11394  df-neg 11395  df-nn 12161  df-n0 12421  df-z 12507  df-uz 12771  df-fz 13432  df-fzo 13575  df-hash 14238  df-word 14410  df-substr 14536
This theorem is referenced by:  pfxswrd  14601  swrdpfx  14602
  Copyright terms: Public domain W3C validator