pfxccatin12lem3 - Metamath Proof Explorer

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

Theorem pfxccatin12lem3 14755

Description: Lemma 3 for pfxccatin12 14756. (Contributed by AV, 30-Mar-2018.) (Revised by AV, 27-May-2018.)

**Hypothesis**
Ref	Expression
swrdccatin2.l	⊢ 𝐿 = (♯‘𝐴)

**Assertion**
Ref	Expression
pfxccatin12lem3	⊢ (((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) → ((𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀))) → (((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩)‘𝐾) = ((𝐴 substr ⟨𝑀, 𝐿⟩)‘𝐾)))

**Proof of Theorem pfxccatin12lem3**
Step	Hyp	Ref	Expression
1		simpll 766	. . . . 5 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → (𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉))
2		elfzo0 13722	. . . . . . . . 9 ⊢ (𝐾 ∈ (0..^(𝐿 − 𝑀)) ↔ (𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)))
3		swrdccatin2.l	. . . . . . . . . . . . 13 ⊢ 𝐿 = (♯‘𝐴)
4		lencl 14556	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ Word 𝑉 → (♯‘𝐴) ∈ ℕ₀)
5		elfz2nn0 13640	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑀 ∈ (0...𝐿) ↔ (𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿))
6		nn0addcl 12541	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝑀 ∈ ℕ₀) → (𝐾 + 𝑀) ∈ ℕ₀)
7	6	ex 412	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝐾 ∈ ℕ₀ → (𝑀 ∈ ℕ₀ → (𝐾 + 𝑀) ∈ ℕ₀))
8	7	3ad2ant1 1133	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → (𝑀 ∈ ℕ₀ → (𝐾 + 𝑀) ∈ ℕ₀))
9	8	com12 32	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑀 ∈ ℕ₀ → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → (𝐾 + 𝑀) ∈ ℕ₀))
10	9	3ad2ant1 1133	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → (𝐾 + 𝑀) ∈ ℕ₀))
11	10	imp 406	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) ∧ (𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀))) → (𝐾 + 𝑀) ∈ ℕ₀)
12		elnnz 12603	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐿 − 𝑀) ∈ ℕ ↔ ((𝐿 − 𝑀) ∈ ℤ ∧ 0 < (𝐿 − 𝑀)))
13		nn0re 12515	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑀 ∈ ℕ₀ → 𝑀 ∈ ℝ)
14		nn0re 12515	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝐿 ∈ ℕ₀ → 𝐿 ∈ ℝ)
15		posdif 11735	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝑀 ∈ ℝ ∧ 𝐿 ∈ ℝ) → (𝑀 < 𝐿 ↔ 0 < (𝐿 − 𝑀)))
16	13, 14, 15	syl2an 596	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀) → (𝑀 < 𝐿 ↔ 0 < (𝐿 − 𝑀)))
17		elnn0z 12606	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑀 ∈ ℕ₀ ↔ (𝑀 ∈ ℤ ∧ 0 ≤ 𝑀))
18		0re 11242	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ 0 ∈ ℝ
19		zre 12597	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (𝑀 ∈ ℤ → 𝑀 ∈ ℝ)
20		lelttr 11330	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((0 ∈ ℝ ∧ 𝑀 ∈ ℝ ∧ 𝐿 ∈ ℝ) → ((0 ≤ 𝑀 ∧ 𝑀 < 𝐿) → 0 < 𝐿))
21	18, 19, 14, 20	mp3an3an 1469	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℕ₀) → ((0 ≤ 𝑀 ∧ 𝑀 < 𝐿) → 0 < 𝐿))
22		nn0z 12618	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (𝐿 ∈ ℕ₀ → 𝐿 ∈ ℤ)
23	22	anim1i 615	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((𝐿 ∈ ℕ₀ ∧ 0 < 𝐿) → (𝐿 ∈ ℤ ∧ 0 < 𝐿))
24		elnnz 12603	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (𝐿 ∈ ℕ ↔ (𝐿 ∈ ℤ ∧ 0 < 𝐿))
25	23, 24	sylibr 234	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((𝐿 ∈ ℕ₀ ∧ 0 < 𝐿) → 𝐿 ∈ ℕ)
26	25	ex 412	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (𝐿 ∈ ℕ₀ → (0 < 𝐿 → 𝐿 ∈ ℕ))
27	26	adantl 481	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℕ₀) → (0 < 𝐿 → 𝐿 ∈ ℕ))
28	21, 27	syld 47	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℕ₀) → ((0 ≤ 𝑀 ∧ 𝑀 < 𝐿) → 𝐿 ∈ ℕ))
29	28	expd 415	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((𝑀 ∈ ℤ ∧ 𝐿 ∈ ℕ₀) → (0 ≤ 𝑀 → (𝑀 < 𝐿 → 𝐿 ∈ ℕ)))
30	29	impancom 451	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((𝑀 ∈ ℤ ∧ 0 ≤ 𝑀) → (𝐿 ∈ ℕ₀ → (𝑀 < 𝐿 → 𝐿 ∈ ℕ)))
31	17, 30	sylbi 217	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑀 ∈ ℕ₀ → (𝐿 ∈ ℕ₀ → (𝑀 < 𝐿 → 𝐿 ∈ ℕ)))
32	31	imp 406	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀) → (𝑀 < 𝐿 → 𝐿 ∈ ℕ))
33	16, 32	sylbird 260	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀) → (0 < (𝐿 − 𝑀) → 𝐿 ∈ ℕ))
34	33	com12 32	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (0 < (𝐿 − 𝑀) → ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀) → 𝐿 ∈ ℕ))
35	12, 34	simplbiim 504	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐿 − 𝑀) ∈ ℕ → ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀) → 𝐿 ∈ ℕ))
36	35	3ad2ant2 1134	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀) → 𝐿 ∈ ℕ))
37	36	com12 32	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → 𝐿 ∈ ℕ))
38	37	3adant3 1132	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → 𝐿 ∈ ℕ))
39	38	imp 406	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) ∧ (𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀))) → 𝐿 ∈ ℕ)
40		nn0re 12515	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝐾 ∈ ℕ₀ → 𝐾 ∈ ℝ)
41	40	adantr 480	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝐾 ∈ ℕ₀ ∧ (𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿)) → 𝐾 ∈ ℝ)
42	13	3ad2ant1 1133	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → 𝑀 ∈ ℝ)
43	42	adantl 481	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝐾 ∈ ℕ₀ ∧ (𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿)) → 𝑀 ∈ ℝ)
44	14	3ad2ant2 1134	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → 𝐿 ∈ ℝ)
45	44	adantl 481	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝐾 ∈ ℕ₀ ∧ (𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿)) → 𝐿 ∈ ℝ)
46	41, 43, 45	ltaddsubd 11842	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐾 ∈ ℕ₀ ∧ (𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿)) → ((𝐾 + 𝑀) < 𝐿 ↔ 𝐾 < (𝐿 − 𝑀)))
47	46	exbiri 810	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝐾 ∈ ℕ₀ → ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → (𝐾 < (𝐿 − 𝑀) → (𝐾 + 𝑀) < 𝐿)))
48	47	com23 86	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝐾 ∈ ℕ₀ → (𝐾 < (𝐿 − 𝑀) → ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → (𝐾 + 𝑀) < 𝐿)))
49	48	imp 406	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐾 ∈ ℕ₀ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → (𝐾 + 𝑀) < 𝐿))
50	49	3adant2 1131	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → (𝐾 + 𝑀) < 𝐿))
51	50	impcom 407	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) ∧ (𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀))) → (𝐾 + 𝑀) < 𝐿)
52	11, 39, 51	3jca 1128	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) ∧ (𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀))) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ 𝐿 ∈ ℕ ∧ (𝐾 + 𝑀) < 𝐿))
53	52	ex 412	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ 𝐿 ∈ ℕ ∧ (𝐾 + 𝑀) < 𝐿)))
54	53	a1d 25	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑀 ∈ ℕ₀ ∧ 𝐿 ∈ ℕ₀ ∧ 𝑀 ≤ 𝐿) → (𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ 𝐿 ∈ ℕ ∧ (𝐾 + 𝑀) < 𝐿))))
55	5, 54	sylbi 217	. . . . . . . . . . . . . . . . 17 ⊢ (𝑀 ∈ (0...𝐿) → (𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ 𝐿 ∈ ℕ ∧ (𝐾 + 𝑀) < 𝐿))))
56	55	imp 406	. . . . . . . . . . . . . . . 16 ⊢ ((𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ 𝐿 ∈ ℕ ∧ (𝐾 + 𝑀) < 𝐿)))
57	56	2a1i 12	. . . . . . . . . . . . . . 15 ⊢ ((♯‘𝐴) = 𝐿 → (𝐿 ∈ ℕ₀ → ((𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ 𝐿 ∈ ℕ ∧ (𝐾 + 𝑀) < 𝐿)))))
58		eleq1 2823	. . . . . . . . . . . . . . 15 ⊢ ((♯‘𝐴) = 𝐿 → ((♯‘𝐴) ∈ ℕ₀ ↔ 𝐿 ∈ ℕ₀))
59		eleq1 2823	. . . . . . . . . . . . . . . . . 18 ⊢ ((♯‘𝐴) = 𝐿 → ((♯‘𝐴) ∈ ℕ ↔ 𝐿 ∈ ℕ))
60		breq2 5128	. . . . . . . . . . . . . . . . . 18 ⊢ ((♯‘𝐴) = 𝐿 → ((𝐾 + 𝑀) < (♯‘𝐴) ↔ (𝐾 + 𝑀) < 𝐿))
61	59, 60	3anbi23d 1441	. . . . . . . . . . . . . . . . 17 ⊢ ((♯‘𝐴) = 𝐿 → (((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴)) ↔ ((𝐾 + 𝑀) ∈ ℕ₀ ∧ 𝐿 ∈ ℕ ∧ (𝐾 + 𝑀) < 𝐿)))
62	61	imbi2d 340	. . . . . . . . . . . . . . . 16 ⊢ ((♯‘𝐴) = 𝐿 → (((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴))) ↔ ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ 𝐿 ∈ ℕ ∧ (𝐾 + 𝑀) < 𝐿))))
63	62	imbi2d 340	. . . . . . . . . . . . . . 15 ⊢ ((♯‘𝐴) = 𝐿 → (((𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴)))) ↔ ((𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ 𝐿 ∈ ℕ ∧ (𝐾 + 𝑀) < 𝐿)))))
64	57, 58, 63	3imtr4d 294	. . . . . . . . . . . . . 14 ⊢ ((♯‘𝐴) = 𝐿 → ((♯‘𝐴) ∈ ℕ₀ → ((𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴))))))
65	64	eqcoms 2744	. . . . . . . . . . . . 13 ⊢ (𝐿 = (♯‘𝐴) → ((♯‘𝐴) ∈ ℕ₀ → ((𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴))))))
66	3, 4, 65	mpsyl 68	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ Word 𝑉 → ((𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴)))))
67	66	adantr 480	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) → ((𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵)))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴)))))
68	67	imp 406	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) → ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴))))
69	68	com12 32	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℕ₀ ∧ (𝐿 − 𝑀) ∈ ℕ ∧ 𝐾 < (𝐿 − 𝑀)) → (((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴))))
70	2, 69	sylbi 217	. . . . . . . 8 ⊢ (𝐾 ∈ (0..^(𝐿 − 𝑀)) → (((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴))))
71	70	adantl 481	. . . . . . 7 ⊢ ((𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀))) → (((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴))))
72	71	impcom 407	. . . . . 6 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴)))
73		elfzo0 13722	. . . . . 6 ⊢ ((𝐾 + 𝑀) ∈ (0..^(♯‘𝐴)) ↔ ((𝐾 + 𝑀) ∈ ℕ₀ ∧ (♯‘𝐴) ∈ ℕ ∧ (𝐾 + 𝑀) < (♯‘𝐴)))
74	72, 73	sylibr 234	. . . . 5 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → (𝐾 + 𝑀) ∈ (0..^(♯‘𝐴)))
75		df-3an 1088	. . . . 5 ⊢ ((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉 ∧ (𝐾 + 𝑀) ∈ (0..^(♯‘𝐴))) ↔ ((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝐾 + 𝑀) ∈ (0..^(♯‘𝐴))))
76	1, 74, 75	sylanbrc 583	. . . 4 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → (𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉 ∧ (𝐾 + 𝑀) ∈ (0..^(♯‘𝐴))))
77		ccatval1 14600	. . . 4 ⊢ ((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉 ∧ (𝐾 + 𝑀) ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘(𝐾 + 𝑀)) = (𝐴‘(𝐾 + 𝑀)))
78	76, 77	syl 17	. . 3 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → ((𝐴 ++ 𝐵)‘(𝐾 + 𝑀)) = (𝐴‘(𝐾 + 𝑀)))
79	3	pfxccatin12lem2c 14753	. . . 4 ⊢ (((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) → ((𝐴 ++ 𝐵) ∈ Word 𝑉 ∧ 𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘(𝐴 ++ 𝐵)))))
80		simpl 482	. . . 4 ⊢ ((𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀))) → 𝐾 ∈ (0..^(𝑁 − 𝑀)))
81		swrdfv 14671	. . . 4 ⊢ ((((𝐴 ++ 𝐵) ∈ Word 𝑉 ∧ 𝑀 ∈ (0...𝑁) ∧ 𝑁 ∈ (0...(♯‘(𝐴 ++ 𝐵)))) ∧ 𝐾 ∈ (0..^(𝑁 − 𝑀))) → (((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩)‘𝐾) = ((𝐴 ++ 𝐵)‘(𝐾 + 𝑀)))
82	79, 80, 81	syl2an 596	. . 3 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → (((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩)‘𝐾) = ((𝐴 ++ 𝐵)‘(𝐾 + 𝑀)))
83		simplll 774	. . . 4 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → 𝐴 ∈ Word 𝑉)
84		simplrl 776	. . . 4 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → 𝑀 ∈ (0...𝐿))
85	3	eleq1i 2826	. . . . . . 7 ⊢ (𝐿 ∈ ℕ₀ ↔ (♯‘𝐴) ∈ ℕ₀)
86		elnn0uz 12902	. . . . . . . . 9 ⊢ (𝐿 ∈ ℕ₀ ↔ 𝐿 ∈ (ℤ_≥‘0))
87		eluzfz2 13554	. . . . . . . . 9 ⊢ (𝐿 ∈ (ℤ_≥‘0) → 𝐿 ∈ (0...𝐿))
88	86, 87	sylbi 217	. . . . . . . 8 ⊢ (𝐿 ∈ ℕ₀ → 𝐿 ∈ (0...𝐿))
89	3	oveq2i 7421	. . . . . . . 8 ⊢ (0...𝐿) = (0...(♯‘𝐴))
90	88, 89	eleqtrdi 2845	. . . . . . 7 ⊢ (𝐿 ∈ ℕ₀ → 𝐿 ∈ (0...(♯‘𝐴)))
91	85, 90	sylbir 235	. . . . . 6 ⊢ ((♯‘𝐴) ∈ ℕ₀ → 𝐿 ∈ (0...(♯‘𝐴)))
92	4, 91	syl 17	. . . . 5 ⊢ (𝐴 ∈ Word 𝑉 → 𝐿 ∈ (0...(♯‘𝐴)))
93	92	ad3antrrr 730	. . . 4 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → 𝐿 ∈ (0...(♯‘𝐴)))
94		simprr 772	. . . 4 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → 𝐾 ∈ (0..^(𝐿 − 𝑀)))
95		swrdfv 14671	. . . 4 ⊢ (((𝐴 ∈ Word 𝑉 ∧ 𝑀 ∈ (0...𝐿) ∧ 𝐿 ∈ (0...(♯‘𝐴))) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀))) → ((𝐴 substr ⟨𝑀, 𝐿⟩)‘𝐾) = (𝐴‘(𝐾 + 𝑀)))
96	83, 84, 93, 94, 95	syl31anc 1375	. . 3 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → ((𝐴 substr ⟨𝑀, 𝐿⟩)‘𝐾) = (𝐴‘(𝐾 + 𝑀)))
97	78, 82, 96	3eqtr4d 2781	. 2 ⊢ ((((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) ∧ (𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀)))) → (((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩)‘𝐾) = ((𝐴 substr ⟨𝑀, 𝐿⟩)‘𝐾))
98	97	ex 412	1 ⊢ (((𝐴 ∈ Word 𝑉 ∧ 𝐵 ∈ Word 𝑉) ∧ (𝑀 ∈ (0...𝐿) ∧ 𝑁 ∈ (𝐿...(𝐿 + (♯‘𝐵))))) → ((𝐾 ∈ (0..^(𝑁 − 𝑀)) ∧ 𝐾 ∈ (0..^(𝐿 − 𝑀))) → (((𝐴 ++ 𝐵) substr ⟨𝑀, 𝑁⟩)‘𝐾) = ((𝐴 substr ⟨𝑀, 𝐿⟩)‘𝐾)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 ⟨cop 4612 class class class wbr 5124 ‘cfv 6536 (class class class)co 7410 ℝcr 11133 0cc0 11134 + caddc 11137 < clt 11274 ≤ cle 11275 − cmin 11471 ℕcn 12245 ℕ₀cn0 12506 ℤcz 12593 ℤ_≥cuz 12857 ...cfz 13529 ..^cfzo 13676 ♯chash 14353 Word cword 14536 ++ cconcat 14593 substr csubstr 14663

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2708 ax-rep 5254 ax-sep 5271 ax-nul 5281 ax-pow 5340 ax-pr 5407 ax-un 7734 ax-cnex 11190 ax-resscn 11191 ax-1cn 11192 ax-icn 11193 ax-addcl 11194 ax-addrcl 11195 ax-mulcl 11196 ax-mulrcl 11197 ax-mulcom 11198 ax-addass 11199 ax-mulass 11200 ax-distr 11201 ax-i2m1 11202 ax-1ne0 11203 ax-1rid 11204 ax-rnegex 11205 ax-rrecex 11206 ax-cnre 11207 ax-pre-lttri 11208 ax-pre-lttrn 11209 ax-pre-ltadd 11210 ax-pre-mulgt0 11211

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2540 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2810 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3062 df-reu 3365 df-rab 3421 df-v 3466 df-sbc 3771 df-csb 3880 df-dif 3934 df-un 3936 df-in 3938 df-ss 3948 df-pss 3951 df-nul 4314 df-if 4506 df-pw 4582 df-sn 4607 df-pr 4609 df-op 4613 df-uni 4889 df-int 4928 df-iun 4974 df-br 5125 df-opab 5187 df-mpt 5207 df-tr 5235 df-id 5553 df-eprel 5558 df-po 5566 df-so 5567 df-fr 5611 df-we 5613 df-xp 5665 df-rel 5666 df-cnv 5667 df-co 5668 df-dm 5669 df-rn 5670 df-res 5671 df-ima 5672 df-pred 6295 df-ord 6360 df-on 6361 df-lim 6362 df-suc 6363 df-iota 6489 df-fun 6538 df-fn 6539 df-f 6540 df-f1 6541 df-fo 6542 df-f1o 6543 df-fv 6544 df-riota 7367 df-ov 7413 df-oprab 7414 df-mpo 7415 df-om 7867 df-1st 7993 df-2nd 7994 df-frecs 8285 df-wrecs 8316 df-recs 8390 df-rdg 8429 df-1o 8485 df-er 8724 df-en 8965 df-dom 8966 df-sdom 8967 df-fin 8968 df-card 9958 df-pnf 11276 df-mnf 11277 df-xr 11278 df-ltxr 11279 df-le 11280 df-sub 11473 df-neg 11474 df-nn 12246 df-n0 12507 df-z 12594 df-uz 12858 df-fz 13530 df-fzo 13677 df-hash 14354 df-word 14537 df-concat 14594 df-substr 14664

This theorem is referenced by: pfxccatin12 14756

W3C validator