![]() |
Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
|
Mirrors > Home > MPE Home > Th. List > swrdccatin2d | Structured version Visualization version GIF version |
Description: The subword of a concatenation of two words within the second of the concatenated words. (Contributed by AV, 31-May-2018.) (Revised by Mario Carneiro/AV, 21-Oct-2018.) |
Ref | Expression |
---|---|
swrdccatind.l | ⊢ (𝜑 → (♯‘𝐴) = 𝐿) |
swrdccatind.w | ⊢ (𝜑 → (𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉)) |
swrdccatin2d.1 | ⊢ (𝜑 → 𝑀 ∈ (𝐿...𝑁)) |
swrdccatin2d.2 | ⊢ (𝜑 → 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) |
Ref | Expression |
---|---|
swrdccatin2d | ⊢ (𝜑 → ((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩) = (𝐵 substr ⟨(𝑀 − 𝐿), (𝑁 − 𝐿)⟩)) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | swrdccatind.l | . 2 ⊢ (𝜑 → (♯‘𝐴) = 𝐿) | |
2 | swrdccatind.w | . . . . . . 7 ⊢ (𝜑 → (𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉)) | |
3 | 2 | adantl 483 | . . . . . 6 ⊢ (((♯‘𝐴) = 𝐿 ∧ 𝜑) → (𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉)) |
4 | swrdccatin2d.1 | . . . . . . . . 9 ⊢ (𝜑 → 𝑀 ∈ (𝐿...𝑁)) | |
5 | swrdccatin2d.2 | . . . . . . . . 9 ⊢ (𝜑 → 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) | |
6 | 4, 5 | jca 513 | . . . . . . . 8 ⊢ (𝜑 → (𝑀 ∈ (𝐿...𝑁) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) |
7 | 6 | adantl 483 | . . . . . . 7 ⊢ (((♯‘𝐴) = 𝐿 ∧ 𝜑) → (𝑀 ∈ (𝐿...𝑁) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) |
8 | oveq1 7369 | . . . . . . . . . 10 ⊢ ((♯‘𝐴) = 𝐿 → ((♯‘𝐴)...𝑁) = (𝐿...𝑁)) | |
9 | 8 | eleq2d 2824 | . . . . . . . . 9 ⊢ ((♯‘𝐴) = 𝐿 → (𝑀 ∈ ((♯‘𝐴)...𝑁) ↔ 𝑀 ∈ (𝐿...𝑁))) |
10 | id 22 | . . . . . . . . . . 11 ⊢ ((♯‘𝐴) = 𝐿 → (♯‘𝐴) = 𝐿) | |
11 | oveq1 7369 | . . . . . . . . . . 11 ⊢ ((♯‘𝐴) = 𝐿 → ((♯‘𝐴) + (♯‘𝐵)) = (𝐿 + (♯‘𝐵))) | |
12 | 10, 11 | oveq12d 7380 | . . . . . . . . . 10 ⊢ ((♯‘𝐴) = 𝐿 → ((♯‘𝐴)...((♯‘𝐴) + (♯‘𝐵))) = (𝐿...(𝐿 + (♯‘𝐵)))) |
13 | 12 | eleq2d 2824 | . . . . . . . . 9 ⊢ ((♯‘𝐴) = 𝐿 → (𝑁 ∈ ((♯‘𝐴)...((♯‘𝐴) + (♯‘𝐵))) ↔ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) |
14 | 9, 13 | anbi12d 632 | . . . . . . . 8 ⊢ ((♯‘𝐴) = 𝐿 → ((𝑀 ∈ ((♯‘𝐴)...𝑁) ∧ 𝑁 ∈ ((♯‘𝐴)...((♯‘𝐴) + (♯‘𝐵)))) ↔ (𝑀 ∈ (𝐿...𝑁) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))))) |
15 | 14 | adantr 482 | . . . . . . 7 ⊢ (((♯‘𝐴) = 𝐿 ∧ 𝜑) → ((𝑀 ∈ ((♯‘𝐴)...𝑁) ∧ 𝑁 ∈ ((♯‘𝐴)...((♯‘𝐴) + (♯‘𝐵)))) ↔ (𝑀 ∈ (𝐿...𝑁) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))))) |
16 | 7, 15 | mpbird 257 | . . . . . 6 ⊢ (((♯‘𝐴) = 𝐿 ∧ 𝜑) → (𝑀 ∈ ((♯‘𝐴)...𝑁) ∧ 𝑁 ∈ ((♯‘𝐴)...((♯‘𝐴) + (♯‘𝐵))))) |
17 | 3, 16 | jca 513 | . . . . 5 ⊢ (((♯‘𝐴) = 𝐿 ∧ 𝜑) → ((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ ((♯‘𝐴)...𝑁) ∧ 𝑁 ∈ ((♯‘𝐴)...((♯‘𝐴) + (♯‘𝐵)))))) |
18 | 17 | ex 414 | . . . 4 ⊢ ((♯‘𝐴) = 𝐿 → (𝜑 → ((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ ((♯‘𝐴)...𝑁) ∧ 𝑁 ∈ ((♯‘𝐴)...((♯‘𝐴) + (♯‘𝐵))))))) |
19 | eqid 2737 | . . . . . 6 ⊢ (♯‘𝐴) = (♯‘𝐴) | |
20 | 19 | swrdccatin2 14624 | . . . . 5 ⊢ ((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) → ((𝑀 ∈ ((♯‘𝐴)...𝑁) ∧ 𝑁 ∈ ((♯‘𝐴)...((♯‘𝐴) + (♯‘𝐵)))) → ((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩) = (𝐵 substr ⟨(𝑀 − (♯‘𝐴)), (𝑁 − (♯‘𝐴))⟩))) |
21 | 20 | imp 408 | . . . 4 ⊢ (((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ ((♯‘𝐴)...𝑁) ∧ 𝑁 ∈ ((♯‘𝐴)...((♯‘𝐴) + (♯‘𝐵))))) → ((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩) = (𝐵 substr ⟨(𝑀 − (♯‘𝐴)), (𝑁 − (♯‘𝐴))⟩)) |
22 | 18, 21 | syl6 35 | . . 3 ⊢ ((♯‘𝐴) = 𝐿 → (𝜑 → ((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩) = (𝐵 substr ⟨(𝑀 − (♯‘𝐴)), (𝑁 − (♯‘𝐴))⟩))) |
23 | oveq2 7370 | . . . . . 6 ⊢ ((♯‘𝐴) = 𝐿 → (𝑀 − (♯‘𝐴)) = (𝑀 − 𝐿)) | |
24 | oveq2 7370 | . . . . . 6 ⊢ ((♯‘𝐴) = 𝐿 → (𝑁 − (♯‘𝐴)) = (𝑁 − 𝐿)) | |
25 | 23, 24 | opeq12d 4843 | . . . . 5 ⊢ ((♯‘𝐴) = 𝐿 → ⟨(𝑀 − (♯‘𝐴)), (𝑁 − (♯‘𝐴))⟩ = ⟨(𝑀 − 𝐿), (𝑁 − 𝐿)⟩) |
26 | 25 | oveq2d 7378 | . . . 4 ⊢ ((♯‘𝐴) = 𝐿 → (𝐵 substr ⟨(𝑀 − (♯‘𝐴)), (𝑁 − (♯‘𝐴))⟩) = (𝐵 substr ⟨(𝑀 − 𝐿), (𝑁 − 𝐿)⟩)) |
27 | 26 | eqeq2d 2748 | . . 3 ⊢ ((♯‘𝐴) = 𝐿 → (((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩) = (𝐵 substr ⟨(𝑀 − (♯‘𝐴)), (𝑁 − (♯‘𝐴))⟩) ↔ ((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩) = (𝐵 substr ⟨(𝑀 − 𝐿), (𝑁 − 𝐿)⟩))) |
28 | 22, 27 | sylibd 238 | . 2 ⊢ ((♯‘𝐴) = 𝐿 → (𝜑 → ((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩) = (𝐵 substr ⟨(𝑀 − 𝐿), (𝑁 − 𝐿)⟩))) |
29 | 1, 28 | mpcom 38 | 1 ⊢ (𝜑 → ((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩) = (𝐵 substr ⟨(𝑀 − 𝐿), (𝑁 − 𝐿)⟩)) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ↔ wb 205 ∧ wa 397 = wceq 1542 ∈ wcel 2107 ⟨cop 4597 ‘cfv 6501 (class class class)co 7362 + caddc 11061 − cmin 11392 ...cfz 13431 ♯chash 14237 Word cword 14409 ++ cconcat 14465 substr csubstr 14535 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2708 ax-rep 5247 ax-sep 5261 ax-nul 5268 ax-pow 5325 ax-pr 5389 ax-un 7677 ax-cnex 11114 ax-resscn 11115 ax-1cn 11116 ax-icn 11117 ax-addcl 11118 ax-addrcl 11119 ax-mulcl 11120 ax-mulrcl 11121 ax-mulcom 11122 ax-addass 11123 ax-mulass 11124 ax-distr 11125 ax-i2m1 11126 ax-1ne0 11127 ax-1rid 11128 ax-rnegex 11129 ax-rrecex 11130 ax-cnre 11131 ax-pre-lttri 11132 ax-pre-lttrn 11133 ax-pre-ltadd 11134 ax-pre-mulgt0 11135 |
This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2539 df-eu 2568 df-clab 2715 df-cleq 2729 df-clel 2815 df-nfc 2890 df-ne 2945 df-nel 3051 df-ral 3066 df-rex 3075 df-reu 3357 df-rab 3411 df-v 3450 df-sbc 3745 df-csb 3861 df-dif 3918 df-un 3920 df-in 3922 df-ss 3932 df-pss 3934 df-nul 4288 df-if 4492 df-pw 4567 df-sn 4592 df-pr 4594 df-op 4598 df-uni 4871 df-int 4913 df-iun 4961 df-br 5111 df-opab 5173 df-mpt 5194 df-tr 5228 df-id 5536 df-eprel 5542 df-po 5550 df-so 5551 df-fr 5593 df-we 5595 df-xp 5644 df-rel 5645 df-cnv 5646 df-co 5647 df-dm 5648 df-rn 5649 df-res 5650 df-ima 5651 df-pred 6258 df-ord 6325 df-on 6326 df-lim 6327 df-suc 6328 df-iota 6453 df-fun 6503 df-fn 6504 df-f 6505 df-f1 6506 df-fo 6507 df-f1o 6508 df-fv 6509 df-riota 7318 df-ov 7365 df-oprab 7366 df-mpo 7367 df-om 7808 df-1st 7926 df-2nd 7927 df-frecs 8217 df-wrecs 8248 df-recs 8322 df-rdg 8361 df-1o 8417 df-er 8655 df-en 8891 df-dom 8892 df-sdom 8893 df-fin 8894 df-card 9882 df-pnf 11198 df-mnf 11199 df-xr 11200 df-ltxr 11201 df-le 11202 df-sub 11394 df-neg 11395 df-nn 12161 df-n0 12421 df-z 12507 df-uz 12771 df-fz 13432 df-fzo 13575 df-hash 14238 df-word 14410 df-concat 14466 df-substr 14536 |
This theorem is referenced by: (None) |
Copyright terms: Public domain | W3C validator |