chnccat - Metamath Proof Explorer

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

Theorem chnccat 18553

Description: Concatenate two chains. (Contributed by Ender Ting, 20-Jan-2026.)

**Hypotheses**
Ref	Expression
chnccat.1	⊢ (𝜑 → 𝑇 ∈ ( < Chain 𝐴))
chnccat.2	⊢ (𝜑 → 𝑈 ∈ ( < Chain 𝐴))
chnccat.3	⊢ (𝜑 → (𝑇 = ∅ ∨ 𝑈 = ∅ ∨ (lastS‘𝑇) < (𝑈‘0)))

**Assertion**
Ref	Expression
chnccat	⊢ (𝜑 → (𝑇 ++ 𝑈) ∈ ( < Chain 𝐴))

Proof of Theorem chnccat Dummy variable 𝑛 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		chnccat.1	. . . 4 ⊢ (𝜑 → 𝑇 ∈ ( < Chain 𝐴))
2	1	chnwrd 18535	. . 3 ⊢ (𝜑 → 𝑇 ∈ Word 𝐴)
3		chnccat.2	. . . 4 ⊢ (𝜑 → 𝑈 ∈ ( < Chain 𝐴))
4	3	chnwrd 18535	. . 3 ⊢ (𝜑 → 𝑈 ∈ Word 𝐴)
5		ccatcl 14501	. . 3 ⊢ ((𝑇 ∈ Word 𝐴 ∧ 𝑈 ∈ Word 𝐴) → (𝑇 ++ 𝑈) ∈ Word 𝐴)
6	2, 4, 5	syl2anc 585	. 2 ⊢ (𝜑 → (𝑇 ++ 𝑈) ∈ Word 𝐴)
7		eqidd 2738	. . . . . . . . . . . 12 ⊢ (𝜑 → (♯‘𝑇) = (♯‘𝑇))
8	7, 2	wrdfd 14446	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑇:(0..^(♯‘𝑇))⟶𝐴)
9	8	fdmd 6673	. . . . . . . . . 10 ⊢ (𝜑 → dom 𝑇 = (0..^(♯‘𝑇)))
10	9	difeq1d 4078	. . . . . . . . 9 ⊢ (𝜑 → (dom 𝑇 ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) = ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
11	10	eleq2d 2823	. . . . . . . 8 ⊢ (𝜑 → (𝑛 ∈ (dom 𝑇 ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ↔ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})))
12	11	biimpar 477	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ (dom 𝑇 ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
13		snsspr1 4771	. . . . . . . . . 10 ⊢ {0} ⊆ {0, ((♯‘𝑇) + (♯‘𝑈))}
14		sscon 4096	. . . . . . . . . 10 ⊢ ({0} ⊆ {0, ((♯‘𝑇) + (♯‘𝑈))} → (dom 𝑇 ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ⊆ (dom 𝑇 ∖ {0}))
15	13, 14	ax-mp 5	. . . . . . . . 9 ⊢ (dom 𝑇 ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ⊆ (dom 𝑇 ∖ {0})
16	15	sseli 3930	. . . . . . . 8 ⊢ (𝑛 ∈ (dom 𝑇 ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → 𝑛 ∈ (dom 𝑇 ∖ {0}))
17		ischn 18534	. . . . . . . . . . 11 ⊢ (𝑇 ∈ ( < Chain 𝐴) ↔ (𝑇 ∈ Word 𝐴 ∧ ∀𝑛 ∈ (dom 𝑇 ∖ {0})(𝑇‘(𝑛 − 1)) < (𝑇‘𝑛)))
18	1, 17	sylib 218	. . . . . . . . . 10 ⊢ (𝜑 → (𝑇 ∈ Word 𝐴 ∧ ∀𝑛 ∈ (dom 𝑇 ∖ {0})(𝑇‘(𝑛 − 1)) < (𝑇‘𝑛)))
19	18	simprd 495	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑛 ∈ (dom 𝑇 ∖ {0})(𝑇‘(𝑛 − 1)) < (𝑇‘𝑛))
20	19	r19.21bi 3229	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (dom 𝑇 ∖ {0})) → (𝑇‘(𝑛 − 1)) < (𝑇‘𝑛))
21	16, 20	sylan2 594	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (dom 𝑇 ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑇‘(𝑛 − 1)) < (𝑇‘𝑛))
22	12, 21	syldan 592	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑇‘(𝑛 − 1)) < (𝑇‘𝑛))
23	2	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑇 ∈ Word 𝐴)
24	4	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑈 ∈ Word 𝐴)
25		sscon 4096	. . . . . . . . . . 11 ⊢ ({0} ⊆ {0, ((♯‘𝑇) + (♯‘𝑈))} → ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ⊆ ((0..^(♯‘𝑇)) ∖ {0}))
26	13, 25	ax-mp 5	. . . . . . . . . 10 ⊢ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ⊆ ((0..^(♯‘𝑇)) ∖ {0})
27	26	sseli 3930	. . . . . . . . 9 ⊢ (𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0}))
28	27	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0}))
29		lencl 14460	. . . . . . . . . 10 ⊢ (𝑇 ∈ Word 𝐴 → (♯‘𝑇) ∈ ℕ₀)
30	2, 29	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (♯‘𝑇) ∈ ℕ₀)
31	30	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑇) ∈ ℕ₀)
32	28, 31	elfzodif0 13690	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 − 1) ∈ (0..^(♯‘𝑇)))
33		ccatval1 14504	. . . . . . 7 ⊢ ((𝑇 ∈ Word 𝐴 ∧ 𝑈 ∈ Word 𝐴 ∧ (𝑛 − 1) ∈ (0..^(♯‘𝑇))) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) = (𝑇‘(𝑛 − 1)))
34	23, 24, 32, 33	syl3anc 1374	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) = (𝑇‘(𝑛 − 1)))
35		simpr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
36	35	eldifad 3914	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ (0..^(♯‘𝑇)))
37		ccatval1 14504	. . . . . . 7 ⊢ ((𝑇 ∈ Word 𝐴 ∧ 𝑈 ∈ Word 𝐴 ∧ 𝑛 ∈ (0..^(♯‘𝑇))) → ((𝑇 ++ 𝑈)‘𝑛) = (𝑇‘𝑛))
38	23, 24, 36, 37	syl3anc 1374	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘𝑛) = (𝑇‘𝑛))
39	22, 34, 38	3brtr4d 5131	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
40	39	adantlr 716	. . . 4 ⊢ (((𝜑 ∧ 𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0})) ∧ 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
41		simpr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
42	41	adantr 480	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑇 = ∅) → 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
43		noel 4291	. . . . . . . 8 ⊢ ¬ 𝑛 ∈ ∅
44		fveq2 6835	. . . . . . . . . . . . . 14 ⊢ (𝑇 = ∅ → (♯‘𝑇) = (♯‘∅))
45		hash0 14294	. . . . . . . . . . . . . 14 ⊢ (♯‘∅) = 0
46	44, 45	eqtrdi 2788	. . . . . . . . . . . . 13 ⊢ (𝑇 = ∅ → (♯‘𝑇) = 0)
47	46	adantl 481	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑇 = ∅) → (♯‘𝑇) = 0)
48	47	sneqd 4593	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑇 = ∅) → {(♯‘𝑇)} = {0})
49	48	difeq1d 4078	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑇 = ∅) → ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) = ({0} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
50		difpr 4760	. . . . . . . . . . 11 ⊢ ({0} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) = (({0} ∖ {0}) ∖ {((♯‘𝑇) + (♯‘𝑈))})
51		difid 4329	. . . . . . . . . . . 12 ⊢ ({0} ∖ {0}) = ∅
52	51	difeq1i 4075	. . . . . . . . . . 11 ⊢ (({0} ∖ {0}) ∖ {((♯‘𝑇) + (♯‘𝑈))}) = (∅ ∖ {((♯‘𝑇) + (♯‘𝑈))})
53		0dif 4358	. . . . . . . . . . 11 ⊢ (∅ ∖ {((♯‘𝑇) + (♯‘𝑈))}) = ∅
54	50, 52, 53	3eqtri 2764	. . . . . . . . . 10 ⊢ ({0} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) = ∅
55	49, 54	eqtrdi 2788	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑇 = ∅) → ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) = ∅)
56	55	eleq2d 2823	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑇 = ∅) → (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ↔ 𝑛 ∈ ∅))
57	43, 56	mtbiri 327	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑇 = ∅) → ¬ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
58	42, 57	pm2.21dd 195	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑇 = ∅) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
59		eldifi 4084	. . . . . . . . 9 ⊢ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → 𝑛 ∈ {(♯‘𝑇)})
60	59	elsnd 4599	. . . . . . . 8 ⊢ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → 𝑛 = (♯‘𝑇))
61	60	ad2antlr 728	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → 𝑛 = (♯‘𝑇))
62		vex 3445	. . . . . . . . 9 ⊢ 𝑛 ∈ V
63	62	a1i 11	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → 𝑛 ∈ V)
64		eldifn 4085	. . . . . . . . . 10 ⊢ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})
65	64	ad2antlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})
66		fveq2 6835	. . . . . . . . . . . . . 14 ⊢ (𝑈 = ∅ → (♯‘𝑈) = (♯‘∅))
67	66, 45	eqtrdi 2788	. . . . . . . . . . . . 13 ⊢ (𝑈 = ∅ → (♯‘𝑈) = 0)
68	67	adantl 481	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → (♯‘𝑈) = 0)
69	68	oveq2d 7376	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → ((♯‘𝑇) + (♯‘𝑈)) = ((♯‘𝑇) + 0))
70		nn0cn 12415	. . . . . . . . . . . . . . 15 ⊢ ((♯‘𝑇) ∈ ℕ₀ → (♯‘𝑇) ∈ ℂ)
71	2, 29, 70	3syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘𝑇) ∈ ℂ)
72	71	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑇) ∈ ℂ)
73	72	adantr 480	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → (♯‘𝑇) ∈ ℂ)
74	73	addridd 11337	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → ((♯‘𝑇) + 0) = (♯‘𝑇))
75	69, 74	eqtrd 2772	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → ((♯‘𝑇) + (♯‘𝑈)) = (♯‘𝑇))
76	75	preq2d 4698	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → {0, ((♯‘𝑇) + (♯‘𝑈))} = {0, (♯‘𝑇)})
77	65, 76	neleqtrd 2859	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → ¬ 𝑛 ∈ {0, (♯‘𝑇)})
78	63, 77	nelpr2 4611	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → 𝑛 ≠ (♯‘𝑇))
79	61, 78	pm2.21ddne 3017	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑈 = ∅) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
80		simpr 484	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → (lastS‘𝑇) < (𝑈‘0))
81	2	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑇 ∈ Word 𝐴)
82	81	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → 𝑇 ∈ Word 𝐴)
83	4	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑈 ∈ Word 𝐴)
84	83	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → 𝑈 ∈ Word 𝐴)
85	41	eldifad 3914	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ {(♯‘𝑇)})
86	85	elsnd 4599	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 = (♯‘𝑇))
87	86	oveq1d 7375	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 − 1) = ((♯‘𝑇) − 1))
88	81, 29	syl 17	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑇) ∈ ℕ₀)
89		sscon 4096	. . . . . . . . . . . . . . . . . . 19 ⊢ ({0} ⊆ {0, ((♯‘𝑇) + (♯‘𝑈))} → ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ⊆ ({(♯‘𝑇)} ∖ {0}))
90	13, 89	ax-mp 5	. . . . . . . . . . . . . . . . . 18 ⊢ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ⊆ ({(♯‘𝑇)} ∖ {0})
91	90	sseli 3930	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → 𝑛 ∈ ({(♯‘𝑇)} ∖ {0}))
92	60, 91	eqeltrrd 2838	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → (♯‘𝑇) ∈ ({(♯‘𝑇)} ∖ {0}))
93	92	eldifbd 3915	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → ¬ (♯‘𝑇) ∈ {0})
94	93	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ¬ (♯‘𝑇) ∈ {0})
95	88, 94	eldifd 3913	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑇) ∈ (ℕ₀ ∖ {0}))
96		dfn2 12418	. . . . . . . . . . . . 13 ⊢ ℕ = (ℕ₀ ∖ {0})
97	95, 96	eleqtrrdi 2848	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑇) ∈ ℕ)
98		fzo0end 13678	. . . . . . . . . . . 12 ⊢ ((♯‘𝑇) ∈ ℕ → ((♯‘𝑇) − 1) ∈ (0..^(♯‘𝑇)))
99	97, 98	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((♯‘𝑇) − 1) ∈ (0..^(♯‘𝑇)))
100	87, 99	eqeltrd 2837	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 − 1) ∈ (0..^(♯‘𝑇)))
101	100	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → (𝑛 − 1) ∈ (0..^(♯‘𝑇)))
102	82, 84, 101, 33	syl3anc 1374	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) = (𝑇‘(𝑛 − 1)))
103	60	oveq1d 7375	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → (𝑛 − 1) = ((♯‘𝑇) − 1))
104	103	adantl 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 − 1) = ((♯‘𝑇) − 1))
105	104	fveq2d 6839	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑇‘(𝑛 − 1)) = (𝑇‘((♯‘𝑇) − 1)))
106		lsw 14491	. . . . . . . . . . 11 ⊢ (𝑇 ∈ Word 𝐴 → (lastS‘𝑇) = (𝑇‘((♯‘𝑇) − 1)))
107	81, 106	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (lastS‘𝑇) = (𝑇‘((♯‘𝑇) − 1)))
108	105, 107	eqtr4d 2775	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑇‘(𝑛 − 1)) = (lastS‘𝑇))
109	108	adantr 480	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → (𝑇‘(𝑛 − 1)) = (lastS‘𝑇))
110	102, 109	eqtrd 2772	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) = (lastS‘𝑇))
111	86	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → 𝑛 = (♯‘𝑇))
112	111	fveq2d 6839	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → ((𝑇 ++ 𝑈)‘𝑛) = ((𝑇 ++ 𝑈)‘(♯‘𝑇)))
113		lencl 14460	. . . . . . . . . . . . . 14 ⊢ (𝑈 ∈ Word 𝐴 → (♯‘𝑈) ∈ ℕ₀)
114	4, 113	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → (♯‘𝑈) ∈ ℕ₀)
115	114	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑈) ∈ ℕ₀)
116	81	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (♯‘𝑈) = 0) → 𝑇 ∈ Word 𝐴)
117	116, 29, 70	3syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (♯‘𝑈) = 0) → (♯‘𝑇) ∈ ℂ)
118		simpr 484	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (♯‘𝑈) = 0) → (♯‘𝑈) = 0)
119	117, 118	jca 511	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (♯‘𝑈) = 0) → ((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0))
120		prid2g 4719	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((♯‘𝑇) ∈ ℂ → (♯‘𝑇) ∈ {0, (♯‘𝑇)})
121	120	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ (((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0) → (♯‘𝑇) ∈ {0, (♯‘𝑇)})
122		simpr 484	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0) → (♯‘𝑈) = 0)
123	122	oveq2d 7376	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0) → ((♯‘𝑇) + (♯‘𝑈)) = ((♯‘𝑇) + 0))
124		addrid 11317	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((♯‘𝑇) ∈ ℂ → ((♯‘𝑇) + 0) = (♯‘𝑇))
125	124	adantr 480	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0) → ((♯‘𝑇) + 0) = (♯‘𝑇))
126	123, 125	eqtrd 2772	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0) → ((♯‘𝑇) + (♯‘𝑈)) = (♯‘𝑇))
127	126	preq2d 4698	. . . . . . . . . . . . . . . . . . 19 ⊢ (((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0) → {0, ((♯‘𝑇) + (♯‘𝑈))} = {0, (♯‘𝑇)})
128	121, 127	eleqtrrd 2840	. . . . . . . . . . . . . . . . . 18 ⊢ (((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0) → (♯‘𝑇) ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})
129	128	snssd 4766	. . . . . . . . . . . . . . . . 17 ⊢ (((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0) → {(♯‘𝑇)} ⊆ {0, ((♯‘𝑇) + (♯‘𝑈))})
130		ssdif0 4319	. . . . . . . . . . . . . . . . 17 ⊢ ({(♯‘𝑇)} ⊆ {0, ((♯‘𝑇) + (♯‘𝑈))} ↔ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) = ∅)
131	129, 130	sylib 218	. . . . . . . . . . . . . . . 16 ⊢ (((♯‘𝑇) ∈ ℂ ∧ (♯‘𝑈) = 0) → ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) = ∅)
132		nel02 4292	. . . . . . . . . . . . . . . 16 ⊢ (({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) = ∅ → ¬ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
133	119, 131, 132	3syl 18	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (♯‘𝑈) = 0) → ¬ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
134	133	ex 412	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((♯‘𝑈) = 0 → ¬ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})))
135	41, 134	mt2d 136	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ¬ (♯‘𝑈) = 0)
136	135	neqned 2940	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑈) ≠ 0)
137		elnnne0 12419	. . . . . . . . . . . 12 ⊢ ((♯‘𝑈) ∈ ℕ ↔ ((♯‘𝑈) ∈ ℕ₀ ∧ (♯‘𝑈) ≠ 0))
138	115, 136, 137	sylanbrc 584	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑈) ∈ ℕ)
139	138	adantr 480	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → (♯‘𝑈) ∈ ℕ)
140		lbfzo0 13619	. . . . . . . . . 10 ⊢ (0 ∈ (0..^(♯‘𝑈)) ↔ (♯‘𝑈) ∈ ℕ)
141	139, 140	sylibr 234	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → 0 ∈ (0..^(♯‘𝑈)))
142		addlid 11320	. . . . . . . . . . . . . 14 ⊢ ((♯‘𝑇) ∈ ℂ → (0 + (♯‘𝑇)) = (♯‘𝑇))
143	142	eqcomd 2743	. . . . . . . . . . . . 13 ⊢ ((♯‘𝑇) ∈ ℂ → (♯‘𝑇) = (0 + (♯‘𝑇)))
144	143	fveq2d 6839	. . . . . . . . . . . 12 ⊢ ((♯‘𝑇) ∈ ℂ → ((𝑇 ++ 𝑈)‘(♯‘𝑇)) = ((𝑇 ++ 𝑈)‘(0 + (♯‘𝑇))))
145	29, 70, 144	3syl 18	. . . . . . . . . . 11 ⊢ (𝑇 ∈ Word 𝐴 → ((𝑇 ++ 𝑈)‘(♯‘𝑇)) = ((𝑇 ++ 𝑈)‘(0 + (♯‘𝑇))))
146	145	3ad2ant1 1134	. . . . . . . . . 10 ⊢ ((𝑇 ∈ Word 𝐴 ∧ 𝑈 ∈ Word 𝐴 ∧ 0 ∈ (0..^(♯‘𝑈))) → ((𝑇 ++ 𝑈)‘(♯‘𝑇)) = ((𝑇 ++ 𝑈)‘(0 + (♯‘𝑇))))
147		ccatval3 14506	. . . . . . . . . 10 ⊢ ((𝑇 ∈ Word 𝐴 ∧ 𝑈 ∈ Word 𝐴 ∧ 0 ∈ (0..^(♯‘𝑈))) → ((𝑇 ++ 𝑈)‘(0 + (♯‘𝑇))) = (𝑈‘0))
148	146, 147	eqtrd 2772	. . . . . . . . 9 ⊢ ((𝑇 ∈ Word 𝐴 ∧ 𝑈 ∈ Word 𝐴 ∧ 0 ∈ (0..^(♯‘𝑈))) → ((𝑇 ++ 𝑈)‘(♯‘𝑇)) = (𝑈‘0))
149	82, 84, 141, 148	syl3anc 1374	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → ((𝑇 ++ 𝑈)‘(♯‘𝑇)) = (𝑈‘0))
150	112, 149	eqtrd 2772	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → ((𝑇 ++ 𝑈)‘𝑛) = (𝑈‘0))
151	80, 110, 150	3brtr4d 5131	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ (lastS‘𝑇) < (𝑈‘0)) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
152		chnccat.3	. . . . . . 7 ⊢ (𝜑 → (𝑇 = ∅ ∨ 𝑈 = ∅ ∨ (lastS‘𝑇) < (𝑈‘0)))
153	152	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑇 = ∅ ∨ 𝑈 = ∅ ∨ (lastS‘𝑇) < (𝑈‘0)))
154	58, 79, 151, 153	mpjao3dan 1435	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
155	154	adantlr 716	. . . 4 ⊢ (((𝜑 ∧ 𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0})) ∧ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
156		simpr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
157		eldifi 4084	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}))
158	157	eldifad 3914	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))))
159		elfzoelz 13579	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) → 𝑛 ∈ ℤ)
160	158, 159	syl 17	. . . . . . . . . 10 ⊢ (𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) → 𝑛 ∈ ℤ)
161		zcn 12497	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℤ → 𝑛 ∈ ℂ)
162	156, 160, 161	3syl 18	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ ℂ)
163		1cnd 11131	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 1 ∈ ℂ)
164	71	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑇) ∈ ℂ)
165	162, 163, 164	sub32d 11528	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑛 − 1) − (♯‘𝑇)) = ((𝑛 − (♯‘𝑇)) − 1))
166	165	fveq2d 6839	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑈‘((𝑛 − 1) − (♯‘𝑇))) = (𝑈‘((𝑛 − (♯‘𝑇)) − 1)))
167	3	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑈 ∈ ( < Chain 𝐴))
168	158	adantl 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))))
169		nn0z 12516	. . . . . . . . . . . . 13 ⊢ ((♯‘𝑈) ∈ ℕ₀ → (♯‘𝑈) ∈ ℤ)
170	4, 113, 169	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (♯‘𝑈) ∈ ℤ)
171	170	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (♯‘𝑈) ∈ ℤ)
172		fzosubel3 13646	. . . . . . . . . . 11 ⊢ ((𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∧ (♯‘𝑈) ∈ ℤ) → (𝑛 − (♯‘𝑇)) ∈ (0..^(♯‘𝑈)))
173	168, 171, 172	syl2anc 585	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 − (♯‘𝑇)) ∈ (0..^(♯‘𝑈)))
174		simpl 482	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝜑)
175	156	eldifad 3914	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}))
176	174, 175	jca 511	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})))
177		eldifi 4084	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) → 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))))
178	177, 159, 161	3syl 18	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) → 𝑛 ∈ ℂ)
179	178	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → 𝑛 ∈ ℂ)
180	71	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (♯‘𝑇) ∈ ℂ)
181		eldifsni 4747	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) → 𝑛 ≠ (♯‘𝑇))
182	181	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → 𝑛 ≠ (♯‘𝑇))
183	179, 180, 182	subne0d 11505	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (𝑛 − (♯‘𝑇)) ≠ 0)
184		nelsn 4624	. . . . . . . . . . 11 ⊢ ((𝑛 − (♯‘𝑇)) ≠ 0 → ¬ (𝑛 − (♯‘𝑇)) ∈ {0})
185	176, 183, 184	3syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ¬ (𝑛 − (♯‘𝑇)) ∈ {0})
186	173, 185	eldifd 3913	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 − (♯‘𝑇)) ∈ ((0..^(♯‘𝑈)) ∖ {0}))
187		eqidd 2738	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (♯‘𝑈) = (♯‘𝑈))
188	187, 4	wrdfd 14446	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑈:(0..^(♯‘𝑈))⟶𝐴)
189	188	fdmd 6673	. . . . . . . . . . . 12 ⊢ (𝜑 → dom 𝑈 = (0..^(♯‘𝑈)))
190	189	difeq1d 4078	. . . . . . . . . . 11 ⊢ (𝜑 → (dom 𝑈 ∖ {0}) = ((0..^(♯‘𝑈)) ∖ {0}))
191	190	eleq2d 2823	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑛 − (♯‘𝑇)) ∈ (dom 𝑈 ∖ {0}) ↔ (𝑛 − (♯‘𝑇)) ∈ ((0..^(♯‘𝑈)) ∖ {0})))
192	191	biimpar 477	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑛 − (♯‘𝑇)) ∈ ((0..^(♯‘𝑈)) ∖ {0})) → (𝑛 − (♯‘𝑇)) ∈ (dom 𝑈 ∖ {0}))
193	186, 192	syldan 592	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 − (♯‘𝑇)) ∈ (dom 𝑈 ∖ {0}))
194	167, 193	chnltm1 18536	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑈‘((𝑛 − (♯‘𝑇)) − 1)) < (𝑈‘(𝑛 − (♯‘𝑇))))
195	166, 194	eqbrtrd 5121	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑈‘((𝑛 − 1) − (♯‘𝑇))) < (𝑈‘(𝑛 − (♯‘𝑇))))
196	2	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑇 ∈ Word 𝐴)
197	4	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → 𝑈 ∈ Word 𝐴)
198	177, 159	syl 17	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) → 𝑛 ∈ ℤ)
199	198	adantl 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → 𝑛 ∈ ℤ)
200		nn0z 12516	. . . . . . . . . . . . 13 ⊢ ((♯‘𝑇) ∈ ℕ₀ → (♯‘𝑇) ∈ ℤ)
201	2, 29, 200	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (♯‘𝑇) ∈ ℤ)
202	201	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (♯‘𝑇) ∈ ℤ)
203	199, 202	jca 511	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ))
204		elfzole1 13587	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) → (♯‘𝑇) ≤ 𝑛)
205	177, 204	syl 17	. . . . . . . . . . 11 ⊢ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) → (♯‘𝑇) ≤ 𝑛)
206	205	adantl 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (♯‘𝑇) ≤ 𝑛)
207		eldifn 4085	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) → ¬ 𝑛 ∈ {(♯‘𝑇)})
208		velsn 4597	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ {(♯‘𝑇)} ↔ 𝑛 = (♯‘𝑇))
209	208	biimpri 228	. . . . . . . . . . . . . 14 ⊢ (𝑛 = (♯‘𝑇) → 𝑛 ∈ {(♯‘𝑇)})
210	209	necon3bi 2959	. . . . . . . . . . . . 13 ⊢ (¬ 𝑛 ∈ {(♯‘𝑇)} → 𝑛 ≠ (♯‘𝑇))
211	210	necomd 2988	. . . . . . . . . . . 12 ⊢ (¬ 𝑛 ∈ {(♯‘𝑇)} → (♯‘𝑇) ≠ 𝑛)
212	207, 211	syl 17	. . . . . . . . . . 11 ⊢ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) → (♯‘𝑇) ≠ 𝑛)
213	212	adantl 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (♯‘𝑇) ≠ 𝑛)
214		simp1r 1200	. . . . . . . . . . . . . 14 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (♯‘𝑇) ∈ ℤ)
215	214	zred 12600	. . . . . . . . . . . . 13 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (♯‘𝑇) ∈ ℝ)
216		simp1l 1199	. . . . . . . . . . . . . 14 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → 𝑛 ∈ ℤ)
217	216	zred 12600	. . . . . . . . . . . . 13 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → 𝑛 ∈ ℝ)
218		simp2 1138	. . . . . . . . . . . . 13 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (♯‘𝑇) ≤ 𝑛)
219		simp3 1139	. . . . . . . . . . . . . 14 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (♯‘𝑇) ≠ 𝑛)
220	219	necomd 2988	. . . . . . . . . . . . 13 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → 𝑛 ≠ (♯‘𝑇))
221	215, 217, 218, 220	leneltd 11291	. . . . . . . . . . . 12 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (♯‘𝑇) < 𝑛)
222		simp1 1137	. . . . . . . . . . . . . 14 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ))
223	222	ancomd 461	. . . . . . . . . . . . 13 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → ((♯‘𝑇) ∈ ℤ ∧ 𝑛 ∈ ℤ))
224		zltp1le 12545	. . . . . . . . . . . . 13 ⊢ (((♯‘𝑇) ∈ ℤ ∧ 𝑛 ∈ ℤ) → ((♯‘𝑇) < 𝑛 ↔ ((♯‘𝑇) + 1) ≤ 𝑛))
225	223, 224	syl 17	. . . . . . . . . . . 12 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → ((♯‘𝑇) < 𝑛 ↔ ((♯‘𝑇) + 1) ≤ 𝑛))
226	221, 225	mpbid 232	. . . . . . . . . . 11 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → ((♯‘𝑇) + 1) ≤ 𝑛)
227		peano2re 11310	. . . . . . . . . . . . . 14 ⊢ ((♯‘𝑇) ∈ ℝ → ((♯‘𝑇) + 1) ∈ ℝ)
228	215, 227	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → ((♯‘𝑇) + 1) ∈ ℝ)
229		1red 11137	. . . . . . . . . . . . 13 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → 1 ∈ ℝ)
230	228, 217, 229	lesub1d 11748	. . . . . . . . . . . 12 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (((♯‘𝑇) + 1) ≤ 𝑛 ↔ (((♯‘𝑇) + 1) − 1) ≤ (𝑛 − 1)))
231		zcn 12497	. . . . . . . . . . . . . . . 16 ⊢ ((♯‘𝑇) ∈ ℤ → (♯‘𝑇) ∈ ℂ)
232		1cnd 11131	. . . . . . . . . . . . . . . 16 ⊢ ((♯‘𝑇) ∈ ℤ → 1 ∈ ℂ)
233	231, 232	pncand 11497	. . . . . . . . . . . . . . 15 ⊢ ((♯‘𝑇) ∈ ℤ → (((♯‘𝑇) + 1) − 1) = (♯‘𝑇))
234	233	adantl 481	. . . . . . . . . . . . . 14 ⊢ ((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) → (((♯‘𝑇) + 1) − 1) = (♯‘𝑇))
235	234	3ad2ant1 1134	. . . . . . . . . . . . 13 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (((♯‘𝑇) + 1) − 1) = (♯‘𝑇))
236	235	breq1d 5109	. . . . . . . . . . . 12 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → ((((♯‘𝑇) + 1) − 1) ≤ (𝑛 − 1) ↔ (♯‘𝑇) ≤ (𝑛 − 1)))
237	230, 236	bitrd 279	. . . . . . . . . . 11 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (((♯‘𝑇) + 1) ≤ 𝑛 ↔ (♯‘𝑇) ≤ (𝑛 − 1)))
238	226, 237	mpbid 232	. . . . . . . . . 10 ⊢ (((𝑛 ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ) ∧ (♯‘𝑇) ≤ 𝑛 ∧ (♯‘𝑇) ≠ 𝑛) → (♯‘𝑇) ≤ (𝑛 − 1))
239	203, 206, 213, 238	syl3anc 1374	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (♯‘𝑇) ≤ (𝑛 − 1))
240	199	zred 12600	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → 𝑛 ∈ ℝ)
241		peano2rem 11452	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℝ → (𝑛 − 1) ∈ ℝ)
242	240, 241	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (𝑛 − 1) ∈ ℝ)
243	201, 170	zaddcld 12604	. . . . . . . . . . . 12 ⊢ (𝜑 → ((♯‘𝑇) + (♯‘𝑈)) ∈ ℤ)
244	243	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → ((♯‘𝑇) + (♯‘𝑈)) ∈ ℤ)
245	244	zred 12600	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → ((♯‘𝑇) + (♯‘𝑈)) ∈ ℝ)
246	240	ltm1d 12078	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (𝑛 − 1) < 𝑛)
247		elfzolt2 13588	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) → 𝑛 < ((♯‘𝑇) + (♯‘𝑈)))
248	177, 247	syl 17	. . . . . . . . . . 11 ⊢ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) → 𝑛 < ((♯‘𝑇) + (♯‘𝑈)))
249	248	adantl 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → 𝑛 < ((♯‘𝑇) + (♯‘𝑈)))
250	242, 240, 245, 246, 249	lttrd 11298	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (𝑛 − 1) < ((♯‘𝑇) + (♯‘𝑈)))
251		peano2zm 12538	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℤ → (𝑛 − 1) ∈ ℤ)
252	199, 251	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (𝑛 − 1) ∈ ℤ)
253		elfzo 13581	. . . . . . . . . 10 ⊢ (((𝑛 − 1) ∈ ℤ ∧ (♯‘𝑇) ∈ ℤ ∧ ((♯‘𝑇) + (♯‘𝑈)) ∈ ℤ) → ((𝑛 − 1) ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ↔ ((♯‘𝑇) ≤ (𝑛 − 1) ∧ (𝑛 − 1) < ((♯‘𝑇) + (♯‘𝑈)))))
254	252, 202, 244, 253	syl3anc 1374	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → ((𝑛 − 1) ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ↔ ((♯‘𝑇) ≤ (𝑛 − 1) ∧ (𝑛 − 1) < ((♯‘𝑇) + (♯‘𝑈)))))
255	239, 250, 254	mpbir2and 714	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})) → (𝑛 − 1) ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))))
256	157, 255	sylan2 594	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 − 1) ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))))
257		ccatval2 14505	. . . . . . 7 ⊢ ((𝑇 ∈ Word 𝐴 ∧ 𝑈 ∈ Word 𝐴 ∧ (𝑛 − 1) ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) = (𝑈‘((𝑛 − 1) − (♯‘𝑇))))
258	196, 197, 256, 257	syl3anc 1374	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) = (𝑈‘((𝑛 − 1) − (♯‘𝑇))))
259		ccatval2 14505	. . . . . . 7 ⊢ ((𝑇 ∈ Word 𝐴 ∧ 𝑈 ∈ Word 𝐴 ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → ((𝑇 ++ 𝑈)‘𝑛) = (𝑈‘(𝑛 − (♯‘𝑇))))
260	196, 197, 168, 259	syl3anc 1374	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘𝑛) = (𝑈‘(𝑛 − (♯‘𝑇))))
261	195, 258, 260	3brtr4d 5131	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
262	261	adantlr 716	. . . 4 ⊢ (((𝜑 ∧ 𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0})) ∧ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
263		ccatlen 14502	. . . . . . . . . . . . . 14 ⊢ ((𝑇 ∈ Word 𝐴 ∧ 𝑈 ∈ Word 𝐴) → (♯‘(𝑇 ++ 𝑈)) = ((♯‘𝑇) + (♯‘𝑈)))
264	2, 4, 263	syl2anc 585	. . . . . . . . . . . . 13 ⊢ (𝜑 → (♯‘(𝑇 ++ 𝑈)) = ((♯‘𝑇) + (♯‘𝑈)))
265	264	eqcomd 2743	. . . . . . . . . . . 12 ⊢ (𝜑 → ((♯‘𝑇) + (♯‘𝑈)) = (♯‘(𝑇 ++ 𝑈)))
266	265, 6	wrdfd 14446	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑇 ++ 𝑈):(0..^((♯‘𝑇) + (♯‘𝑈)))⟶𝐴)
267	266	fdmd 6673	. . . . . . . . . 10 ⊢ (𝜑 → dom (𝑇 ++ 𝑈) = (0..^((♯‘𝑇) + (♯‘𝑈))))
268	267	difeq1d 4078	. . . . . . . . 9 ⊢ (𝜑 → (dom (𝑇 ++ 𝑈) ∖ {0}) = ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}))
269		fzonel 13593	. . . . . . . . . . . 12 ⊢ ¬ ((♯‘𝑇) + (♯‘𝑈)) ∈ (0..^((♯‘𝑇) + (♯‘𝑈)))
270		simpr 484	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((♯‘𝑇) + (♯‘𝑈)) ∈ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0})) → ((♯‘𝑇) + (♯‘𝑈)) ∈ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}))
271	270	eldifad 3914	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((♯‘𝑇) + (♯‘𝑈)) ∈ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0})) → ((♯‘𝑇) + (♯‘𝑈)) ∈ (0..^((♯‘𝑇) + (♯‘𝑈))))
272	271	ex 412	. . . . . . . . . . . 12 ⊢ (𝜑 → (((♯‘𝑇) + (♯‘𝑈)) ∈ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) → ((♯‘𝑇) + (♯‘𝑈)) ∈ (0..^((♯‘𝑇) + (♯‘𝑈)))))
273	269, 272	mtoi 199	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ ((♯‘𝑇) + (♯‘𝑈)) ∈ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}))
274		difsn 4755	. . . . . . . . . . . 12 ⊢ (¬ ((♯‘𝑇) + (♯‘𝑈)) ∈ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) → (((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) ∖ {((♯‘𝑇) + (♯‘𝑈))}) = ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}))
275	274	eqcomd 2743	. . . . . . . . . . 11 ⊢ (¬ ((♯‘𝑇) + (♯‘𝑈)) ∈ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) → ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) = (((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) ∖ {((♯‘𝑇) + (♯‘𝑈))}))
276	273, 275	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) = (((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) ∖ {((♯‘𝑇) + (♯‘𝑈))}))
277		difpr 4760	. . . . . . . . . 10 ⊢ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) = (((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) ∖ {((♯‘𝑇) + (♯‘𝑈))})
278	276, 277	eqtr4di 2790	. . . . . . . . 9 ⊢ (𝜑 → ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0}) = ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
279	268, 278	eqtrd 2772	. . . . . . . 8 ⊢ (𝜑 → (dom (𝑇 ++ 𝑈) ∖ {0}) = ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
280	279	eleq2d 2823	. . . . . . 7 ⊢ (𝜑 → (𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0}) ↔ 𝑛 ∈ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})))
281		eldif 3912	. . . . . . 7 ⊢ (𝑛 ∈ ((0..^((♯‘𝑇) + (♯‘𝑈))) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ↔ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))}))
282	280, 281	bitrdi 287	. . . . . 6 ⊢ (𝜑 → (𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0}) ↔ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})))
283		simpr 484	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ (0..^(♯‘𝑇))) → 𝑛 ∈ (0..^(♯‘𝑇)))
284		simplrr 778	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ (0..^(♯‘𝑇))) → ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})
285	283, 284	eldifd 3913	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ (0..^(♯‘𝑇))) → 𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))
286	285	orcd 874	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ (0..^(♯‘𝑇))) → (𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))))
287		exmidd 896	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (𝑛 ∈ {(♯‘𝑇)} ∨ ¬ 𝑛 ∈ {(♯‘𝑇)}))
288		idd 24	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (𝑛 ∈ {(♯‘𝑇)} → 𝑛 ∈ {(♯‘𝑇)}))
289		simplrr 778	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})
290	288, 289	jctird 526	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (𝑛 ∈ {(♯‘𝑇)} → (𝑛 ∈ {(♯‘𝑇)} ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})))
291		eldif 3912	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ↔ (𝑛 ∈ {(♯‘𝑇)} ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))}))
292	290, 291	imbitrrdi 252	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (𝑛 ∈ {(♯‘𝑇)} → 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})))
293		idd 24	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (¬ 𝑛 ∈ {(♯‘𝑇)} → ¬ 𝑛 ∈ {(♯‘𝑇)}))
294		simpr 484	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))))
295	293, 294	jctild 525	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (¬ 𝑛 ∈ {(♯‘𝑇)} → (𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {(♯‘𝑇)})))
296		eldif 3912	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ↔ (𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {(♯‘𝑇)}))
297	295, 296	imbitrrdi 252	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (¬ 𝑛 ∈ {(♯‘𝑇)} → 𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)})))
298	297, 289	jctird 526	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (¬ 𝑛 ∈ {(♯‘𝑇)} → (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})))
299		eldif 3912	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ↔ (𝑛 ∈ (((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))}))
300	298, 299	imbitrrdi 252	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (¬ 𝑛 ∈ {(♯‘𝑇)} → 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})))
301	292, 300	orim12d 967	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → ((𝑛 ∈ {(♯‘𝑇)} ∨ ¬ 𝑛 ∈ {(♯‘𝑇)}) → (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))))
302	287, 301	mpd 15	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})))
303	302	olcd 875	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) ∧ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))) → (𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))))
304	201	anim1ci 617	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈)))) → (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ (♯‘𝑇) ∈ ℤ))
305	304	adantrr 718	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ (♯‘𝑇) ∈ ℤ))
306		fzospliti 13611	. . . . . . . 8 ⊢ ((𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ (♯‘𝑇) ∈ ℤ) → (𝑛 ∈ (0..^(♯‘𝑇)) ∨ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))))
307	305, 306	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 ∈ (0..^(♯‘𝑇)) ∨ 𝑛 ∈ ((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈)))))
308	286, 303, 307	mpjaodan 961	. . . . . 6 ⊢ ((𝜑 ∧ (𝑛 ∈ (0..^((♯‘𝑇) + (♯‘𝑈))) ∧ ¬ 𝑛 ∈ {0, ((♯‘𝑇) + (♯‘𝑈))})) → (𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))))
309	282, 308	sylbida 593	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0})) → (𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))))
310		3orass 1090	. . . . 5 ⊢ ((𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})) ↔ (𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ (𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}))))
311	309, 310	sylibr 234	. . . 4 ⊢ ((𝜑 ∧ 𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0})) → (𝑛 ∈ ((0..^(♯‘𝑇)) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ({(♯‘𝑇)} ∖ {0, ((♯‘𝑇) + (♯‘𝑈))}) ∨ 𝑛 ∈ ((((♯‘𝑇)..^((♯‘𝑇) + (♯‘𝑈))) ∖ {(♯‘𝑇)}) ∖ {0, ((♯‘𝑇) + (♯‘𝑈))})))
312	40, 155, 262, 311	mpjao3dan 1435	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0})) → ((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
313	312	ralrimiva 3129	. 2 ⊢ (𝜑 → ∀𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0})((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛))
314		ischn 18534	. 2 ⊢ ((𝑇 ++ 𝑈) ∈ ( < Chain 𝐴) ↔ ((𝑇 ++ 𝑈) ∈ Word 𝐴 ∧ ∀𝑛 ∈ (dom (𝑇 ++ 𝑈) ∖ {0})((𝑇 ++ 𝑈)‘(𝑛 − 1)) < ((𝑇 ++ 𝑈)‘𝑛)))
315	6, 313, 314	sylanbrc 584	1 ⊢ (𝜑 → (𝑇 ++ 𝑈) ∈ ( < Chain 𝐴))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∨ wo 848 ∨ w3o 1086 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 ≠ wne 2933 ∀wral 3052 Vcvv 3441 ∖ cdif 3899 ⊆ wss 3902 ∅c0 4286 {csn 4581 {cpr 4583 class class class wbr 5099 dom cdm 5625 ‘cfv 6493 (class class class)co 7360 ℂcc 11028 ℝcr 11029 0cc0 11030 1c1 11031 + caddc 11033 < clt 11170 ≤ cle 11171 − cmin 11368 ℕcn 12149 ℕ₀cn0 12405 ℤcz 12492 ..^cfzo 13574 ♯chash 14257 Word cword 14440 lastSclsw 14489 ++ cconcat 14497 Chain cchn 18532

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5225 ax-sep 5242 ax-nul 5252 ax-pow 5311 ax-pr 5378 ax-un 7682 ax-cnex 11086 ax-resscn 11087 ax-1cn 11088 ax-icn 11089 ax-addcl 11090 ax-addrcl 11091 ax-mulcl 11092 ax-mulrcl 11093 ax-mulcom 11094 ax-addass 11095 ax-mulass 11096 ax-distr 11097 ax-i2m1 11098 ax-1ne0 11099 ax-1rid 11100 ax-rnegex 11101 ax-rrecex 11102 ax-cnre 11103 ax-pre-lttri 11104 ax-pre-lttrn 11105 ax-pre-ltadd 11106 ax-pre-mulgt0 11107

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3062 df-reu 3352 df-rab 3401 df-v 3443 df-sbc 3742 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4287 df-if 4481 df-pw 4557 df-sn 4582 df-pr 4584 df-op 4588 df-uni 4865 df-int 4904 df-iun 4949 df-br 5100 df-opab 5162 df-mpt 5181 df-tr 5207 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 6260 df-ord 6321 df-on 6322 df-lim 6323 df-suc 6324 df-iota 6449 df-fun 6495 df-fn 6496 df-f 6497 df-f1 6498 df-fo 6499 df-f1o 6500 df-fv 6501 df-riota 7317 df-ov 7363 df-oprab 7364 df-mpo 7365 df-om 7811 df-1st 7935 df-2nd 7936 df-frecs 8225 df-wrecs 8256 df-recs 8305 df-rdg 8343 df-1o 8399 df-er 8637 df-en 8888 df-dom 8889 df-sdom 8890 df-fin 8891 df-card 9855 df-pnf 11172 df-mnf 11173 df-xr 11174 df-ltxr 11175 df-le 11176 df-sub 11370 df-neg 11371 df-nn 12150 df-n0 12406 df-z 12493 df-uz 12756 df-fz 13428 df-fzo 13575 df-hash 14258 df-word 14441 df-lsw 14490 df-concat 14498 df-chn 18533

This theorem is referenced by: (None)

W3C validator