ccatf1 - Metamath Proof Explorer

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

Theorem ccatf1 14741

Description: Conditions for a concatenation to be injective. (Contributed by Thierry Arnoux, 11-Dec-2023.)

**Hypotheses**
Ref	Expression
ccatf1.s	⊢ (𝜑 → 𝑆 ∈ 𝑉)
ccatf1.a	⊢ (𝜑 → 𝐴 ∈ Word 𝑆)
ccatf1.b	⊢ (𝜑 → 𝐵 ∈ Word 𝑆)
ccatf1.1	⊢ (𝜑 → 𝐴:dom 𝐴–1-1→𝑆)
ccatf1.2	⊢ (𝜑 → 𝐵:dom 𝐵–1-1→𝑆)
ccatf1.3	⊢ (𝜑 → (ran 𝐴 ∩ ran 𝐵) = ∅)

**Assertion**
Ref	Expression
ccatf1	⊢ (𝜑 → (𝐴 ++ 𝐵):dom (𝐴 ++ 𝐵)–1-1→𝑆)

Proof of Theorem ccatf1 Dummy variables 𝑖 𝑗 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ccatf1.a	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ Word 𝑆)
2		ccatf1.b	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ Word 𝑆)
3		ccatcl 14724	. . . . 5 ⊢ ((𝐴 ∈ Word 𝑆 ∧ 𝐵 ∈ Word 𝑆) → (𝐴 ++ 𝐵) ∈ Word 𝑆)
4	1, 2, 3	syl2anc 596	. . . 4 ⊢ (𝜑 → (𝐴 ++ 𝐵) ∈ Word 𝑆)
5		wrdf 14668	. . . 4 ⊢ ((𝐴 ++ 𝐵) ∈ Word 𝑆 → (𝐴 ++ 𝐵):(0..^(♯‘(𝐴 ++ 𝐵)))⟶𝑆)
6	4, 5	syl 18	. . 3 ⊢ (𝜑 → (𝐴 ++ 𝐵):(0..^(♯‘(𝐴 ++ 𝐵)))⟶𝑆)
7	6	ffdmd 6743	. 2 ⊢ (𝜑 → (𝐴 ++ 𝐵):dom (𝐴 ++ 𝐵)⟶𝑆)
8		simpllr 788	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗))
9		id 23	. . . . . . . . . . . . . 14 ⊢ (𝑖 ∈ (0..^(♯‘𝐴)) → 𝑖 ∈ (0..^(♯‘𝐴)))
10		ccatval1 14727	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ Word 𝑆 ∧ 𝐵 ∈ Word 𝑆 ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑖) = (𝐴‘𝑖))
11	1, 2, 9, 10	syl2an3an 1449	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑖) = (𝐴‘𝑖))
12	11	ad4ant13 764	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑖) = (𝐴‘𝑖))
13		id 23	. . . . . . . . . . . . . 14 ⊢ (𝑗 ∈ (0..^(♯‘𝐴)) → 𝑗 ∈ (0..^(♯‘𝐴)))
14		ccatval1 14727	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ Word 𝑆 ∧ 𝐵 ∈ Word 𝑆 ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑗) = (𝐴‘𝑗))
15	1, 2, 13, 14	syl2an3an 1449	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑗) = (𝐴‘𝑗))
16	15	ad4ant14 765	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑗) = (𝐴‘𝑗))
17	8, 12, 16	3eqtr3d 2803	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → (𝐴‘𝑖) = (𝐴‘𝑗))
18		wrddm 14671	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ Word 𝑆 → dom 𝐴 = (0..^(♯‘𝐴)))
19	1, 18	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → dom 𝐴 = (0..^(♯‘𝐴)))
20		ccatf1.1	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐴:dom 𝐴–1-1→𝑆)
21		f1eq2 6777	. . . . . . . . . . . . . . . . 17 ⊢ (dom 𝐴 = (0..^(♯‘𝐴)) → (𝐴:dom 𝐴–1-1→𝑆 ↔ 𝐴:(0..^(♯‘𝐴))–1-1→𝑆))
22	21	biimpa 482	. . . . . . . . . . . . . . . 16 ⊢ ((dom 𝐴 = (0..^(♯‘𝐴)) ∧ 𝐴:dom 𝐴–1-1→𝑆) → 𝐴:(0..^(♯‘𝐴))–1-1→𝑆)
23	19, 20, 22	syl2anc 596	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐴:(0..^(♯‘𝐴))–1-1→𝑆)
24		dff13 7260	. . . . . . . . . . . . . . . 16 ⊢ (𝐴:(0..^(♯‘𝐴))–1-1→𝑆 ↔ (𝐴:(0..^(♯‘𝐴))⟶𝑆 ∧ ∀𝑖 ∈ (0..^(♯‘𝐴))∀𝑗 ∈ (0..^(♯‘𝐴))((𝐴‘𝑖) = (𝐴‘𝑗) → 𝑖 = 𝑗)))
25	24	simprbi 503	. . . . . . . . . . . . . . 15 ⊢ (𝐴:(0..^(♯‘𝐴))–1-1→𝑆 → ∀𝑖 ∈ (0..^(♯‘𝐴))∀𝑗 ∈ (0..^(♯‘𝐴))((𝐴‘𝑖) = (𝐴‘𝑗) → 𝑖 = 𝑗))
26	23, 25	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∀𝑖 ∈ (0..^(♯‘𝐴))∀𝑗 ∈ (0..^(♯‘𝐴))((𝐴‘𝑖) = (𝐴‘𝑗) → 𝑖 = 𝑗))
27	26	r19.21bi 3254	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → ∀𝑗 ∈ (0..^(♯‘𝐴))((𝐴‘𝑖) = (𝐴‘𝑗) → 𝑖 = 𝑗))
28	27	r19.21bi 3254	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴‘𝑖) = (𝐴‘𝑗) → 𝑖 = 𝑗))
29	28	adantllr 732	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴‘𝑖) = (𝐴‘𝑗) → 𝑖 = 𝑗))
30	17, 29	mpd 16	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → 𝑖 = 𝑗)
31	30	ex 418	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → (𝑗 ∈ (0..^(♯‘𝐴)) → 𝑖 = 𝑗))
32	31	adantllr 732	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → (𝑗 ∈ (0..^(♯‘𝐴)) → 𝑖 = 𝑗))
33		f1fun 6783	. . . . . . . . . . . . . . . 16 ⊢ (𝐴:dom 𝐴–1-1→𝑆 → Fun 𝐴)
34	20, 33	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → Fun 𝐴)
35		simpr 490	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → 𝑖 ∈ (0..^(♯‘𝐴)))
36	19	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → dom 𝐴 = (0..^(♯‘𝐴)))
37	35, 36	eleqtrrd 2863	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → 𝑖 ∈ dom 𝐴)
38		fvelrn 7079	. . . . . . . . . . . . . . 15 ⊢ ((Fun 𝐴 ∧ 𝑖 ∈ dom 𝐴) → (𝐴‘𝑖) ∈ ran 𝐴)
39	34, 37, 38	syl2an2r 698	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → (𝐴‘𝑖) ∈ ran 𝐴)
40	39	ad4ant13 764	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝐴‘𝑖) ∈ ran 𝐴)
41		simpllr 788	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗))
42	11	ad4ant13 764	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((𝐴 ++ 𝐵)‘𝑖) = (𝐴‘𝑖))
43	1	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝐴 ∈ Word 𝑆)
44	2	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝐵 ∈ Word 𝑆)
45		simpr 490	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))))
46		ccatlen 14725	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐴 ∈ Word 𝑆 ∧ 𝐵 ∈ Word 𝑆) → (♯‘(𝐴 ++ 𝐵)) = ((♯‘𝐴) + (♯‘𝐵)))
47	1, 2, 46	syl2anc 596	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (♯‘(𝐴 ++ 𝐵)) = ((♯‘𝐴) + (♯‘𝐵)))
48	47	oveq2d 7438	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) = ((♯‘𝐴)..^((♯‘𝐴) + (♯‘𝐵))))
49	48	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) = ((♯‘𝐴)..^((♯‘𝐴) + (♯‘𝐵))))
50	45, 49	eleqtrd 2862	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝑗 ∈ ((♯‘𝐴)..^((♯‘𝐴) + (♯‘𝐵))))
51		ccatval2 14728	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ Word 𝑆 ∧ 𝐵 ∈ Word 𝑆 ∧ 𝑗 ∈ ((♯‘𝐴)..^((♯‘𝐴) + (♯‘𝐵)))) → ((𝐴 ++ 𝐵)‘𝑗) = (𝐵‘(𝑗 − (♯‘𝐴))))
52	43, 44, 50, 51	syl3anc 1398	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((𝐴 ++ 𝐵)‘𝑗) = (𝐵‘(𝑗 − (♯‘𝐴))))
53	52	ad4ant14 765	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((𝐴 ++ 𝐵)‘𝑗) = (𝐵‘(𝑗 − (♯‘𝐴))))
54	41, 42, 53	3eqtr3d 2803	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝐴‘𝑖) = (𝐵‘(𝑗 − (♯‘𝐴))))
55		ccatf1.2	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐵:dom 𝐵–1-1→𝑆)
56		f1fun 6783	. . . . . . . . . . . . . . . . 17 ⊢ (𝐵:dom 𝐵–1-1→𝑆 → Fun 𝐵)
57	55, 56	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → Fun 𝐵)
58		lencl 14683	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐵 ∈ Word 𝑆 → (♯‘𝐵) ∈ ℕ₀)
59	2, 58	syl 18	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (♯‘𝐵) ∈ ℕ₀)
60	59	nn0zd 12723	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (♯‘𝐵) ∈ ℤ)
61	60	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (♯‘𝐵) ∈ ℤ)
62		fzosubel3 13866	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑗 ∈ ((♯‘𝐴)..^((♯‘𝐴) + (♯‘𝐵))) ∧ (♯‘𝐵) ∈ ℤ) → (𝑗 − (♯‘𝐴)) ∈ (0..^(♯‘𝐵)))
63	50, 61, 62	syl2anc 596	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑗 − (♯‘𝐴)) ∈ (0..^(♯‘𝐵)))
64		wrddm 14671	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐵 ∈ Word 𝑆 → dom 𝐵 = (0..^(♯‘𝐵)))
65	2, 64	syl 18	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → dom 𝐵 = (0..^(♯‘𝐵)))
66	65	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → dom 𝐵 = (0..^(♯‘𝐵)))
67	63, 66	eleqtrrd 2863	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑗 − (♯‘𝐴)) ∈ dom 𝐵)
68		fvelrn 7079	. . . . . . . . . . . . . . . 16 ⊢ ((Fun 𝐵 ∧ (𝑗 − (♯‘𝐴)) ∈ dom 𝐵) → (𝐵‘(𝑗 − (♯‘𝐴))) ∈ ran 𝐵)
69	57, 67, 68	syl2an2r 698	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝐵‘(𝑗 − (♯‘𝐴))) ∈ ran 𝐵)
70	69	ad4ant14 765	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝐵‘(𝑗 − (♯‘𝐴))) ∈ ran 𝐵)
71	54, 70	eqeltrd 2860	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝐴‘𝑖) ∈ ran 𝐵)
72	40, 71	elind 4096	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝐴‘𝑖) ∈ (ran 𝐴 ∩ ran 𝐵))
73		ccatf1.3	. . . . . . . . . . . . 13 ⊢ (𝜑 → (ran 𝐴 ∩ ran 𝐵) = ∅)
74	73	ad3antrrr 743	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (ran 𝐴 ∩ ran 𝐵) = ∅)
75	72, 74	eleqtrd 2862	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝐴‘𝑖) ∈ ∅)
76		noel 4282	. . . . . . . . . . . 12 ⊢ ¬ (𝐴‘𝑖) ∈ ∅
77	76	a1i 11	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ¬ (𝐴‘𝑖) ∈ ∅)
78	75, 77	pm2.21dd 198	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝑖 = 𝑗)
79	78	ex 418	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → (𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑖 = 𝑗))
80	79	adantllr 732	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → (𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑖 = 𝑗))
81		wrddm 14671	. . . . . . . . . . . . 13 ⊢ ((𝐴 ++ 𝐵) ∈ Word 𝑆 → dom (𝐴 ++ 𝐵) = (0..^(♯‘(𝐴 ++ 𝐵))))
82	4, 81	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → dom (𝐴 ++ 𝐵) = (0..^(♯‘(𝐴 ++ 𝐵))))
83	82	eleq2d 2846	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 ∈ dom (𝐴 ++ 𝐵) ↔ 𝑗 ∈ (0..^(♯‘(𝐴 ++ 𝐵)))))
84	83	biimpa 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) → 𝑗 ∈ (0..^(♯‘(𝐴 ++ 𝐵))))
85		lencl 14683	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ Word 𝑆 → (♯‘𝐴) ∈ ℕ₀)
86	1, 85	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (♯‘𝐴) ∈ ℕ₀)
87	86	nn0zd 12723	. . . . . . . . . . 11 ⊢ (𝜑 → (♯‘𝐴) ∈ ℤ)
88	87	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) → (♯‘𝐴) ∈ ℤ)
89		fzospliti 13831	. . . . . . . . . 10 ⊢ ((𝑗 ∈ (0..^(♯‘(𝐴 ++ 𝐵))) ∧ (♯‘𝐴) ∈ ℤ) → (𝑗 ∈ (0..^(♯‘𝐴)) ∨ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))))
90	84, 88, 89	syl2anc 596	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) → (𝑗 ∈ (0..^(♯‘𝐴)) ∨ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))))
91	90	ad2antrr 739	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → (𝑗 ∈ (0..^(♯‘𝐴)) ∨ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))))
92	32, 80, 91	mpjaod 874	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ (0..^(♯‘𝐴))) → 𝑖 = 𝑗)
93	92	ex 418	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) → (𝑖 ∈ (0..^(♯‘𝐴)) → 𝑖 = 𝑗))
94	93	adantlrl 733	. . . . 5 ⊢ (((𝜑 ∧ (𝑖 ∈ dom (𝐴 ++ 𝐵) ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵))) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) → (𝑖 ∈ (0..^(♯‘𝐴)) → 𝑖 = 𝑗))
95		simpr 490	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → 𝑗 ∈ (0..^(♯‘𝐴)))
96	19	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → dom 𝐴 = (0..^(♯‘𝐴)))
97	95, 96	eleqtrrd 2863	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → 𝑗 ∈ dom 𝐴)
98		fvelrn 7079	. . . . . . . . . . . . . . 15 ⊢ ((Fun 𝐴 ∧ 𝑗 ∈ dom 𝐴) → (𝐴‘𝑗) ∈ ran 𝐴)
99	34, 97, 98	syl2an2r 698	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → (𝐴‘𝑗) ∈ ran 𝐴)
100	99	ad4ant14 765	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → (𝐴‘𝑗) ∈ ran 𝐴)
101		simpllr 788	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗))
102	1	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝐴 ∈ Word 𝑆)
103	2	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝐵 ∈ Word 𝑆)
104		simpr 490	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))))
105	48	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) = ((♯‘𝐴)..^((♯‘𝐴) + (♯‘𝐵))))
106	104, 105	eleqtrd 2862	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝑖 ∈ ((♯‘𝐴)..^((♯‘𝐴) + (♯‘𝐵))))
107		ccatval2 14728	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ Word 𝑆 ∧ 𝐵 ∈ Word 𝑆 ∧ 𝑖 ∈ ((♯‘𝐴)..^((♯‘𝐴) + (♯‘𝐵)))) → ((𝐴 ++ 𝐵)‘𝑖) = (𝐵‘(𝑖 − (♯‘𝐴))))
108	102, 103, 106, 107	syl3anc 1398	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((𝐴 ++ 𝐵)‘𝑖) = (𝐵‘(𝑖 − (♯‘𝐴))))
109	108	ad4ant13 764	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑖) = (𝐵‘(𝑖 − (♯‘𝐴))))
110	15	ad4ant14 765	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ((𝐴 ++ 𝐵)‘𝑗) = (𝐴‘𝑗))
111	101, 109, 110	3eqtr3rd 2804	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → (𝐴‘𝑗) = (𝐵‘(𝑖 − (♯‘𝐴))))
112	60	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (♯‘𝐵) ∈ ℤ)
113		fzosubel3 13866	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑖 ∈ ((♯‘𝐴)..^((♯‘𝐴) + (♯‘𝐵))) ∧ (♯‘𝐵) ∈ ℤ) → (𝑖 − (♯‘𝐴)) ∈ (0..^(♯‘𝐵)))
114	106, 112, 113	syl2anc 596	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑖 − (♯‘𝐴)) ∈ (0..^(♯‘𝐵)))
115	65	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → dom 𝐵 = (0..^(♯‘𝐵)))
116	114, 115	eleqtrrd 2863	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑖 − (♯‘𝐴)) ∈ dom 𝐵)
117		fvelrn 7079	. . . . . . . . . . . . . . . 16 ⊢ ((Fun 𝐵 ∧ (𝑖 − (♯‘𝐴)) ∈ dom 𝐵) → (𝐵‘(𝑖 − (♯‘𝐴))) ∈ ran 𝐵)
118	57, 116, 117	syl2an2r 698	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝐵‘(𝑖 − (♯‘𝐴))) ∈ ran 𝐵)
119	118	ad4ant13 764	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → (𝐵‘(𝑖 − (♯‘𝐴))) ∈ ran 𝐵)
120	111, 119	eqeltrd 2860	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → (𝐴‘𝑗) ∈ ran 𝐵)
121	100, 120	elind 4096	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → (𝐴‘𝑗) ∈ (ran 𝐴 ∩ ran 𝐵))
122	73	ad3antrrr 743	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → (ran 𝐴 ∩ ran 𝐵) = ∅)
123	121, 122	eleqtrd 2862	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → (𝐴‘𝑗) ∈ ∅)
124		noel 4282	. . . . . . . . . . . 12 ⊢ ¬ (𝐴‘𝑗) ∈ ∅
125	124	a1i 11	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → ¬ (𝐴‘𝑗) ∈ ∅)
126	123, 125	pm2.21dd 198	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ (0..^(♯‘𝐴))) → 𝑖 = 𝑗)
127	126	ex 418	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑗 ∈ (0..^(♯‘𝐴)) → 𝑖 = 𝑗))
128	127	adantllr 732	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑗 ∈ (0..^(♯‘𝐴)) → 𝑖 = 𝑗))
129		elfzoelz 13798	. . . . . . . . . . . . 13 ⊢ (𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑖 ∈ ℤ)
130	129	zcnd 12809	. . . . . . . . . . . 12 ⊢ (𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑖 ∈ ℂ)
131	130	ad2antlr 740	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝑖 ∈ ℂ)
132		elfzoelz 13798	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑗 ∈ ℤ)
133	132	zcnd 12809	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑗 ∈ ℂ)
134	133	adantl 487	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝑗 ∈ ℂ)
135	86	nn0cnd 12674	. . . . . . . . . . . 12 ⊢ (𝜑 → (♯‘𝐴) ∈ ℂ)
136	135	ad3antrrr 743	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (♯‘𝐴) ∈ ℂ)
137	55	ad3antrrr 743	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝐵:dom 𝐵–1-1→𝑆)
138	116	ad4ant13 764	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑖 − (♯‘𝐴)) ∈ dom 𝐵)
139	67	ad4ant14 765	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑗 − (♯‘𝐴)) ∈ dom 𝐵)
140	138, 139	jca 521	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((𝑖 − (♯‘𝐴)) ∈ dom 𝐵 ∧ (𝑗 − (♯‘𝐴)) ∈ dom 𝐵))
141		simpllr 788	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗))
142	108	ad4ant13 764	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((𝐴 ++ 𝐵)‘𝑖) = (𝐵‘(𝑖 − (♯‘𝐴))))
143	52	ad4ant14 765	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → ((𝐴 ++ 𝐵)‘𝑗) = (𝐵‘(𝑗 − (♯‘𝐴))))
144	141, 142, 143	3eqtr3d 2803	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝐵‘(𝑖 − (♯‘𝐴))) = (𝐵‘(𝑗 − (♯‘𝐴))))
145		f1veqaeq 7262	. . . . . . . . . . . . 13 ⊢ ((𝐵:dom 𝐵–1-1→𝑆 ∧ ((𝑖 − (♯‘𝐴)) ∈ dom 𝐵 ∧ (𝑗 − (♯‘𝐴)) ∈ dom 𝐵)) → ((𝐵‘(𝑖 − (♯‘𝐴))) = (𝐵‘(𝑗 − (♯‘𝐴))) → (𝑖 − (♯‘𝐴)) = (𝑗 − (♯‘𝐴))))
146	145	imp 412	. . . . . . . . . . . 12 ⊢ (((𝐵:dom 𝐵–1-1→𝑆 ∧ ((𝑖 − (♯‘𝐴)) ∈ dom 𝐵 ∧ (𝑗 − (♯‘𝐴)) ∈ dom 𝐵)) ∧ (𝐵‘(𝑖 − (♯‘𝐴))) = (𝐵‘(𝑗 − (♯‘𝐴)))) → (𝑖 − (♯‘𝐴)) = (𝑗 − (♯‘𝐴)))
147	137, 140, 144, 146	syl21anc 851	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑖 − (♯‘𝐴)) = (𝑗 − (♯‘𝐴)))
148	131, 134, 136, 147	subcan2d 11716	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) ∧ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝑖 = 𝑗)
149	148	ex 418	. . . . . . . . 9 ⊢ (((𝜑 ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑖 = 𝑗))
150	149	adantllr 732	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑖 = 𝑗))
151	90	ad2antrr 739	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → (𝑗 ∈ (0..^(♯‘𝐴)) ∨ 𝑗 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))))
152	128, 150, 151	mpjaod 874	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) ∧ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))) → 𝑖 = 𝑗)
153	152	ex 418	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵)) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) → (𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑖 = 𝑗))
154	153	adantlrl 733	. . . . 5 ⊢ (((𝜑 ∧ (𝑖 ∈ dom (𝐴 ++ 𝐵) ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵))) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) → (𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵))) → 𝑖 = 𝑗))
155	82	eleq2d 2846	. . . . . . . . 9 ⊢ (𝜑 → (𝑖 ∈ dom (𝐴 ++ 𝐵) ↔ 𝑖 ∈ (0..^(♯‘(𝐴 ++ 𝐵)))))
156	155	biimpa 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ dom (𝐴 ++ 𝐵)) → 𝑖 ∈ (0..^(♯‘(𝐴 ++ 𝐵))))
157	87	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ dom (𝐴 ++ 𝐵)) → (♯‘𝐴) ∈ ℤ)
158		fzospliti 13831	. . . . . . . 8 ⊢ ((𝑖 ∈ (0..^(♯‘(𝐴 ++ 𝐵))) ∧ (♯‘𝐴) ∈ ℤ) → (𝑖 ∈ (0..^(♯‘𝐴)) ∨ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))))
159	156, 157, 158	syl2anc 596	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ dom (𝐴 ++ 𝐵)) → (𝑖 ∈ (0..^(♯‘𝐴)) ∨ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))))
160	159	adantrr 730	. . . . . 6 ⊢ ((𝜑 ∧ (𝑖 ∈ dom (𝐴 ++ 𝐵) ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵))) → (𝑖 ∈ (0..^(♯‘𝐴)) ∨ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))))
161	160	adantr 486	. . . . 5 ⊢ (((𝜑 ∧ (𝑖 ∈ dom (𝐴 ++ 𝐵) ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵))) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) → (𝑖 ∈ (0..^(♯‘𝐴)) ∨ 𝑖 ∈ ((♯‘𝐴)..^(♯‘(𝐴 ++ 𝐵)))))
162	94, 154, 161	mpjaod 874	. . . 4 ⊢ (((𝜑 ∧ (𝑖 ∈ dom (𝐴 ++ 𝐵) ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵))) ∧ ((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗)) → 𝑖 = 𝑗)
163	162	ex 418	. . 3 ⊢ ((𝜑 ∧ (𝑖 ∈ dom (𝐴 ++ 𝐵) ∧ 𝑗 ∈ dom (𝐴 ++ 𝐵))) → (((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗) → 𝑖 = 𝑗))
164	163	ralrimivva 3205	. 2 ⊢ (𝜑 → ∀𝑖 ∈ dom (𝐴 ++ 𝐵)∀𝑗 ∈ dom (𝐴 ++ 𝐵)(((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗) → 𝑖 = 𝑗))
165		dff13 7260	. 2 ⊢ ((𝐴 ++ 𝐵):dom (𝐴 ++ 𝐵)–1-1→𝑆 ↔ ((𝐴 ++ 𝐵):dom (𝐴 ++ 𝐵)⟶𝑆 ∧ ∀𝑖 ∈ dom (𝐴 ++ 𝐵)∀𝑗 ∈ dom (𝐴 ++ 𝐵)(((𝐴 ++ 𝐵)‘𝑖) = ((𝐴 ++ 𝐵)‘𝑗) → 𝑖 = 𝑗)))
166	7, 164, 165	sylanbrc 595	1 ⊢ (𝜑 → (𝐴 ++ 𝐵):dom (𝐴 ++ 𝐵)–1-1→𝑆)

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ∧ wa 401 ∨ wo 861 = wceq 1569 ∈ wcel 2144 ∀wral 3076 ∩ cin 4088 ∅c0 4277 dom cdm 5650 ran crn 5651 Fun wfun 6535 ⟶wf 6537 –1-1→wf1 6538 ‘cfv 6541 (class class class)co 7422 ℂcc 11203 0cc0 11205 + caddc 11208 − cmin 11546 ℕ₀cn0 12611 ℤcz 12698 ..^cfzo 13793 ♯chash 14479 Word cword 14663 ++ cconcat 14720

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1942 ax-6 1999 ax-7 2040 ax-8 2146 ax-9 2154 ax-10 2177 ax-11 2193 ax-12 2212 ax-ext 2732 ax-rep 5231 ax-sep 5248 ax-nul 5259 ax-pow 5326 ax-pr 5390 ax-un 7753 ax-cnex 11261 ax-resscn 11262 ax-1cn 11263 ax-icn 11264 ax-addcl 11265 ax-addrcl 11266 ax-mulcl 11267 ax-mulrcl 11268 ax-mulcom 11269 ax-addass 11270 ax-mulass 11271 ax-distr 11272 ax-i2m1 11273 ax-1ne0 11274 ax-1rid 11275 ax-rnegex 11276 ax-rrecex 11277 ax-cnre 11278 ax-pre-lttri 11279 ax-pre-lttrn 11280 ax-pre-ltadd 11281 ax-pre-mulgt0 11282

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2099 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3739 df-csb 3848 df-ss 3897 df-pss 4013 df-dif 4046 df-in 4090 df-un 4150 df-nul 4278 df-if 4482 df-pw 4558 df-sn 4585 df-pr 4587 df-op 4835 df-uni 4867 df-int 4907 df-iun 4952 df-br 5103 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5545 df-eprel 5550 df-po 5558 df-so 5559 df-fr 5603 df-we 5605 df-xp 5656 df-rel 5657 df-cnv 5658 df-co 5659 df-dm 5660 df-rn 5661 df-res 5662 df-ima 5663 df-pred 6306 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6496 df-fun 6543 df-fn 6544 df-f 6545 df-f1 6546 df-fo 6547 df-f1o 6548 df-fv 6549 df-riota 7379 df-ov 7425 df-oprab 7426 df-mpo 7427 df-om 7880 df-1st 8003 df-2nd 8004 df-frecs 8304 df-wrecs 8335 df-recs 8384 df-rdg 8423 df-1o 8481 df-er 8722 df-en 8979 df-dom 8980 df-sdom 8981 df-fin 8982 df-card 10025 df-pnf 11350 df-mnf 11351 df-xr 11352 df-ltxr 11353 df-le 11354 df-sub 11548 df-neg 11549 df-nn 12341 df-n0 12612 df-z 12699 df-uz 12971 df-fz 13645 df-fzo 13794 df-hash 14480 df-word 14664 df-concat 14721

This theorem is used by: cycpmco2f1 33733

W3C validator