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

Theorem swrdswrd 14774
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 14713 . . . . . 6 (𝑊 ∈ Word 𝑉 → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
213ad2ant1 1151 . . . . 5 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
32adantr 486 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
4 elfz0ubfz0 13687 . . . . 5 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → 𝐾 ∈ (0...𝐿))
54adantl 487 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐾 ∈ (0...𝐿))
6 elfzuz 13574 . . . . . . . . 9 (𝐾 ∈ (0...(𝑁𝑀)) → 𝐾 ∈ (ℤ‘0))
76adantl 487 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → 𝐾 ∈ (ℤ‘0))
8 fzss1 13618 . . . . . . . 8 (𝐾 ∈ (ℤ‘0) → (𝐾...(𝑁𝑀)) ⊆ (0...(𝑁𝑀)))
97, 8syl 18 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → (𝐾...(𝑁𝑀)) ⊆ (0...(𝑁𝑀)))
109sseld 3930 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → 𝐿 ∈ (0...(𝑁𝑀))))
1110impr 460 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐿 ∈ (0...(𝑁𝑀)))
12 3ancomb 1116 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ↔ (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
1312biimpi 219 . . . . . . . 8 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
1413adantr 486 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
15 swrdlen 14715 . . . . . . 7 ((𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))) → (♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)) = (𝑁𝑀))
1614, 15syl 18 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)) = (𝑁𝑀))
1716oveq2d 7429 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩))) = (0...(𝑁𝑀)))
1811, 17eleqtrrd 2863 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐿 ∈ (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩))))
19 swrdval2 14714 . . . 4 (((𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉𝐾 ∈ (0...𝐿) ∧ 𝐿 ∈ (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))))
203, 5, 18, 19syl3anc 1398 . . 3 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))))
21 fvex 6891 . . . . . 6 ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) ∈ V
22 eqid 2760 . . . . . 6 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))
2321, 22fnmpti 6675 . . . . 5 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) Fn (0..^(𝐿𝐾))
2423a1i 11 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) Fn (0..^(𝐿𝐾)))
25 swrdswrdlem 14773 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))))
26 swrdvalfn 14720 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
2725, 26syl 18 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
28 elfzelz 13578 . . . . . . . . . 10 (𝑀 ∈ (0...𝑁) → 𝑀 ∈ ℤ)
29 elfzelz 13578 . . . . . . . . . . 11 (𝐿 ∈ (𝐾...(𝑁𝑀)) → 𝐿 ∈ ℤ)
30 elfzelz 13578 . . . . . . . . . . 11 (𝐾 ∈ (0...(𝑁𝑀)) → 𝐾 ∈ ℤ)
31 zcn 12620 . . . . . . . . . . . . . 14 (𝑀 ∈ ℤ → 𝑀 ∈ ℂ)
3231adantr 486 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝑀 ∈ ℂ)
33 zcn 12620 . . . . . . . . . . . . . 14 (𝐿 ∈ ℤ → 𝐿 ∈ ℂ)
3433ad2antrl 741 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝐿 ∈ ℂ)
35 zcn 12620 . . . . . . . . . . . . . 14 (𝐾 ∈ ℤ → 𝐾 ∈ ℂ)
3635ad2antll 742 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝐾 ∈ ℂ)
37 pnpcan 11521 . . . . . . . . . . . . . 14 ((𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑀 + 𝐿) − (𝑀 + 𝐾)) = (𝐿𝐾))
3837eqcomd 2766 . . . . . . . . . . . . 13 ((𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
3932, 34, 36, 38syl3anc 1398 . . . . . . . . . . . 12 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
4039expcom 419 . . . . . . . . . . 11 ((𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4129, 30, 40syl2anr 609 . . . . . . . . . 10 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4228, 41syl5com 32 . . . . . . . . 9 (𝑀 ∈ (0...𝑁) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
43423ad2ant3 1153 . . . . . . . 8 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4443imp 412 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
4544oveq2d 7429 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0..^(𝐿𝐾)) = (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4645fneq2d 6626 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^(𝐿𝐾)) ↔ (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
4727, 46mpbird 260 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^(𝐿𝐾)))
48 simpr 490 . . . . . . 7 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → 𝑦 ∈ (0..^(𝐿𝐾)))
49 fvex 6891 . . . . . . 7 (𝑊‘((𝑦 + 𝐾) + 𝑀)) ∈ V
50 oveq1 7420 . . . . . . . . 9 (𝑥 = 𝑦 → (𝑥 + 𝐾) = (𝑦 + 𝐾))
5150fvoveq1d 7435 . . . . . . . 8 (𝑥 = 𝑦 → (𝑊‘((𝑥 + 𝐾) + 𝑀)) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
52 eqid 2760 . . . . . . . 8 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))
5351, 52fvmptg 6984 . . . . . . 7 ((𝑦 ∈ (0..^(𝐿𝐾)) ∧ (𝑊‘((𝑦 + 𝐾) + 𝑀)) ∈ V) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
5448, 49, 53sylancl 598 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
55 zcn 12620 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ℤ → 𝑦 ∈ ℂ)
5655, 31, 353anim123i 1169 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ))
57563expa 1136 . . . . . . . . . . . . . . . 16 (((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ))
58 add32r 11454 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝑦 + (𝑀 + 𝐾)) = ((𝑦 + 𝐾) + 𝑀))
5958eqcomd 2766 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
6057, 59syl 18 . . . . . . . . . . . . . . 15 (((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
6160exp31 425 . . . . . . . . . . . . . 14 (𝑦 ∈ ℤ → (𝑀 ∈ ℤ → (𝐾 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6261com13 89 . . . . . . . . . . . . 13 (𝐾 ∈ ℤ → (𝑀 ∈ ℤ → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6330, 62syl 18 . . . . . . . . . . . 12 (𝐾 ∈ (0...(𝑁𝑀)) → (𝑀 ∈ ℤ → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6463adantr 486 . . . . . . . . . . 11 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑀 ∈ ℤ → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6528, 64syl5com 32 . . . . . . . . . 10 (𝑀 ∈ (0...𝑁) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
66653ad2ant3 1153 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6766imp 412 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾))))
68 elfzoelz 13714 . . . . . . . 8 (𝑦 ∈ (0..^(𝐿𝐾)) → 𝑦 ∈ ℤ)
6967, 68impel 515 . . . . . . 7 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
7069fveq2d 6882 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑊‘((𝑦 + 𝐾) + 𝑀)) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
7154, 70eqtrd 2795 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
7213ad3antrrr 743 . . . . . . . 8 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
73 elfz2nn0 13673 . . . . . . . . . . . . 13 (𝐾 ∈ (0...(𝑁𝑀)) ↔ (𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0𝐾 ≤ (𝑁𝑀)))
74 elfz2 13568 . . . . . . . . . . . . . . . 16 (𝐿 ∈ (𝐾...(𝑁𝑀)) ↔ ((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ (𝐾𝐿𝐿 ≤ (𝑁𝑀))))
75 elfzo0 13756 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ (0..^(𝐿𝐾)) ↔ (𝑥 ∈ ℕ0 ∧ (𝐿𝐾) ∈ ℕ ∧ 𝑥 < (𝐿𝐾)))
76 nn0re 12537 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑥 ∈ ℕ0𝑥 ∈ ℝ)
7776ad2antrl 741 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝑥 ∈ ℝ)
78 nn0re 12537 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐾 ∈ ℕ0𝐾 ∈ ℝ)
7978adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝐾 ∈ ℝ)
80 zre 12619 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐿 ∈ ℤ → 𝐿 ∈ ℝ)
8180ad2antll 742 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝐿 ∈ ℝ)
82 ltaddsub 11712 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑥 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((𝑥 + 𝐾) < 𝐿𝑥 < (𝐿𝐾)))
8382bicomd 226 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑥 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝐿 ∈ ℝ) → (𝑥 < (𝐿𝐾) ↔ (𝑥 + 𝐾) < 𝐿))
8477, 79, 81, 83syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 < (𝐿𝐾) ↔ (𝑥 + 𝐾) < 𝐿))
85 nn0addcl 12563 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝑥 + 𝐾) ∈ ℕ0)
8685ex 418 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑥 ∈ ℕ0 → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℕ0))
8786adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℕ0))
8887impcom 413 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 + 𝐾) ∈ ℕ0)
8988ad3antrrr 743 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) ∈ ℕ0)
90 elnn0z 12628 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑥 + 𝐾) ∈ ℕ0 ↔ ((𝑥 + 𝐾) ∈ ℤ ∧ 0 ≤ (𝑥 + 𝐾)))
91 0red 11235 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → 0 ∈ ℝ)
92 zre 12619 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44 ((𝑥 + 𝐾) ∈ ℤ → (𝑥 + 𝐾) ∈ ℝ)
9392adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (𝑥 + 𝐾) ∈ ℝ)
9480adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → 𝐿 ∈ ℝ)
95 lelttr 11324 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 ((0 ∈ ℝ ∧ (𝑥 + 𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → 0 < 𝐿))
9691, 93, 94, 95syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → 0 < 𝐿))
97 0red 11235 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → 0 ∈ ℝ)
9880adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → 𝐿 ∈ ℝ)
99 nn0re 12537 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 48 ((𝑁𝑀) ∈ ℕ0 → (𝑁𝑀) ∈ ℝ)
10099adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → (𝑁𝑀) ∈ ℝ)
101 ltletr 11326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((0 ∈ ℝ ∧ 𝐿 ∈ ℝ ∧ (𝑁𝑀) ∈ ℝ) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → 0 < (𝑁𝑀)))
10297, 98, 100, 101syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 46 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → 0 < (𝑁𝑀)))
103 elnnnn0b 12572 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 48 ((𝑁𝑀) ∈ ℕ ↔ ((𝑁𝑀) ∈ ℕ0 ∧ 0 < (𝑁𝑀)))
104103simplbi2 506 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝑁𝑀) ∈ ℕ0 → (0 < (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))
105104adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 46 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → (0 < (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))
106102, 105syld 48 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 45 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → (𝑁𝑀) ∈ ℕ))
107106exp4b 436 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44 (𝐿 ∈ ℤ → ((𝑁𝑀) ∈ ℕ0 → (0 < 𝐿 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
108107com23 87 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (𝐿 ∈ ℤ → (0 < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
109108adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (0 < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
11096, 109syld 48 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
111110expd 421 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (0 ≤ (𝑥 + 𝐾) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))
112111a1d 26 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (0 ≤ (𝑥 + 𝐾) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))))
113112ex 418 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑥 + 𝐾) ∈ ℤ → (𝐿 ∈ ℤ → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (0 ≤ (𝑥 + 𝐾) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))))
114113com24 96 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ((𝑥 + 𝐾) ∈ ℤ → (0 ≤ (𝑥 + 𝐾) → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))))
115114imp 412 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (((𝑥 + 𝐾) ∈ ℤ ∧ 0 ≤ (𝑥 + 𝐾)) → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))))
11690, 115sylbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑥 + 𝐾) ∈ ℕ0 → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))))
11785, 116mpcom 39 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))
118117impancom 457 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))
119118impcom 413 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
120119imp41 431 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑁𝑀) ∈ ℕ)
121 nn0readdcl 12595 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝑥 + 𝐾) ∈ ℝ)
122121ex 418 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (𝑥 ∈ ℕ0 → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℝ))
123122adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℝ))
124123impcom 413 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 + 𝐾) ∈ ℝ)
125 ltletr 11326 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝑥 + 𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ ∧ (𝑁𝑀) ∈ ℝ) → (((𝑥 + 𝐾) < 𝐿𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) < (𝑁𝑀)))
126124, 81, 99, 125syl2an3an 1449 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑁𝑀) ∈ ℕ0) → (((𝑥 + 𝐾) < 𝐿𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) < (𝑁𝑀)))
127126exp4b 436 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑁𝑀) ∈ ℕ0 → ((𝑥 + 𝐾) < 𝐿 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) < (𝑁𝑀)))))
128127com23 87 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) < (𝑁𝑀)))))
129128imp41 431 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) < (𝑁𝑀))
130 elfzo0 13756 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)) ↔ ((𝑥 + 𝐾) ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ ∧ (𝑥 + 𝐾) < (𝑁𝑀)))
13189, 120, 129, 130syl3anbrc 1362 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))
132131exp41 440 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
13384, 132sylbid 243 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 < (𝐿𝐾) → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
134133ex 418 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝐾 ∈ ℕ0 → ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝑥 < (𝐿𝐾) → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))))
135134com24 96 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝐾 ∈ ℕ0 → ((𝑁𝑀) ∈ ℕ0 → (𝑥 < (𝐿𝐾) → ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))))
136135imp 412 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 < (𝐿𝐾) → ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
137136com13 89 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝑥 < (𝐿𝐾) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
138137impancom 457 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑥 ∈ ℕ0𝑥 < (𝐿𝐾)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
1391383adant2 1149 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ ℕ0 ∧ (𝐿𝐾) ∈ ℕ ∧ 𝑥 < (𝐿𝐾)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
14075, 139sylbi 220 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ (0..^(𝐿𝐾)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
141140com14 97 . . . . . . . . . . . . . . . . . . . 20 (𝐿 ≤ (𝑁𝑀) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
142141adantl 487 . . . . . . . . . . . . . . . . . . 19 ((𝐾𝐿𝐿 ≤ (𝑁𝑀)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
143142com12 33 . . . . . . . . . . . . . . . . . 18 (𝐿 ∈ ℤ → ((𝐾𝐿𝐿 ≤ (𝑁𝑀)) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
1441433ad2ant3 1153 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((𝐾𝐿𝐿 ≤ (𝑁𝑀)) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
145144imp 412 . . . . . . . . . . . . . . . 16 (((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ (𝐾𝐿𝐿 ≤ (𝑁𝑀))) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
14674, 145sylbi 220 . . . . . . . . . . . . . . 15 (𝐿 ∈ (𝐾...(𝑁𝑀)) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
147146com12 33 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
1481473adant3 1150 . . . . . . . . . . . . 13 ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0𝐾 ≤ (𝑁𝑀)) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
14973, 148sylbi 220 . . . . . . . . . . . 12 (𝐾 ∈ (0...(𝑁𝑀)) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
150149imp 412 . . . . . . . . . . 11 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))
151150adantl 487 . . . . . . . . . 10 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))
152151adantr 486 . . . . . . . . 9 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))
153152imp 412 . . . . . . . 8 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))
154 swrdfv 14716 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))) ∧ (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))) → ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) = (𝑊‘((𝑥 + 𝐾) + 𝑀)))
15572, 153, 154syl2anc 596 . . . . . . 7 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) = (𝑊‘((𝑥 + 𝐾) + 𝑀)))
156155mpteq2dva 5198 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀))))
157156fveq1d 6880 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))‘𝑦) = ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦))
15825adantr 486 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))))
15931, 33, 353anim123i 1169 . . . . . . . . . . . . . . . . . 18 ((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ))
1601593expa 1136 . . . . . . . . . . . . . . . . 17 (((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ))
161160, 38syl 18 . . . . . . . . . . . . . . . 16 (((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
162161exp31 425 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℤ → (𝐿 ∈ ℤ → (𝐾 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
163162com3l 90 . . . . . . . . . . . . . 14 (𝐿 ∈ ℤ → (𝐾 ∈ ℤ → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
16429, 163syl 18 . . . . . . . . . . . . 13 (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝐾 ∈ ℤ → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
16530, 164mpan9 516 . . . . . . . . . . . 12 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
16628, 165syl5com 32 . . . . . . . . . . 11 (𝑀 ∈ (0...𝑁) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
1671663ad2ant3 1153 . . . . . . . . . 10 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
168167imp 412 . . . . . . . . 9 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
169168oveq2d 7429 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0..^(𝐿𝐾)) = (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
170169eleq2d 2846 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑦 ∈ (0..^(𝐿𝐾)) ↔ 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
171170biimpa 482 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
172 swrdfv 14716 . . . . . 6 (((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))) ∧ 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
173158, 171, 172syl2anc 596 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
17471, 157, 1733eqtr4d 2805 . . . 4 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))‘𝑦) = ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦))
17524, 47, 174eqfnfvd 7025 . . 3 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩))
17620, 175eqtrd 2795 . 2 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩))
177176ex 418 1 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wcel 2145  Vcvv 3450  wss 3899  cop 4590   class class class wbr 5103  cmpt 5186   Fn wfn 6528  cfv 6533  (class class class)co 7413  cc 11122  cr 11123  0cc0 11124   + caddc 11127   < clt 11267  cle 11268  cmin 11465  cn 12257  0cn0 12528  cz 12615  cuz 12887  ...cfz 13561  ..^cfzo 13709  chash 14394  Word cword 14578   substr csubstr 14708
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7736  ax-cnex 11180  ax-resscn 11181  ax-1cn 11182  ax-icn 11183  ax-addcl 11184  ax-addrcl 11185  ax-mulcl 11186  ax-mulrcl 11187  ax-mulcom 11188  ax-addass 11189  ax-mulass 11190  ax-distr 11191  ax-i2m1 11192  ax-1ne0 11193  ax-1rid 11194  ax-rnegex 11195  ax-rrecex 11196  ax-cnre 11197  ax-pre-lttri 11198  ax-pre-lttrn 11199  ax-pre-ltadd 11200  ax-pre-mulgt0 11201
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7370  df-ov 7416  df-oprab 7417  df-mpo 7418  df-om 7863  df-1st 7986  df-2nd 7987  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-1o 8455  df-er 8696  df-en 8953  df-dom 8954  df-sdom 8955  df-fin 8956  df-card 9944  df-pnf 11269  df-mnf 11270  df-xr 11271  df-ltxr 11272  df-le 11273  df-sub 11467  df-neg 11468  df-nn 12258  df-n0 12529  df-z 12616  df-uz 12888  df-fz 13562  df-fzo 13710  df-hash 14395  df-word 14579  df-substr 14709
This theorem is used by:  pfxswrd  14775  swrdpfx  14776
  Copyright terms: Public domain W3C validator