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

Theorem swrdswrd 14738
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 14679 . . . . . 6 (𝑊 ∈ Word 𝑉 → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
213ad2ant1 1149 . . . . 5 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
32adantr 485 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
4 elfz0ubfz0 13656 . . . . 5 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → 𝐾 ∈ (0...𝐿))
54adantl 486 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐾 ∈ (0...𝐿))
6 elfzuz 13544 . . . . . . . . 9 (𝐾 ∈ (0...(𝑁𝑀)) → 𝐾 ∈ (ℤ‘0))
76adantl 486 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → 𝐾 ∈ (ℤ‘0))
8 fzss1 13587 . . . . . . . 8 (𝐾 ∈ (ℤ‘0) → (𝐾...(𝑁𝑀)) ⊆ (0...(𝑁𝑀)))
97, 8syl 18 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → (𝐾...(𝑁𝑀)) ⊆ (0...(𝑁𝑀)))
109sseld 3944 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → 𝐿 ∈ (0...(𝑁𝑀))))
1110impr 459 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐿 ∈ (0...(𝑁𝑀)))
12 3ancomb 1114 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ↔ (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
1312biimpi 219 . . . . . . . 8 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
1413adantr 485 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
15 swrdlen 14681 . . . . . . 7 ((𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))) → (♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)) = (𝑁𝑀))
1614, 15syl 18 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)) = (𝑁𝑀))
1716oveq2d 7424 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩))) = (0...(𝑁𝑀)))
1811, 17eleqtrrd 2872 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐿 ∈ (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩))))
19 swrdval2 14680 . . . 4 (((𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉𝐾 ∈ (0...𝐿) ∧ 𝐿 ∈ (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))))
203, 5, 18, 19syl3anc 1396 . . 3 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))))
21 fvex 6892 . . . . . 6 ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) ∈ V
22 eqid 2769 . . . . . 6 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))
2321, 22fnmpti 6676 . . . . 5 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) Fn (0..^(𝐿𝐾))
2423a1i 11 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) Fn (0..^(𝐿𝐾)))
25 swrdswrdlem 14737 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))))
26 swrdvalfn 14685 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
2725, 26syl 18 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
28 elfzelz 13548 . . . . . . . . . 10 (𝑀 ∈ (0...𝑁) → 𝑀 ∈ ℤ)
29 elfzelz 13548 . . . . . . . . . . 11 (𝐿 ∈ (𝐾...(𝑁𝑀)) → 𝐿 ∈ ℤ)
30 elfzelz 13548 . . . . . . . . . . 11 (𝐾 ∈ (0...(𝑁𝑀)) → 𝐾 ∈ ℤ)
31 zcn 12592 . . . . . . . . . . . . . 14 (𝑀 ∈ ℤ → 𝑀 ∈ ℂ)
3231adantr 485 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝑀 ∈ ℂ)
33 zcn 12592 . . . . . . . . . . . . . 14 (𝐿 ∈ ℤ → 𝐿 ∈ ℂ)
3433ad2antrl 740 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝐿 ∈ ℂ)
35 zcn 12592 . . . . . . . . . . . . . 14 (𝐾 ∈ ℤ → 𝐾 ∈ ℂ)
3635ad2antll 741 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝐾 ∈ ℂ)
37 pnpcan 11493 . . . . . . . . . . . . . 14 ((𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑀 + 𝐿) − (𝑀 + 𝐾)) = (𝐿𝐾))
3837eqcomd 2775 . . . . . . . . . . . . 13 ((𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
3932, 34, 36, 38syl3anc 1396 . . . . . . . . . . . 12 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
4039expcom 418 . . . . . . . . . . 11 ((𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4129, 30, 40syl2anr 608 . . . . . . . . . 10 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4228, 41syl5com 32 . . . . . . . . 9 (𝑀 ∈ (0...𝑁) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
43423ad2ant3 1151 . . . . . . . 8 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4443imp 411 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
4544oveq2d 7424 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0..^(𝐿𝐾)) = (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4645fneq2d 6627 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^(𝐿𝐾)) ↔ (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
4727, 46mpbird 260 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^(𝐿𝐾)))
48 simpr 489 . . . . . . 7 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → 𝑦 ∈ (0..^(𝐿𝐾)))
49 fvex 6892 . . . . . . 7 (𝑊‘((𝑦 + 𝐾) + 𝑀)) ∈ V
50 oveq1 7415 . . . . . . . . 9 (𝑥 = 𝑦 → (𝑥 + 𝐾) = (𝑦 + 𝐾))
5150fvoveq1d 7430 . . . . . . . 8 (𝑥 = 𝑦 → (𝑊‘((𝑥 + 𝐾) + 𝑀)) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
52 eqid 2769 . . . . . . . 8 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))
5351, 52fvmptg 6985 . . . . . . 7 ((𝑦 ∈ (0..^(𝐿𝐾)) ∧ (𝑊‘((𝑦 + 𝐾) + 𝑀)) ∈ V) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
5448, 49, 53sylancl 597 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
55 zcn 12592 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ℤ → 𝑦 ∈ ℂ)
5655, 31, 353anim123i 1167 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ))
57563expa 1134 . . . . . . . . . . . . . . . 16 (((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ))
58 add32r 11426 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝑦 + (𝑀 + 𝐾)) = ((𝑦 + 𝐾) + 𝑀))
5958eqcomd 2775 . . . . . . . . . . . . . . . 16 ((𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
6057, 59syl 18 . . . . . . . . . . . . . . 15 (((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
6160exp31 424 . . . . . . . . . . . . . 14 (𝑦 ∈ ℤ → (𝑀 ∈ ℤ → (𝐾 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6261com13 89 . . . . . . . . . . . . 13 (𝐾 ∈ ℤ → (𝑀 ∈ ℤ → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6330, 62syl 18 . . . . . . . . . . . 12 (𝐾 ∈ (0...(𝑁𝑀)) → (𝑀 ∈ ℤ → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6463adantr 485 . . . . . . . . . . 11 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑀 ∈ ℤ → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6528, 64syl5com 32 . . . . . . . . . 10 (𝑀 ∈ (0...𝑁) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
66653ad2ant3 1151 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))))
6766imp 411 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑦 ∈ ℤ → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾))))
68 elfzoelz 13683 . . . . . . . 8 (𝑦 ∈ (0..^(𝐿𝐾)) → 𝑦 ∈ ℤ)
6967, 68impel 514 . . . . . . 7 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
7069fveq2d 6883 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑊‘((𝑦 + 𝐾) + 𝑀)) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
7154, 70eqtrd 2804 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
7213ad3antrrr 742 . . . . . . . 8 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
73 elfz2nn0 13642 . . . . . . . . . . . . 13 (𝐾 ∈ (0...(𝑁𝑀)) ↔ (𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0𝐾 ≤ (𝑁𝑀)))
74 elfz2 13538 . . . . . . . . . . . . . . . 16 (𝐿 ∈ (𝐾...(𝑁𝑀)) ↔ ((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ (𝐾𝐿𝐿 ≤ (𝑁𝑀))))
75 elfzo0 13725 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ (0..^(𝐿𝐾)) ↔ (𝑥 ∈ ℕ0 ∧ (𝐿𝐾) ∈ ℕ ∧ 𝑥 < (𝐿𝐾)))
76 nn0re 12509 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑥 ∈ ℕ0𝑥 ∈ ℝ)
7776ad2antrl 740 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝑥 ∈ ℝ)
78 nn0re 12509 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐾 ∈ ℕ0𝐾 ∈ ℝ)
7978adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝐾 ∈ ℝ)
80 zre 12591 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐿 ∈ ℤ → 𝐿 ∈ ℝ)
8180ad2antll 741 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝐿 ∈ ℝ)
82 ltaddsub 11684 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑥 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((𝑥 + 𝐾) < 𝐿𝑥 < (𝐿𝐾)))
8382bicomd 226 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑥 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝐿 ∈ ℝ) → (𝑥 < (𝐿𝐾) ↔ (𝑥 + 𝐾) < 𝐿))
8477, 79, 81, 83syl3anc 1396 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 < (𝐿𝐾) ↔ (𝑥 + 𝐾) < 𝐿))
85 nn0addcl 12535 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝑥 + 𝐾) ∈ ℕ0)
8685ex 417 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑥 ∈ ℕ0 → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℕ0))
8786adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℕ0))
8887impcom 412 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 + 𝐾) ∈ ℕ0)
8988ad3antrrr 742 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) ∈ ℕ0)
90 elnn0z 12600 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑥 + 𝐾) ∈ ℕ0 ↔ ((𝑥 + 𝐾) ∈ ℤ ∧ 0 ≤ (𝑥 + 𝐾)))
91 0red 11207 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → 0 ∈ ℝ)
92 zre 12591 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44 ((𝑥 + 𝐾) ∈ ℤ → (𝑥 + 𝐾) ∈ ℝ)
9392adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (𝑥 + 𝐾) ∈ ℝ)
9480adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → 𝐿 ∈ ℝ)
95 lelttr 11296 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 ((0 ∈ ℝ ∧ (𝑥 + 𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → 0 < 𝐿))
9691, 93, 94, 95syl3anc 1396 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → 0 < 𝐿))
97 0red 11207 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → 0 ∈ ℝ)
9880adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → 𝐿 ∈ ℝ)
99 nn0re 12509 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 48 ((𝑁𝑀) ∈ ℕ0 → (𝑁𝑀) ∈ ℝ)
10099adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → (𝑁𝑀) ∈ ℝ)
101 ltletr 11298 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((0 ∈ ℝ ∧ 𝐿 ∈ ℝ ∧ (𝑁𝑀) ∈ ℝ) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → 0 < (𝑁𝑀)))
10297, 98, 100, 101syl3anc 1396 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 46 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → 0 < (𝑁𝑀)))
103 elnnnn0b 12544 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 48 ((𝑁𝑀) ∈ ℕ ↔ ((𝑁𝑀) ∈ ℕ0 ∧ 0 < (𝑁𝑀)))
104103simplbi2 505 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝑁𝑀) ∈ ℕ0 → (0 < (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))
105104adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 46 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → (0 < (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))
106102, 105syld 48 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 45 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → (𝑁𝑀) ∈ ℕ))
107106exp4b 435 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44 (𝐿 ∈ ℤ → ((𝑁𝑀) ∈ ℕ0 → (0 < 𝐿 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
108107com23 87 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (𝐿 ∈ ℤ → (0 < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
109108adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (0 < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
11096, 109syld 48 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
111110expd 420 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (0 ≤ (𝑥 + 𝐾) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))
112111a1d 26 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (0 ≤ (𝑥 + 𝐾) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))))
113112ex 417 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑥 + 𝐾) ∈ ℤ → (𝐿 ∈ ℤ → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (0 ≤ (𝑥 + 𝐾) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))))
114113com24 96 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ((𝑥 + 𝐾) ∈ ℤ → (0 ≤ (𝑥 + 𝐾) → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))))
115114imp 411 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 (((𝑥 + 𝐾) ∈ ℤ ∧ 0 ≤ (𝑥 + 𝐾)) → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))))
11690, 115sylbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑥 + 𝐾) ∈ ℕ0 → ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))))
11785, 116mpcom 39 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝐿 ∈ ℤ → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))
118117impancom 456 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ)))))
119118impcom 412 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑁𝑀) ∈ ℕ))))
120119imp41 430 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑁𝑀) ∈ ℕ)
121 nn0readdcl 12567 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝑥 + 𝐾) ∈ ℝ)
122121ex 417 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (𝑥 ∈ ℕ0 → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℝ))
123122adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℝ))
124123impcom 412 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 + 𝐾) ∈ ℝ)
125 ltletr 11298 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 (((𝑥 + 𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ ∧ (𝑁𝑀) ∈ ℝ) → (((𝑥 + 𝐾) < 𝐿𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) < (𝑁𝑀)))
126124, 81, 99, 125syl2an3an 1447 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑁𝑀) ∈ ℕ0) → (((𝑥 + 𝐾) < 𝐿𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) < (𝑁𝑀)))
127126exp4b 435 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑁𝑀) ∈ ℕ0 → ((𝑥 + 𝐾) < 𝐿 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) < (𝑁𝑀)))))
128127com23 87 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) < (𝑁𝑀)))))
129128imp41 430 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) < (𝑁𝑀))
130 elfzo0 13725 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)) ↔ ((𝑥 + 𝐾) ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ ∧ (𝑥 + 𝐾) < (𝑁𝑀)))
13189, 120, 129, 130syl3anbrc 1360 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) ∧ (𝑥 + 𝐾) < 𝐿) ∧ (𝑁𝑀) ∈ ℕ0) ∧ 𝐿 ≤ (𝑁𝑀)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))
132131exp41 439 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → ((𝑥 + 𝐾) < 𝐿 → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
13384, 132sylbid 243 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 < (𝐿𝐾) → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
134133ex 417 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝐾 ∈ ℕ0 → ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝑥 < (𝐿𝐾) → ((𝑁𝑀) ∈ ℕ0 → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))))
135134com24 96 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝐾 ∈ ℕ0 → ((𝑁𝑀) ∈ ℕ0 → (𝑥 < (𝐿𝐾) → ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))))
136135imp 411 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 < (𝐿𝐾) → ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
137136com13 89 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝑥 < (𝐿𝐾) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
138137impancom 456 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑥 ∈ ℕ0𝑥 < (𝐿𝐾)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
1391383adant2 1147 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∈ ℕ0 ∧ (𝐿𝐾) ∈ ℕ ∧ 𝑥 < (𝐿𝐾)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
14075, 139sylbi 220 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ (0..^(𝐿𝐾)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ≤ (𝑁𝑀) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
141140com14 97 . . . . . . . . . . . . . . . . . . . 20 (𝐿 ≤ (𝑁𝑀) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
142141adantl 486 . . . . . . . . . . . . . . . . . . 19 ((𝐾𝐿𝐿 ≤ (𝑁𝑀)) → (𝐿 ∈ ℤ → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
143142com12 33 . . . . . . . . . . . . . . . . . 18 (𝐿 ∈ ℤ → ((𝐾𝐿𝐿 ≤ (𝑁𝑀)) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
1441433ad2ant3 1151 . . . . . . . . . . . . . . . . 17 ((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((𝐾𝐿𝐿 ≤ (𝑁𝑀)) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))))
145144imp 411 . . . . . . . . . . . . . . . 16 (((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ (𝐾𝐿𝐿 ≤ (𝑁𝑀))) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
14674, 145sylbi 220 . . . . . . . . . . . . . . 15 (𝐿 ∈ (𝐾...(𝑁𝑀)) → ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
147146com12 33 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
1481473adant3 1148 . . . . . . . . . . . . 13 ((𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0𝐾 ≤ (𝑁𝑀)) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
14973, 148sylbi 220 . . . . . . . . . . . 12 (𝐾 ∈ (0...(𝑁𝑀)) → (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))))
150149imp 411 . . . . . . . . . . 11 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))
151150adantl 486 . . . . . . . . . 10 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))
152151adantr 485 . . . . . . . . 9 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑥 ∈ (0..^(𝐿𝐾)) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))))
153152imp 411 . . . . . . . 8 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀)))
154 swrdfv 14682 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))) ∧ (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))) → ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) = (𝑊‘((𝑥 + 𝐾) + 𝑀)))
15572, 153, 154syl2anc 595 . . . . . . 7 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) = (𝑊‘((𝑥 + 𝐾) + 𝑀)))
156155mpteq2dva 5205 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀))))
157156fveq1d 6881 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))‘𝑦) = ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦))
15825adantr 485 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))))
15931, 33, 353anim123i 1167 . . . . . . . . . . . . . . . . . 18 ((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ))
1601593expa 1134 . . . . . . . . . . . . . . . . 17 (((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ))
161160, 38syl 18 . . . . . . . . . . . . . . . 16 (((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
162161exp31 424 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℤ → (𝐿 ∈ ℤ → (𝐾 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
163162com3l 90 . . . . . . . . . . . . . 14 (𝐿 ∈ ℤ → (𝐾 ∈ ℤ → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
16429, 163syl 18 . . . . . . . . . . . . 13 (𝐿 ∈ (𝐾...(𝑁𝑀)) → (𝐾 ∈ ℤ → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
16530, 164mpan9 515 . . . . . . . . . . . 12 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝑀 ∈ ℤ → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
16628, 165syl5com 32 . . . . . . . . . . 11 (𝑀 ∈ (0...𝑁) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
1671663ad2ant3 1151 . . . . . . . . . 10 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾))))
168167imp 411 . . . . . . . . 9 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝐿𝐾) = ((𝑀 + 𝐿) − (𝑀 + 𝐾)))
169168oveq2d 7424 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0..^(𝐿𝐾)) = (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
170169eleq2d 2855 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑦 ∈ (0..^(𝐿𝐾)) ↔ 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
171170biimpa 481 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
172 swrdfv 14682 . . . . . 6 (((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))) ∧ 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
173158, 171, 172syl2anc 595 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
17471, 157, 1733eqtr4d 2814 . . . 4 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))‘𝑦) = ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦))
17524, 47, 174eqfnfvd 7026 . . 3 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩))
17620, 175eqtrd 2804 . 2 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩))
177176ex 417 1 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → ((𝑊 substr ⟨𝑀, 𝑁⟩) substr ⟨𝐾, 𝐿⟩) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400  w3a 1101   = wceq 1567  wcel 2149  Vcvv 3463  wss 3913  cop 4597   class class class wbr 5110  cmpt 5193   Fn wfn 6529  cfv 6534  (class class class)co 7408  cc 11094  cr 11095  0cc0 11096   + caddc 11099   < clt 11239  cle 11240  cmin 11437  cn 12229  0cn0 12500  cz 12587  cuz 12858  ...cfz 13531  ..^cfzo 13678  chash 14362  Word cword 14546   substr csubstr 14674
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5239  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730  ax-cnex 11152  ax-resscn 11153  ax-1cn 11154  ax-icn 11155  ax-addcl 11156  ax-addrcl 11157  ax-mulcl 11158  ax-mulrcl 11159  ax-mulcom 11160  ax-addass 11161  ax-mulass 11162  ax-distr 11163  ax-i2m1 11164  ax-1ne0 11165  ax-1rid 11166  ax-rnegex 11167  ax-rrecex 11168  ax-cnre 11169  ax-pre-lttri 11170  ax-pre-lttrn 11171  ax-pre-ltadd 11172  ax-pre-mulgt0 11173
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-int 4914  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6300  df-ord 6361  df-on 6362  df-lim 6363  df-suc 6364  df-iota 6490  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-er 8690  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-card 9921  df-pnf 11241  df-mnf 11242  df-xr 11243  df-ltxr 11244  df-le 11245  df-sub 11439  df-neg 11440  df-nn 12230  df-n0 12501  df-z 12588  df-uz 12859  df-fz 13532  df-fzo 13679  df-hash 14363  df-word 14547  df-substr 14675
This theorem is referenced by:  pfxswrd  14739  swrdpfx  14740
  Copyright terms: Public domain W3C validator