spllen - Metamath Proof Explorer

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

Theorem spllen 14744

Description: The length of a splice. (Contributed by Stefan O'Rear, 23-Aug-2015.) (Proof shortened by AV, 15-Oct-2022.)

**Hypotheses**
Ref	Expression
spllen.s	⊢ (𝜑 → 𝑆 ∈ Word 𝐴)
spllen.f	⊢ (𝜑 → 𝐹 ∈ (0...𝑇))
spllen.t	⊢ (𝜑 → 𝑇 ∈ (0...(♯‘𝑆)))
spllen.r	⊢ (𝜑 → 𝑅 ∈ Word 𝐴)

**Assertion**
Ref	Expression
spllen	⊢ (𝜑 → (♯‘(𝑆 splice ⟨𝐹, 𝑇, 𝑅⟩)) = ((♯‘𝑆) + ((♯‘𝑅) − (𝑇 − 𝐹))))

**Proof of Theorem spllen**
Step	Hyp	Ref	Expression
1		spllen.s	. . . 4 ⊢ (𝜑 → 𝑆 ∈ Word 𝐴)
2		spllen.f	. . . 4 ⊢ (𝜑 → 𝐹 ∈ (0...𝑇))
3		spllen.t	. . . 4 ⊢ (𝜑 → 𝑇 ∈ (0...(♯‘𝑆)))
4		spllen.r	. . . 4 ⊢ (𝜑 → 𝑅 ∈ Word 𝐴)
5		splval 14741	. . . 4 ⊢ ((𝑆 ∈ Word 𝐴 ∧ (𝐹 ∈ (0...𝑇) ∧ 𝑇 ∈ (0...(♯‘𝑆)) ∧ 𝑅 ∈ Word 𝐴)) → (𝑆 splice ⟨𝐹, 𝑇, 𝑅⟩) = (((𝑆 prefix 𝐹) ++ 𝑅) ++ (𝑆 substr ⟨𝑇, (♯‘𝑆)⟩)))
6	1, 2, 3, 4, 5	syl13anc 1369	. . 3 ⊢ (𝜑 → (𝑆 splice ⟨𝐹, 𝑇, 𝑅⟩) = (((𝑆 prefix 𝐹) ++ 𝑅) ++ (𝑆 substr ⟨𝑇, (♯‘𝑆)⟩)))
7	6	fveq2d 6906	. 2 ⊢ (𝜑 → (♯‘(𝑆 splice ⟨𝐹, 𝑇, 𝑅⟩)) = (♯‘(((𝑆 prefix 𝐹) ++ 𝑅) ++ (𝑆 substr ⟨𝑇, (♯‘𝑆)⟩))))
8		pfxcl 14667	. . . . 5 ⊢ (𝑆 ∈ Word 𝐴 → (𝑆 prefix 𝐹) ∈ Word 𝐴)
9	1, 8	syl 17	. . . 4 ⊢ (𝜑 → (𝑆 prefix 𝐹) ∈ Word 𝐴)
10		ccatcl 14564	. . . 4 ⊢ (((𝑆 prefix 𝐹) ∈ Word 𝐴 ∧ 𝑅 ∈ Word 𝐴) → ((𝑆 prefix 𝐹) ++ 𝑅) ∈ Word 𝐴)
11	9, 4, 10	syl2anc 582	. . 3 ⊢ (𝜑 → ((𝑆 prefix 𝐹) ++ 𝑅) ∈ Word 𝐴)
12		swrdcl 14635	. . . 4 ⊢ (𝑆 ∈ Word 𝐴 → (𝑆 substr ⟨𝑇, (♯‘𝑆)⟩) ∈ Word 𝐴)
13	1, 12	syl 17	. . 3 ⊢ (𝜑 → (𝑆 substr ⟨𝑇, (♯‘𝑆)⟩) ∈ Word 𝐴)
14		ccatlen 14565	. . 3 ⊢ ((((𝑆 prefix 𝐹) ++ 𝑅) ∈ Word 𝐴 ∧ (𝑆 substr ⟨𝑇, (♯‘𝑆)⟩) ∈ Word 𝐴) → (♯‘(((𝑆 prefix 𝐹) ++ 𝑅) ++ (𝑆 substr ⟨𝑇, (♯‘𝑆)⟩))) = ((♯‘((𝑆 prefix 𝐹) ++ 𝑅)) + (♯‘(𝑆 substr ⟨𝑇, (♯‘𝑆)⟩))))
15	11, 13, 14	syl2anc 582	. 2 ⊢ (𝜑 → (♯‘(((𝑆 prefix 𝐹) ++ 𝑅) ++ (𝑆 substr ⟨𝑇, (♯‘𝑆)⟩))) = ((♯‘((𝑆 prefix 𝐹) ++ 𝑅)) + (♯‘(𝑆 substr ⟨𝑇, (♯‘𝑆)⟩))))
16		lencl 14523	. . . . . . 7 ⊢ (𝑅 ∈ Word 𝐴 → (♯‘𝑅) ∈ ℕ₀)
17	16	nn0cnd 12572	. . . . . 6 ⊢ (𝑅 ∈ Word 𝐴 → (♯‘𝑅) ∈ ℂ)
18	4, 17	syl 17	. . . . 5 ⊢ (𝜑 → (♯‘𝑅) ∈ ℂ)
19		elfzelz 13541	. . . . . . 7 ⊢ (𝐹 ∈ (0...𝑇) → 𝐹 ∈ ℤ)
20	19	zcnd 12705	. . . . . 6 ⊢ (𝐹 ∈ (0...𝑇) → 𝐹 ∈ ℂ)
21	2, 20	syl 17	. . . . 5 ⊢ (𝜑 → 𝐹 ∈ ℂ)
22	18, 21	addcld 11271	. . . 4 ⊢ (𝜑 → ((♯‘𝑅) + 𝐹) ∈ ℂ)
23		elfzel2 13539	. . . . . 6 ⊢ (𝑇 ∈ (0...(♯‘𝑆)) → (♯‘𝑆) ∈ ℤ)
24	23	zcnd 12705	. . . . 5 ⊢ (𝑇 ∈ (0...(♯‘𝑆)) → (♯‘𝑆) ∈ ℂ)
25	3, 24	syl 17	. . . 4 ⊢ (𝜑 → (♯‘𝑆) ∈ ℂ)
26		elfzelz 13541	. . . . . 6 ⊢ (𝑇 ∈ (0...(♯‘𝑆)) → 𝑇 ∈ ℤ)
27	26	zcnd 12705	. . . . 5 ⊢ (𝑇 ∈ (0...(♯‘𝑆)) → 𝑇 ∈ ℂ)
28	3, 27	syl 17	. . . 4 ⊢ (𝜑 → 𝑇 ∈ ℂ)
29	22, 25, 28	addsub12d 11632	. . 3 ⊢ (𝜑 → (((♯‘𝑅) + 𝐹) + ((♯‘𝑆) − 𝑇)) = ((♯‘𝑆) + (((♯‘𝑅) + 𝐹) − 𝑇)))
30		ccatlen 14565	. . . . . 6 ⊢ (((𝑆 prefix 𝐹) ∈ Word 𝐴 ∧ 𝑅 ∈ Word 𝐴) → (♯‘((𝑆 prefix 𝐹) ++ 𝑅)) = ((♯‘(𝑆 prefix 𝐹)) + (♯‘𝑅)))
31	9, 4, 30	syl2anc 582	. . . . 5 ⊢ (𝜑 → (♯‘((𝑆 prefix 𝐹) ++ 𝑅)) = ((♯‘(𝑆 prefix 𝐹)) + (♯‘𝑅)))
32		elfzuz 13537	. . . . . . . . 9 ⊢ (𝐹 ∈ (0...𝑇) → 𝐹 ∈ (ℤ_≥‘0))
33	2, 32	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐹 ∈ (ℤ_≥‘0))
34		elfzuz3 13538	. . . . . . . . . 10 ⊢ (𝑇 ∈ (0...(♯‘𝑆)) → (♯‘𝑆) ∈ (ℤ_≥‘𝑇))
35	3, 34	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (♯‘𝑆) ∈ (ℤ_≥‘𝑇))
36		elfzuz3 13538	. . . . . . . . . 10 ⊢ (𝐹 ∈ (0...𝑇) → 𝑇 ∈ (ℤ_≥‘𝐹))
37	2, 36	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝑇 ∈ (ℤ_≥‘𝐹))
38		uztrn 12878	. . . . . . . . 9 ⊢ (((♯‘𝑆) ∈ (ℤ_≥‘𝑇) ∧ 𝑇 ∈ (ℤ_≥‘𝐹)) → (♯‘𝑆) ∈ (ℤ_≥‘𝐹))
39	35, 37, 38	syl2anc 582	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑆) ∈ (ℤ_≥‘𝐹))
40		elfzuzb 13535	. . . . . . . 8 ⊢ (𝐹 ∈ (0...(♯‘𝑆)) ↔ (𝐹 ∈ (ℤ_≥‘0) ∧ (♯‘𝑆) ∈ (ℤ_≥‘𝐹)))
41	33, 39, 40	sylanbrc 581	. . . . . . 7 ⊢ (𝜑 → 𝐹 ∈ (0...(♯‘𝑆)))
42		pfxlen 14673	. . . . . . 7 ⊢ ((𝑆 ∈ Word 𝐴 ∧ 𝐹 ∈ (0...(♯‘𝑆))) → (♯‘(𝑆 prefix 𝐹)) = 𝐹)
43	1, 41, 42	syl2anc 582	. . . . . 6 ⊢ (𝜑 → (♯‘(𝑆 prefix 𝐹)) = 𝐹)
44	43	oveq1d 7441	. . . . 5 ⊢ (𝜑 → ((♯‘(𝑆 prefix 𝐹)) + (♯‘𝑅)) = (𝐹 + (♯‘𝑅)))
45	21, 18	addcomd 11454	. . . . 5 ⊢ (𝜑 → (𝐹 + (♯‘𝑅)) = ((♯‘𝑅) + 𝐹))
46	31, 44, 45	3eqtrd 2772	. . . 4 ⊢ (𝜑 → (♯‘((𝑆 prefix 𝐹) ++ 𝑅)) = ((♯‘𝑅) + 𝐹))
47		elfzuz2 13546	. . . . . 6 ⊢ (𝑇 ∈ (0...(♯‘𝑆)) → (♯‘𝑆) ∈ (ℤ_≥‘0))
48		eluzfz2 13549	. . . . . 6 ⊢ ((♯‘𝑆) ∈ (ℤ_≥‘0) → (♯‘𝑆) ∈ (0...(♯‘𝑆)))
49	3, 47, 48	3syl 18	. . . . 5 ⊢ (𝜑 → (♯‘𝑆) ∈ (0...(♯‘𝑆)))
50		swrdlen 14637	. . . . 5 ⊢ ((𝑆 ∈ Word 𝐴 ∧ 𝑇 ∈ (0...(♯‘𝑆)) ∧ (♯‘𝑆) ∈ (0...(♯‘𝑆))) → (♯‘(𝑆 substr ⟨𝑇, (♯‘𝑆)⟩)) = ((♯‘𝑆) − 𝑇))
51	1, 3, 49, 50	syl3anc 1368	. . . 4 ⊢ (𝜑 → (♯‘(𝑆 substr ⟨𝑇, (♯‘𝑆)⟩)) = ((♯‘𝑆) − 𝑇))
52	46, 51	oveq12d 7444	. . 3 ⊢ (𝜑 → ((♯‘((𝑆 prefix 𝐹) ++ 𝑅)) + (♯‘(𝑆 substr ⟨𝑇, (♯‘𝑆)⟩))) = (((♯‘𝑅) + 𝐹) + ((♯‘𝑆) − 𝑇)))
53	18, 28, 21	subsub3d 11639	. . . 4 ⊢ (𝜑 → ((♯‘𝑅) − (𝑇 − 𝐹)) = (((♯‘𝑅) + 𝐹) − 𝑇))
54	53	oveq2d 7442	. . 3 ⊢ (𝜑 → ((♯‘𝑆) + ((♯‘𝑅) − (𝑇 − 𝐹))) = ((♯‘𝑆) + (((♯‘𝑅) + 𝐹) − 𝑇)))
55	29, 52, 54	3eqtr4d 2778	. 2 ⊢ (𝜑 → ((♯‘((𝑆 prefix 𝐹) ++ 𝑅)) + (♯‘(𝑆 substr ⟨𝑇, (♯‘𝑆)⟩))) = ((♯‘𝑆) + ((♯‘𝑅) − (𝑇 − 𝐹))))
56	7, 15, 55	3eqtrd 2772	1 ⊢ (𝜑 → (♯‘(𝑆 splice ⟨𝐹, 𝑇, 𝑅⟩)) = ((♯‘𝑆) + ((♯‘𝑅) − (𝑇 − 𝐹))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 = wceq 1533 ∈ wcel 2098 ⟨cop 4638 ⟨cotp 4640 ‘cfv 6553 (class class class)co 7426 ℂcc 11144 0cc0 11146 + caddc 11149 − cmin 11482 ℤ_≥cuz 12860 ...cfz 13524 ♯chash 14329 Word cword 14504 ++ cconcat 14560 substr csubstr 14630 prefix cpfx 14660 splice csplice 14739

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1789 ax-4 1803 ax-5 1905 ax-6 1963 ax-7 2003 ax-8 2100 ax-9 2108 ax-10 2129 ax-11 2146 ax-12 2166 ax-ext 2699 ax-rep 5289 ax-sep 5303 ax-nul 5310 ax-pow 5369 ax-pr 5433 ax-un 7746 ax-cnex 11202 ax-resscn 11203 ax-1cn 11204 ax-icn 11205 ax-addcl 11206 ax-addrcl 11207 ax-mulcl 11208 ax-mulrcl 11209 ax-mulcom 11210 ax-addass 11211 ax-mulass 11212 ax-distr 11213 ax-i2m1 11214 ax-1ne0 11215 ax-1rid 11216 ax-rnegex 11217 ax-rrecex 11218 ax-cnre 11219 ax-pre-lttri 11220 ax-pre-lttrn 11221 ax-pre-ltadd 11222 ax-pre-mulgt0 11223

This theorem depends on definitions: df-bi 206 df-an 395 df-or 846 df-3or 1085 df-3an 1086 df-tru 1536 df-fal 1546 df-ex 1774 df-nf 1778 df-sb 2060 df-mo 2529 df-eu 2558 df-clab 2706 df-cleq 2720 df-clel 2806 df-nfc 2881 df-ne 2938 df-nel 3044 df-ral 3059 df-rex 3068 df-reu 3375 df-rab 3431 df-v 3475 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-nul 4327 df-if 4533 df-pw 4608 df-sn 4633 df-pr 4635 df-op 4639 df-ot 4641 df-uni 4913 df-int 4954 df-iun 5002 df-br 5153 df-opab 5215 df-mpt 5236 df-tr 5270 df-id 5580 df-eprel 5586 df-po 5594 df-so 5595 df-fr 5637 df-we 5639 df-xp 5688 df-rel 5689 df-cnv 5690 df-co 5691 df-dm 5692 df-rn 5693 df-res 5694 df-ima 5695 df-pred 6310 df-ord 6377 df-on 6378 df-lim 6379 df-suc 6380 df-iota 6505 df-fun 6555 df-fn 6556 df-f 6557 df-f1 6558 df-fo 6559 df-f1o 6560 df-fv 6561 df-riota 7382 df-ov 7429 df-oprab 7430 df-mpo 7431 df-om 7877 df-1st 7999 df-2nd 8000 df-frecs 8293 df-wrecs 8324 df-recs 8398 df-rdg 8437 df-1o 8493 df-er 8731 df-en 8971 df-dom 8972 df-sdom 8973 df-fin 8974 df-card 9970 df-pnf 11288 df-mnf 11289 df-xr 11290 df-ltxr 11291 df-le 11292 df-sub 11484 df-neg 11485 df-nn 12251 df-n0 12511 df-z 12597 df-uz 12861 df-fz 13525 df-fzo 13668 df-hash 14330 df-word 14505 df-concat 14561 df-substr 14631 df-pfx 14661 df-splice 14740

This theorem is referenced by: psgnunilem2 19457 efgtlen 19688

W3C validator

	
		OSZAR »