Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > ccatw2s1p1OLD | Structured version Visualization version GIF version |
Description: Obsolete version of ccatw2s1p1 14344 as of 29-Jan-2024. Extract the symbol of the first singleton word of a word concatenated with this singleton word and another singleton word. (Contributed by Alexander van der Vekens, 22-Sep-2018.) (Proof shortened by AV, 1-May-2020.) (Proof modification is discouraged.) (New usage is discouraged.) |
Ref | Expression |
---|---|
ccatw2s1p1OLD | ⊢ (((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) ∧ (𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → (((𝑊 ++ 〈“𝑋”〉) ++ 〈“𝑌”〉)‘𝑁) = 𝑋) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | ccatws1cl 14319 | . . . 4 ⊢ ((𝑊 ∈ Word 𝑉 ∧ 𝑋 ∈ 𝑉) → (𝑊 ++ 〈“𝑋”〉) ∈ Word 𝑉) | |
2 | 1 | ad2ant2r 744 | . . 3 ⊢ (((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) ∧ (𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → (𝑊 ++ 〈“𝑋”〉) ∈ Word 𝑉) |
3 | lencl 14234 | . . . . . . 7 ⊢ (𝑊 ∈ Word 𝑉 → (♯‘𝑊) ∈ ℕ0) | |
4 | fzonn0p1 13462 | . . . . . . 7 ⊢ ((♯‘𝑊) ∈ ℕ0 → (♯‘𝑊) ∈ (0..^((♯‘𝑊) + 1))) | |
5 | 3, 4 | syl 17 | . . . . . 6 ⊢ (𝑊 ∈ Word 𝑉 → (♯‘𝑊) ∈ (0..^((♯‘𝑊) + 1))) |
6 | 5 | adantr 481 | . . . . 5 ⊢ ((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) → (♯‘𝑊) ∈ (0..^((♯‘𝑊) + 1))) |
7 | simpr 485 | . . . . . 6 ⊢ ((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) → (♯‘𝑊) = 𝑁) | |
8 | 7 | eqcomd 2746 | . . . . 5 ⊢ ((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) → 𝑁 = (♯‘𝑊)) |
9 | ccatws1len 14323 | . . . . . . 7 ⊢ (𝑊 ∈ Word 𝑉 → (♯‘(𝑊 ++ 〈“𝑋”〉)) = ((♯‘𝑊) + 1)) | |
10 | 9 | adantr 481 | . . . . . 6 ⊢ ((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) → (♯‘(𝑊 ++ 〈“𝑋”〉)) = ((♯‘𝑊) + 1)) |
11 | 10 | oveq2d 7287 | . . . . 5 ⊢ ((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) → (0..^(♯‘(𝑊 ++ 〈“𝑋”〉))) = (0..^((♯‘𝑊) + 1))) |
12 | 6, 8, 11 | 3eltr4d 2856 | . . . 4 ⊢ ((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) → 𝑁 ∈ (0..^(♯‘(𝑊 ++ 〈“𝑋”〉)))) |
13 | 12 | adantr 481 | . . 3 ⊢ (((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) ∧ (𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → 𝑁 ∈ (0..^(♯‘(𝑊 ++ 〈“𝑋”〉)))) |
14 | ccats1val1 14330 | . . 3 ⊢ (((𝑊 ++ 〈“𝑋”〉) ∈ Word 𝑉 ∧ 𝑁 ∈ (0..^(♯‘(𝑊 ++ 〈“𝑋”〉)))) → (((𝑊 ++ 〈“𝑋”〉) ++ 〈“𝑌”〉)‘𝑁) = ((𝑊 ++ 〈“𝑋”〉)‘𝑁)) | |
15 | 2, 13, 14 | syl2anc 584 | . 2 ⊢ (((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) ∧ (𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → (((𝑊 ++ 〈“𝑋”〉) ++ 〈“𝑌”〉)‘𝑁) = ((𝑊 ++ 〈“𝑋”〉)‘𝑁)) |
16 | simpll 764 | . . 3 ⊢ (((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) ∧ (𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → 𝑊 ∈ Word 𝑉) | |
17 | simprl 768 | . . 3 ⊢ (((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) ∧ (𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → 𝑋 ∈ 𝑉) | |
18 | eqcom 2747 | . . . . 5 ⊢ ((♯‘𝑊) = 𝑁 ↔ 𝑁 = (♯‘𝑊)) | |
19 | 18 | biimpi 215 | . . . 4 ⊢ ((♯‘𝑊) = 𝑁 → 𝑁 = (♯‘𝑊)) |
20 | 19 | ad2antlr 724 | . . 3 ⊢ (((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) ∧ (𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → 𝑁 = (♯‘𝑊)) |
21 | ccats1val2 14332 | . . 3 ⊢ ((𝑊 ∈ Word 𝑉 ∧ 𝑋 ∈ 𝑉 ∧ 𝑁 = (♯‘𝑊)) → ((𝑊 ++ 〈“𝑋”〉)‘𝑁) = 𝑋) | |
22 | 16, 17, 20, 21 | syl3anc 1370 | . 2 ⊢ (((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) ∧ (𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → ((𝑊 ++ 〈“𝑋”〉)‘𝑁) = 𝑋) |
23 | 15, 22 | eqtrd 2780 | 1 ⊢ (((𝑊 ∈ Word 𝑉 ∧ (♯‘𝑊) = 𝑁) ∧ (𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉)) → (((𝑊 ++ 〈“𝑋”〉) ++ 〈“𝑌”〉)‘𝑁) = 𝑋) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ∧ wa 396 = wceq 1542 ∈ wcel 2110 ‘cfv 6432 (class class class)co 7271 0cc0 10872 1c1 10873 + caddc 10875 ℕ0cn0 12233 ..^cfzo 13381 ♯chash 14042 Word cword 14215 ++ cconcat 14271 〈“cs1 14298 |
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 1975 ax-7 2015 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2158 ax-12 2175 ax-ext 2711 ax-rep 5214 ax-sep 5227 ax-nul 5234 ax-pow 5292 ax-pr 5356 ax-un 7582 ax-cnex 10928 ax-resscn 10929 ax-1cn 10930 ax-icn 10931 ax-addcl 10932 ax-addrcl 10933 ax-mulcl 10934 ax-mulrcl 10935 ax-mulcom 10936 ax-addass 10937 ax-mulass 10938 ax-distr 10939 ax-i2m1 10940 ax-1ne0 10941 ax-1rid 10942 ax-rnegex 10943 ax-rrecex 10944 ax-cnre 10945 ax-pre-lttri 10946 ax-pre-lttrn 10947 ax-pre-ltadd 10948 ax-pre-mulgt0 10949 |
This theorem depends on definitions: df-bi 206 df-an 397 df-or 845 df-3or 1087 df-3an 1088 df-tru 1545 df-fal 1555 df-ex 1787 df-nf 1791 df-sb 2072 df-mo 2542 df-eu 2571 df-clab 2718 df-cleq 2732 df-clel 2818 df-nfc 2891 df-ne 2946 df-nel 3052 df-ral 3071 df-rex 3072 df-reu 3073 df-rab 3075 df-v 3433 df-sbc 3721 df-csb 3838 df-dif 3895 df-un 3897 df-in 3899 df-ss 3909 df-pss 3911 df-nul 4263 df-if 4466 df-pw 4541 df-sn 4568 df-pr 4570 df-op 4574 df-uni 4846 df-int 4886 df-iun 4932 df-br 5080 df-opab 5142 df-mpt 5163 df-tr 5197 df-id 5490 df-eprel 5496 df-po 5504 df-so 5505 df-fr 5545 df-we 5547 df-xp 5596 df-rel 5597 df-cnv 5598 df-co 5599 df-dm 5600 df-rn 5601 df-res 5602 df-ima 5603 df-pred 6201 df-ord 6268 df-on 6269 df-lim 6270 df-suc 6271 df-iota 6390 df-fun 6434 df-fn 6435 df-f 6436 df-f1 6437 df-fo 6438 df-f1o 6439 df-fv 6440 df-riota 7228 df-ov 7274 df-oprab 7275 df-mpo 7276 df-om 7707 df-1st 7824 df-2nd 7825 df-frecs 8088 df-wrecs 8119 df-recs 8193 df-rdg 8232 df-1o 8288 df-er 8481 df-en 8717 df-dom 8718 df-sdom 8719 df-fin 8720 df-card 9698 df-pnf 11012 df-mnf 11013 df-xr 11014 df-ltxr 11015 df-le 11016 df-sub 11207 df-neg 11208 df-nn 11974 df-n0 12234 df-z 12320 df-uz 12582 df-fz 13239 df-fzo 13382 df-hash 14043 df-word 14216 df-concat 14272 df-s1 14299 |
This theorem is referenced by: (None) |
Copyright terms: Public domain | W3C validator |