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

Theorem swrdswrd 14764
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 14703 . . . . . 6 (𝑊 ∈ Word 𝑉 → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
213ad2ant1 1151 . . . . 5 ((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
32adantr 486 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨𝑀, 𝑁⟩) ∈ Word 𝑉)
4 elfz0ubfz0 13677 . . . . 5 ((𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀))) → 𝐾 ∈ (0...𝐿))
54adantl 487 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐾 ∈ (0...𝐿))
6 elfzuz 13564 . . . . . . . . 9 (𝐾 ∈ (0...(𝑁𝑀)) → 𝐾 ∈ (ℤ‘0))
76adantl 487 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → 𝐾 ∈ (ℤ‘0))
8 fzss1 13608 . . . . . . . 8 (𝐾 ∈ (ℤ‘0) → (𝐾...(𝑁𝑀)) ⊆ (0...(𝑁𝑀)))
97, 8syl 18 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ 𝐾 ∈ (0...(𝑁𝑀))) → (𝐾...(𝑁𝑀)) ⊆ (0...(𝑁𝑀)))
109sseld 3937 . . . . . 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 14705 . . . . . . 7 ((𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))) → (♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)) = (𝑁𝑀))
1614, 15syl 18 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (♯‘(𝑊 substr ⟨𝑀, 𝑁⟩)) = (𝑁𝑀))
1716oveq2d 7435 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩))) = (0...(𝑁𝑀)))
1811, 17eleqtrrd 2868 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → 𝐿 ∈ (0...(♯‘(𝑊 substr ⟨𝑀, 𝑁⟩))))
19 swrdval2 14704 . . . 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 6898 . . . . . 6 ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) ∈ V
22 eqid 2765 . . . . . 6 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))
2321, 22fnmpti 6682 . . . . 5 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) Fn (0..^(𝐿𝐾))
2423a1i 11 . . . 4 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) Fn (0..^(𝐿𝐾)))
25 swrdswrdlem 14763 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))))
26 swrdvalfn 14710 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
2725, 26syl 18 . . . . 5 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩) Fn (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
28 elfzelz 13568 . . . . . . . . . 10 (𝑀 ∈ (0...𝑁) → 𝑀 ∈ ℤ)
29 elfzelz 13568 . . . . . . . . . . 11 (𝐿 ∈ (𝐾...(𝑁𝑀)) → 𝐿 ∈ ℤ)
30 elfzelz 13568 . . . . . . . . . . 11 (𝐾 ∈ (0...(𝑁𝑀)) → 𝐾 ∈ ℤ)
31 zcn 12611 . . . . . . . . . . . . . 14 (𝑀 ∈ ℤ → 𝑀 ∈ ℂ)
3231adantr 486 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝑀 ∈ ℂ)
33 zcn 12611 . . . . . . . . . . . . . 14 (𝐿 ∈ ℤ → 𝐿 ∈ ℂ)
3433ad2antrl 741 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝐿 ∈ ℂ)
35 zcn 12611 . . . . . . . . . . . . . 14 (𝐾 ∈ ℤ → 𝐾 ∈ ℂ)
3635ad2antll 742 . . . . . . . . . . . . 13 ((𝑀 ∈ ℤ ∧ (𝐿 ∈ ℤ ∧ 𝐾 ∈ ℤ)) → 𝐾 ∈ ℂ)
37 pnpcan 11512 . . . . . . . . . . . . . 14 ((𝑀 ∈ ℂ ∧ 𝐿 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑀 + 𝐿) − (𝑀 + 𝐾)) = (𝐿𝐾))
3837eqcomd 2771 . . . . . . . . . . . . 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 7435 . . . . . 6 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0..^(𝐿𝐾)) = (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
4645fneq2d 6633 . . . . 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 6898 . . . . . . 7 (𝑊‘((𝑦 + 𝐾) + 𝑀)) ∈ V
50 oveq1 7426 . . . . . . . . 9 (𝑥 = 𝑦 → (𝑥 + 𝐾) = (𝑦 + 𝐾))
5150fvoveq1d 7441 . . . . . . . 8 (𝑥 = 𝑦 → (𝑊‘((𝑥 + 𝐾) + 𝑀)) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
52 eqid 2765 . . . . . . . 8 (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))
5351, 52fvmptg 6991 . . . . . . 7 ((𝑦 ∈ (0..^(𝐿𝐾)) ∧ (𝑊‘((𝑦 + 𝐾) + 𝑀)) ∈ V) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
5448, 49, 53sylancl 598 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘((𝑦 + 𝐾) + 𝑀)))
55 zcn 12611 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ ℤ → 𝑦 ∈ ℂ)
5655, 31, 353anim123i 1169 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ))
57563expa 1136 . . . . . . . . . . . . . . . 16 (((𝑦 ∈ ℤ ∧ 𝑀 ∈ ℤ) ∧ 𝐾 ∈ ℤ) → (𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ))
58 add32r 11445 . . . . . . . . . . . . . . . . 17 ((𝑦 ∈ ℂ ∧ 𝑀 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝑦 + (𝑀 + 𝐾)) = ((𝑦 + 𝐾) + 𝑀))
5958eqcomd 2771 . . . . . . . . . . . . . . . 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 13704 . . . . . . . 8 (𝑦 ∈ (0..^(𝐿𝐾)) → 𝑦 ∈ ℤ)
6967, 68impel 515 . . . . . . 7 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑦 + 𝐾) + 𝑀) = (𝑦 + (𝑀 + 𝐾)))
7069fveq2d 6889 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑊‘((𝑦 + 𝐾) + 𝑀)) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
7154, 70eqtrd 2800 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀)))‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
7213ad3antrrr 743 . . . . . . . 8 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → (𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))))
73 elfz2nn0 13663 . . . . . . . . . . . . 13 (𝐾 ∈ (0...(𝑁𝑀)) ↔ (𝐾 ∈ ℕ0 ∧ (𝑁𝑀) ∈ ℕ0𝐾 ≤ (𝑁𝑀)))
74 elfz2 13558 . . . . . . . . . . . . . . . 16 (𝐿 ∈ (𝐾...(𝑁𝑀)) ↔ ((𝐾 ∈ ℤ ∧ (𝑁𝑀) ∈ ℤ ∧ 𝐿 ∈ ℤ) ∧ (𝐾𝐿𝐿 ≤ (𝑁𝑀))))
75 elfzo0 13746 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ (0..^(𝐿𝐾)) ↔ (𝑥 ∈ ℕ0 ∧ (𝐿𝐾) ∈ ℕ ∧ 𝑥 < (𝐿𝐾)))
76 nn0re 12528 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑥 ∈ ℕ0𝑥 ∈ ℝ)
7776ad2antrl 741 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝑥 ∈ ℝ)
78 nn0re 12528 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐾 ∈ ℕ0𝐾 ∈ ℝ)
7978adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝐾 ∈ ℝ)
80 zre 12610 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝐿 ∈ ℤ → 𝐿 ∈ ℝ)
8180ad2antll 742 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → 𝐿 ∈ ℝ)
82 ltaddsub 11703 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝑥 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((𝑥 + 𝐾) < 𝐿𝑥 < (𝐿𝐾)))
8382bicomd 226 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑥 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝐿 ∈ ℝ) → (𝑥 < (𝐿𝐾) ↔ (𝑥 + 𝐾) < 𝐿))
8477, 79, 81, 83syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 < (𝐿𝐾) ↔ (𝑥 + 𝐾) < 𝐿))
85 nn0addcl 12554 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 12619 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑥 + 𝐾) ∈ ℕ0 ↔ ((𝑥 + 𝐾) ∈ ℤ ∧ 0 ≤ (𝑥 + 𝐾)))
91 0red 11226 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → 0 ∈ ℝ)
92 zre 12610 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 44 ((𝑥 + 𝐾) ∈ ℤ → (𝑥 + 𝐾) ∈ ℝ)
9392adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → (𝑥 + 𝐾) ∈ ℝ)
9480adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → 𝐿 ∈ ℝ)
95 lelttr 11315 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 43 ((0 ∈ ℝ ∧ (𝑥 + 𝐾) ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → 0 < 𝐿))
9691, 93, 94, 95syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 42 (((𝑥 + 𝐾) ∈ ℤ ∧ 𝐿 ∈ ℤ) → ((0 ≤ (𝑥 + 𝐾) ∧ (𝑥 + 𝐾) < 𝐿) → 0 < 𝐿))
97 0red 11226 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → 0 ∈ ℝ)
9880adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → 𝐿 ∈ ℝ)
99 nn0re 12528 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 48 ((𝑁𝑀) ∈ ℕ0 → (𝑁𝑀) ∈ ℝ)
10099adantl 487 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → (𝑁𝑀) ∈ ℝ)
101 ltletr 11317 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 47 ((0 ∈ ℝ ∧ 𝐿 ∈ ℝ ∧ (𝑁𝑀) ∈ ℝ) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → 0 < (𝑁𝑀)))
10297, 98, 100, 101syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 46 ((𝐿 ∈ ℤ ∧ (𝑁𝑀) ∈ ℕ0) → ((0 < 𝐿𝐿 ≤ (𝑁𝑀)) → 0 < (𝑁𝑀)))
103 elnnnn0b 12563 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 12586 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ((𝑥 ∈ ℕ0𝐾 ∈ ℕ0) → (𝑥 + 𝐾) ∈ ℝ)
122121ex 418 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 (𝑥 ∈ ℕ0 → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℝ))
123122adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑥 ∈ ℕ0𝐿 ∈ ℤ) → (𝐾 ∈ ℕ0 → (𝑥 + 𝐾) ∈ ℝ))
124123impcom 413 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝐾 ∈ ℕ0 ∧ (𝑥 ∈ ℕ0𝐿 ∈ ℤ)) → (𝑥 + 𝐾) ∈ ℝ)
125 ltletr 11317 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 13746 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 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 14706 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘𝑊))) ∧ (𝑥 + 𝐾) ∈ (0..^(𝑁𝑀))) → ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) = (𝑊‘((𝑥 + 𝐾) + 𝑀)))
15572, 153, 154syl2anc 596 . . . . . . 7 (((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) ∧ 𝑥 ∈ (0..^(𝐿𝐾))) → ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)) = (𝑊‘((𝑥 + 𝐾) + 𝑀)))
156155mpteq2dva 5206 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑥 ∈ (0..^(𝐿𝐾)) ↦ (𝑊‘((𝑥 + 𝐾) + 𝑀))))
157156fveq1d 6887 . . . . 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 7435 . . . . . . . 8 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (0..^(𝐿𝐾)) = (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
170169eleq2d 2851 . . . . . . 7 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑦 ∈ (0..^(𝐿𝐾)) ↔ 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))))
171170biimpa 482 . . . . . 6 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾))))
172 swrdfv 14706 . . . . . 6 (((𝑊 ∈ Word 𝑉 ∧ (𝑀 + 𝐾) ∈ (0...(𝑀 + 𝐿)) ∧ (𝑀 + 𝐿) ∈ (0...(♯‘𝑊))) ∧ 𝑦 ∈ (0..^((𝑀 + 𝐿) − (𝑀 + 𝐾)))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
173158, 171, 172syl2anc 596 . . . . 5 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦) = (𝑊‘(𝑦 + (𝑀 + 𝐾))))
17471, 157, 1733eqtr4d 2810 . . . 4 ((((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) ∧ 𝑦 ∈ (0..^(𝐿𝐾))) → ((𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾)))‘𝑦) = ((𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩)‘𝑦))
17524, 47, 174eqfnfvd 7032 . . 3 (((𝑊 ∈ Word 𝑉𝑁 ∈ (0...(♯‘𝑊)) ∧ 𝑀 ∈ (0...𝑁)) ∧ (𝐾 ∈ (0...(𝑁𝑀)) ∧ 𝐿 ∈ (𝐾...(𝑁𝑀)))) → (𝑥 ∈ (0..^(𝐿𝐾)) ↦ ((𝑊 substr ⟨𝑀, 𝑁⟩)‘(𝑥 + 𝐾))) = (𝑊 substr ⟨(𝑀 + 𝐾), (𝑀 + 𝐿)⟩))
17620, 175eqtrd 2800 . 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 2146  Vcvv 3457  wss 3906  cop 4597   class class class wbr 5111  cmpt 5194   Fn wfn 6535  cfv 6540  (class class class)co 7419  cc 11113  cr 11114  0cc0 11115   + caddc 11118   < clt 11258  cle 11259  cmin 11456  cn 12248  0cn0 12519  cz 12606  cuz 12878  ...cfz 13551  ..^cfzo 13699  chash 14384  Word cword 14568   substr csubstr 14698
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 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7742  ax-cnex 11171  ax-resscn 11172  ax-1cn 11173  ax-icn 11174  ax-addcl 11175  ax-addrcl 11176  ax-mulcl 11177  ax-mulrcl 11178  ax-mulcom 11179  ax-addass 11180  ax-mulass 11181  ax-distr 11182  ax-i2m1 11183  ax-1ne0 11184  ax-1rid 11185  ax-rnegex 11186  ax-rrecex 11187  ax-cnre 11188  ax-pre-lttri 11189  ax-pre-lttrn 11190  ax-pre-ltadd 11191  ax-pre-mulgt0 11192
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 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4875  df-int 4915  df-iun 4960  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7376  df-ov 7422  df-oprab 7423  df-mpo 7424  df-om 7869  df-1st 7992  df-2nd 7993  df-frecs 8284  df-wrecs 8315  df-recs 8364  df-rdg 8403  df-1o 8459  df-er 8700  df-en 8950  df-dom 8951  df-sdom 8952  df-fin 8953  df-card 9941  df-pnf 11260  df-mnf 11261  df-xr 11262  df-ltxr 11263  df-le 11264  df-sub 11458  df-neg 11459  df-nn 12249  df-n0 12520  df-z 12607  df-uz 12879  df-fz 13552  df-fzo 13700  df-hash 14385  df-word 14569  df-substr 14699
This theorem is used by:  pfxswrd  14765  swrdpfx  14766
  Copyright terms: Public domain W3C validator