Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  pfxlsw2ccat Structured version   Visualization version   GIF version

Theorem pfxlsw2ccat 33036
Description: Reconstruct a word from its prefix and its last two symbols. (Contributed by Thierry Arnoux, 26-Sep-2023.)
Hypothesis
Ref Expression
pfxlsw2ccat.n 𝑁 = (♯‘𝑊)
Assertion
Ref Expression
pfxlsw2ccat ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 𝑊 = ((𝑊 prefix (𝑁 − 2)) ++ ⟨“(𝑊‘(𝑁 − 2))(𝑊‘(𝑁 − 1))”⟩))

Proof of Theorem pfxlsw2ccat
StepHypRef Expression
1 simpl 483 . . . 4 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 𝑊 ∈ Word 𝑉)
2 simpr 485 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 2 ≤ 𝑁)
3 pfxlsw2ccat.n . . . . . 6 𝑁 = (♯‘𝑊)
42, 3breqtrdi 5120 . . . . 5 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 2 ≤ (♯‘𝑊))
5 wrdlenge2n0 14512 . . . . 5 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ (♯‘𝑊)) → 𝑊 ≠ ∅)
61, 4, 5syl2anc 590 . . . 4 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 𝑊 ≠ ∅)
7 pfxlswccat 14673 . . . 4 ((𝑊 ∈ Word 𝑉𝑊 ≠ ∅) → ((𝑊 prefix ((♯‘𝑊) − 1)) ++ ⟨“(lastS‘𝑊)”⟩) = 𝑊)
81, 6, 7syl2anc 590 . . 3 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((𝑊 prefix ((♯‘𝑊) − 1)) ++ ⟨“(lastS‘𝑊)”⟩) = 𝑊)
9 lsw 14524 . . . . . . 7 (𝑊 ∈ Word 𝑉 → (lastS‘𝑊) = (𝑊‘((♯‘𝑊) − 1)))
103oveq1i 7373 . . . . . . . 8 (𝑁 − 1) = ((♯‘𝑊) − 1)
1110fveq2i 6837 . . . . . . 7 (𝑊‘(𝑁 − 1)) = (𝑊‘((♯‘𝑊) − 1))
129, 11eqtr4di 2793 . . . . . 6 (𝑊 ∈ Word 𝑉 → (lastS‘𝑊) = (𝑊‘(𝑁 − 1)))
131, 12syl 17 . . . . 5 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (lastS‘𝑊) = (𝑊‘(𝑁 − 1)))
1413s1eqd 14562 . . . 4 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ⟨“(lastS‘𝑊)”⟩ = ⟨“(𝑊‘(𝑁 − 1))”⟩)
1514oveq2d 7379 . . 3 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((𝑊 prefix ((♯‘𝑊) − 1)) ++ ⟨“(lastS‘𝑊)”⟩) = ((𝑊 prefix ((♯‘𝑊) − 1)) ++ ⟨“(𝑊‘(𝑁 − 1))”⟩))
168, 15eqtr3d 2777 . 2 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 𝑊 = ((𝑊 prefix ((♯‘𝑊) − 1)) ++ ⟨“(𝑊‘(𝑁 − 1))”⟩))
17 pfxcl 14638 . . . . . 6 (𝑊 ∈ Word 𝑉 → (𝑊 prefix ((♯‘𝑊) − 1)) ∈ Word 𝑉)
181, 17syl 17 . . . . 5 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (𝑊 prefix ((♯‘𝑊) − 1)) ∈ Word 𝑉)
19 lencl 14493 . . . . . . . . . 10 (𝑊 ∈ Word 𝑉 → (♯‘𝑊) ∈ ℕ0)
201, 19syl 17 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (♯‘𝑊) ∈ ℕ0)
213, 20eqeltrid 2844 . . . . . . . 8 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 𝑁 ∈ ℕ0)
22 nn0ge2m1nn 12505 . . . . . . . 8 ((𝑁 ∈ ℕ0 ∧ 2 ≤ 𝑁) → (𝑁 − 1) ∈ ℕ)
2321, 2, 22syl2anc 590 . . . . . . 7 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (𝑁 − 1) ∈ ℕ)
2410, 23eqeltrrid 2845 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘𝑊) − 1) ∈ ℕ)
2520nn0red 12497 . . . . . . 7 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (♯‘𝑊) ∈ ℝ)
2625lem1d 12087 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘𝑊) − 1) ≤ (♯‘𝑊))
27 pfxn0 14647 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ ((♯‘𝑊) − 1) ∈ ℕ ∧ ((♯‘𝑊) − 1) ≤ (♯‘𝑊)) → (𝑊 prefix ((♯‘𝑊) − 1)) ≠ ∅)
281, 24, 26, 27syl3anc 1379 . . . . 5 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (𝑊 prefix ((♯‘𝑊) − 1)) ≠ ∅)
29 pfxlswccat 14673 . . . . 5 (((𝑊 prefix ((♯‘𝑊) − 1)) ∈ Word 𝑉 ∧ (𝑊 prefix ((♯‘𝑊) − 1)) ≠ ∅) → (((𝑊 prefix ((♯‘𝑊) − 1)) prefix ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1)) ++ ⟨“(lastS‘(𝑊 prefix ((♯‘𝑊) − 1)))”⟩) = (𝑊 prefix ((♯‘𝑊) − 1)))
3018, 28, 29syl2anc 590 . . . 4 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (((𝑊 prefix ((♯‘𝑊) − 1)) prefix ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1)) ++ ⟨“(lastS‘(𝑊 prefix ((♯‘𝑊) − 1)))”⟩) = (𝑊 prefix ((♯‘𝑊) − 1)))
31 ige2m1fz 13569 . . . . . . . 8 (((♯‘𝑊) ∈ ℕ0 ∧ 2 ≤ (♯‘𝑊)) → ((♯‘𝑊) − 1) ∈ (0...(♯‘𝑊)))
3220, 4, 31syl2anc 590 . . . . . . 7 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘𝑊) − 1) ∈ (0...(♯‘𝑊)))
33 pfxlen 14644 . . . . . . . . . 10 ((𝑊 ∈ Word 𝑉 ∧ ((♯‘𝑊) − 1) ∈ (0...(♯‘𝑊))) → (♯‘(𝑊 prefix ((♯‘𝑊) − 1))) = ((♯‘𝑊) − 1))
341, 32, 33syl2anc 590 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (♯‘(𝑊 prefix ((♯‘𝑊) − 1))) = ((♯‘𝑊) − 1))
3534oveq1d 7378 . . . . . . . 8 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1) = (((♯‘𝑊) − 1) − 1))
36 0zd 12534 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 0 ∈ ℤ)
37 nn0ge2m1nn0 12506 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0 ∧ 2 ≤ 𝑁) → (𝑁 − 1) ∈ ℕ0)
3821, 2, 37syl2anc 590 . . . . . . . . . . 11 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (𝑁 − 1) ∈ ℕ0)
3910, 38eqeltrrid 2845 . . . . . . . . . 10 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘𝑊) − 1) ∈ ℕ0)
4039nn0zd 12547 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘𝑊) − 1) ∈ ℤ)
41 1zzd 12556 . . . . . . . . . 10 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 1 ∈ ℤ)
4240, 41zsubcld 12636 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (((♯‘𝑊) − 1) − 1) ∈ ℤ)
43 2nn0 12452 . . . . . . . . . . . . . 14 2 ∈ ℕ0
4443a1i 11 . . . . . . . . . . . . 13 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 2 ∈ ℕ0)
45 nn0sub 12485 . . . . . . . . . . . . . 14 ((2 ∈ ℕ0𝑁 ∈ ℕ0) → (2 ≤ 𝑁 ↔ (𝑁 − 2) ∈ ℕ0))
4645biimpa 477 . . . . . . . . . . . . 13 (((2 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 2 ≤ 𝑁) → (𝑁 − 2) ∈ ℕ0)
4744, 21, 2, 46syl21anc 843 . . . . . . . . . . . 12 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (𝑁 − 2) ∈ ℕ0)
4847nn0ge0d 12499 . . . . . . . . . . 11 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 0 ≤ (𝑁 − 2))
4921nn0cnd 12498 . . . . . . . . . . . 12 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 𝑁 ∈ ℂ)
50 sub1m1 12427 . . . . . . . . . . . 12 (𝑁 ∈ ℂ → ((𝑁 − 1) − 1) = (𝑁 − 2))
5149, 50syl 17 . . . . . . . . . . 11 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((𝑁 − 1) − 1) = (𝑁 − 2))
5248, 51breqtrrd 5107 . . . . . . . . . 10 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 0 ≤ ((𝑁 − 1) − 1))
5310oveq1i 7373 . . . . . . . . . 10 ((𝑁 − 1) − 1) = (((♯‘𝑊) − 1) − 1)
5452, 53breqtrdi 5120 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 0 ≤ (((♯‘𝑊) − 1) − 1))
5524nnred 12187 . . . . . . . . . 10 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘𝑊) − 1) ∈ ℝ)
5655lem1d 12087 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (((♯‘𝑊) − 1) − 1) ≤ ((♯‘𝑊) − 1))
5736, 40, 42, 54, 56elfzd 13467 . . . . . . . 8 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (((♯‘𝑊) − 1) − 1) ∈ (0...((♯‘𝑊) − 1)))
5835, 57eqeltrd 2840 . . . . . . 7 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1) ∈ (0...((♯‘𝑊) − 1)))
59 pfxpfx 14668 . . . . . . 7 ((𝑊 ∈ Word 𝑉 ∧ ((♯‘𝑊) − 1) ∈ (0...(♯‘𝑊)) ∧ ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1) ∈ (0...((♯‘𝑊) − 1))) → ((𝑊 prefix ((♯‘𝑊) − 1)) prefix ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1)) = (𝑊 prefix ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1)))
601, 32, 58, 59syl3anc 1379 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((𝑊 prefix ((♯‘𝑊) − 1)) prefix ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1)) = (𝑊 prefix ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1)))
6134, 10eqtr4di 2793 . . . . . . . . 9 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (♯‘(𝑊 prefix ((♯‘𝑊) − 1))) = (𝑁 − 1))
6261oveq1d 7378 . . . . . . . 8 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1) = ((𝑁 − 1) − 1))
6362, 51eqtrd 2775 . . . . . . 7 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1) = (𝑁 − 2))
6463oveq2d 7379 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (𝑊 prefix ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1)) = (𝑊 prefix (𝑁 − 2)))
6560, 64eqtrd 2775 . . . . 5 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((𝑊 prefix ((♯‘𝑊) − 1)) prefix ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1)) = (𝑊 prefix (𝑁 − 2)))
66 pfxtrcfvl 14657 . . . . . . . 8 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ (♯‘𝑊)) → (lastS‘(𝑊 prefix ((♯‘𝑊) − 1))) = (𝑊‘((♯‘𝑊) − 2)))
671, 4, 66syl2anc 590 . . . . . . 7 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (lastS‘(𝑊 prefix ((♯‘𝑊) − 1))) = (𝑊‘((♯‘𝑊) − 2)))
683a1i 11 . . . . . . . 8 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 𝑁 = (♯‘𝑊))
6968fvoveq1d 7385 . . . . . . 7 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (𝑊‘(𝑁 − 2)) = (𝑊‘((♯‘𝑊) − 2)))
7067, 69eqtr4d 2778 . . . . . 6 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (lastS‘(𝑊 prefix ((♯‘𝑊) − 1))) = (𝑊‘(𝑁 − 2)))
7170s1eqd 14562 . . . . 5 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ⟨“(lastS‘(𝑊 prefix ((♯‘𝑊) − 1)))”⟩ = ⟨“(𝑊‘(𝑁 − 2))”⟩)
7265, 71oveq12d 7381 . . . 4 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (((𝑊 prefix ((♯‘𝑊) − 1)) prefix ((♯‘(𝑊 prefix ((♯‘𝑊) − 1))) − 1)) ++ ⟨“(lastS‘(𝑊 prefix ((♯‘𝑊) − 1)))”⟩) = ((𝑊 prefix (𝑁 − 2)) ++ ⟨“(𝑊‘(𝑁 − 2))”⟩))
7330, 72eqtr3d 2777 . . 3 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (𝑊 prefix ((♯‘𝑊) − 1)) = ((𝑊 prefix (𝑁 − 2)) ++ ⟨“(𝑊‘(𝑁 − 2))”⟩))
7473oveq1d 7378 . 2 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → ((𝑊 prefix ((♯‘𝑊) − 1)) ++ ⟨“(𝑊‘(𝑁 − 1))”⟩) = (((𝑊 prefix (𝑁 − 2)) ++ ⟨“(𝑊‘(𝑁 − 2))”⟩) ++ ⟨“(𝑊‘(𝑁 − 1))”⟩))
75 pfxcl 14638 . . . 4 (𝑊 ∈ Word 𝑉 → (𝑊 prefix (𝑁 − 2)) ∈ Word 𝑉)
761, 75syl 17 . . 3 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (𝑊 prefix (𝑁 − 2)) ∈ Word 𝑉)
77 ccatw2s1ccatws2 14914 . . 3 ((𝑊 prefix (𝑁 − 2)) ∈ Word 𝑉 → (((𝑊 prefix (𝑁 − 2)) ++ ⟨“(𝑊‘(𝑁 − 2))”⟩) ++ ⟨“(𝑊‘(𝑁 − 1))”⟩) = ((𝑊 prefix (𝑁 − 2)) ++ ⟨“(𝑊‘(𝑁 − 2))(𝑊‘(𝑁 − 1))”⟩))
7876, 77syl 17 . 2 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → (((𝑊 prefix (𝑁 − 2)) ++ ⟨“(𝑊‘(𝑁 − 2))”⟩) ++ ⟨“(𝑊‘(𝑁 − 1))”⟩) = ((𝑊 prefix (𝑁 − 2)) ++ ⟨“(𝑊‘(𝑁 − 2))(𝑊‘(𝑁 − 1))”⟩))
7916, 74, 783eqtrd 2779 1 ((𝑊 ∈ Word 𝑉 ∧ 2 ≤ 𝑁) → 𝑊 = ((𝑊 prefix (𝑁 − 2)) ++ ⟨“(𝑊‘(𝑁 − 2))(𝑊‘(𝑁 − 1))”⟩))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396   = wceq 1547  wcel 2119  wne 2935  c0 4268   class class class wbr 5079  cfv 6492  (class class class)co 7363  cc 11034  0cc0 11036  1c1 11037  cle 11178  cmin 11375  cn 12172  2c2 12234  0cn0 12435  ...cfz 13459  chash 14290  Word cword 14473  lastSclsw 14522   ++ cconcat 14530  ⟨“cs1 14556   prefix cpfx 14631  ⟨“cs2 14801
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-cnex 11092  ax-resscn 11093  ax-1cn 11094  ax-icn 11095  ax-addcl 11096  ax-addrcl 11097  ax-mulcl 11098  ax-mulrcl 11099  ax-mulcom 11100  ax-addass 11101  ax-mulass 11102  ax-distr 11103  ax-i2m1 11104  ax-1ne0 11105  ax-1rid 11106  ax-rnegex 11107  ax-rrecex 11108  ax-cnre 11109  ax-pre-lttri 11110  ax-pre-lttrn 11111  ax-pre-ltadd 11112  ax-pre-mulgt0 11113
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-nel 3040  df-ral 3055  df-rex 3065  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-int 4885  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-1st 7938  df-2nd 7939  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-1o 8402  df-er 8640  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-card 9861  df-pnf 11179  df-mnf 11180  df-xr 11181  df-ltxr 11182  df-le 11183  df-sub 11377  df-neg 11378  df-nn 12173  df-2 12242  df-n0 12436  df-xnn0 12509  df-z 12523  df-uz 12787  df-fz 13460  df-fzo 13607  df-hash 14291  df-word 14474  df-lsw 14523  df-concat 14531  df-s1 14557  df-substr 14602  df-pfx 14632  df-s2 14808
This theorem is referenced by:  wrdt2ind  33039
  Copyright terms: Public domain W3C validator