gsumwrd2dccat - Mathbox for Thierry Arnoux

	Mathbox for Thierry Arnoux		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > gsumwrd2dccat		Structured version Visualization version GIF version

Theorem gsumwrd2dccat 33695

Description: Rewrite a sum ranging over pairs of words as a sum of sums over concatenated subwords. (Contributed by Thierry Arnoux, 5-Oct-2025.)

**Hypotheses**
Ref	Expression
gsumwrd2dccat.1	⊢ 𝐵 = (Base‘𝑀)
gsumwrd2dccat.2	⊢ 𝑍 = (0_g‘𝑀)
gsumwrd2dccat.3	⊢ (𝜑 → 𝐹:(Word 𝐴 × Word 𝐴)⟶𝐵)
gsumwrd2dccat.4	⊢ (𝜑 → 𝐹 finSupp 𝑍)
gsumwrd2dccat.5	⊢ (𝜑 → 𝑀 ∈ CMnd)
gsumwrd2dccat.6	⊢ (𝜑 → 𝐴 ⊆ 𝐵)

**Assertion**
Ref	Expression
gsumwrd2dccat	⊢ (𝜑 → (𝑀 Σ_g 𝐹) = (𝑀 Σ_g (𝑤 ∈ Word 𝐴 ↦ (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))))

Distinct variable groups: 𝑤,𝐴,𝑗 𝐵,𝑗,𝑤 𝑗,𝐹,𝑤 𝑗,𝑀,𝑤 𝑗,𝑍,𝑤 𝜑,𝑗,𝑤

Proof of Theorem gsumwrd2dccat Dummy variables 𝑎 𝑏 𝑥 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		gsumwrd2dccat.1	. . . 4 ⊢ 𝐵 = (Base‘𝑀)
2		gsumwrd2dccat.2	. . . 4 ⊢ 𝑍 = (0_g‘𝑀)
3		gsumwrd2dccat.5	. . . 4 ⊢ (𝜑 → 𝑀 ∈ CMnd)
4	1	fvexi 6910	. . . . . . . 8 ⊢ 𝐵 ∈ V
5	4	a1i 11	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ V)
6		gsumwrd2dccat.6	. . . . . . 7 ⊢ (𝜑 → 𝐴 ⊆ 𝐵)
7	5, 6	ssexd 5290	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ V)
8		wrdexg 14682	. . . . . 6 ⊢ (𝐴 ∈ V → Word 𝐴 ∈ V)
9	7, 8	syl 18	. . . . 5 ⊢ (𝜑 → Word 𝐴 ∈ V)
10	9, 9	xpexd 7775	. . . 4 ⊢ (𝜑 → (Word 𝐴 × Word 𝐴) ∈ V)
11		gsumwrd2dccat.3	. . . 4 ⊢ (𝜑 → 𝐹:(Word 𝐴 × Word 𝐴)⟶𝐵)
12		gsumwrd2dccat.4	. . . 4 ⊢ (𝜑 → 𝐹 finSupp 𝑍)
13		eqid 2763	. . . . . . . 8 ⊢ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) = ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))
14		eqid 2763	. . . . . . . 8 ⊢ (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩) = (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩)
15		eqid 2763	. . . . . . . 8 ⊢ (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) = (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)
16	13, 14, 15, 7	gsumwrd2dccatlem 33694	. . . . . . 7 ⊢ (𝜑 → ((𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩):(Word 𝐴 × Word 𝐴)–1-1-onto→∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ∧ ^◡(𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩) = (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)))
17	16	simpld 500	. . . . . 6 ⊢ (𝜑 → (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩):(Word 𝐴 × Word 𝐴)–1-1-onto→∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))))
18		f1ocnv 6848	. . . . . 6 ⊢ ((𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩):(Word 𝐴 × Word 𝐴)–1-1-onto→∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) → ^◡(𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩):∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))–1-1-onto→(Word 𝐴 × Word 𝐴))
19	17, 18	syl 18	. . . . 5 ⊢ (𝜑 → ^◡(𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩):∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))–1-1-onto→(Word 𝐴 × Word 𝐴))
20	16	simprd 501	. . . . . 6 ⊢ (𝜑 → ^◡(𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩) = (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))
21	20	f1oeq1d 6830	. . . . 5 ⊢ (𝜑 → (^◡(𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩):∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))–1-1-onto→(Word 𝐴 × Word 𝐴) ↔ (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩):∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))–1-1-onto→(Word 𝐴 × Word 𝐴)))
22	19, 21	mpbid 235	. . . 4 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩):∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))–1-1-onto→(Word 𝐴 × Word 𝐴))
23	1, 2, 3, 10, 11, 12, 22	gsumf1o 20145	. . 3 ⊢ (𝜑 → (𝑀 Σ_g 𝐹) = (𝑀 Σ_g (𝐹 ∘ (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))))
24		relxp 5673	. . . . . . . . . . . 12 ⊢ Rel ({𝑥} × (0...(♯‘𝑥)))
25	24	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → Rel ({𝑥} × (0...(♯‘𝑥))))
26	25	ralrimiva 3158	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑥 ∈ Word 𝐴Rel ({𝑥} × (0...(♯‘𝑥))))
27		reliun 5799	. . . . . . . . . 10 ⊢ (Rel ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↔ ∀𝑥 ∈ Word 𝐴Rel ({𝑥} × (0...(♯‘𝑥))))
28	26, 27	sylibr 237	. . . . . . . . 9 ⊢ (𝜑 → Rel ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
29		1stdm 8061	. . . . . . . . 9 ⊢ ((Rel ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (1^st ‘𝑏) ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
30	28, 29	sylan 592	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (1^st ‘𝑏) ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
31		lencl 14691	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ Word 𝐴 → (♯‘𝑥) ∈ ℕ₀)
32	31	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (♯‘𝑥) ∈ ℕ₀)
33		nn0uz 13016	. . . . . . . . . . . 12 ⊢ ℕ₀ = (ℤ_≥‘0)
34	32, 33	eleqtrdi 2874	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (♯‘𝑥) ∈ (ℤ_≥‘0))
35		fzn0 13684	. . . . . . . . . . 11 ⊢ ((0...(♯‘𝑥)) ≠ ∅ ↔ (♯‘𝑥) ∈ (ℤ_≥‘0))
36	34, 35	sylibr 237	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (0...(♯‘𝑥)) ≠ ∅)
37	36	dmdju 33298	. . . . . . . . 9 ⊢ (𝜑 → dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = Word 𝐴)
38	37	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = Word 𝐴)
39	30, 38	eleqtrd 2866	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (1^st ‘𝑏) ∈ Word 𝐴)
40		pfxcl 14841	. . . . . . 7 ⊢ ((1^st ‘𝑏) ∈ Word 𝐴 → ((1^st ‘𝑏) prefix (2^nd ‘𝑏)) ∈ Word 𝐴)
41	39, 40	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → ((1^st ‘𝑏) prefix (2^nd ‘𝑏)) ∈ Word 𝐴)
42		swrdcl 14807	. . . . . . 7 ⊢ ((1^st ‘𝑏) ∈ Word 𝐴 → ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩) ∈ Word 𝐴)
43	39, 42	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩) ∈ Word 𝐴)
44	41, 43	opelxpd 5694	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩ ∈ (Word 𝐴 × Word 𝐴))
45		sneq 4594	. . . . . . . . 9 ⊢ (𝑤 = 𝑥 → {𝑤} = {𝑥})
46		fveq2 6896	. . . . . . . . . 10 ⊢ (𝑤 = 𝑥 → (♯‘𝑤) = (♯‘𝑥))
47	46	oveq2d 7446	. . . . . . . . 9 ⊢ (𝑤 = 𝑥 → (0...(♯‘𝑤)) = (0...(♯‘𝑥)))
48	45, 47	xpeq12d 5686	. . . . . . . 8 ⊢ (𝑤 = 𝑥 → ({𝑤} × (0...(♯‘𝑤))) = ({𝑥} × (0...(♯‘𝑥))))
49	48	cbviunv 5000	. . . . . . 7 ⊢ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) = ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))
50	49	mpteq1i 5199	. . . . . 6 ⊢ (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) = (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)
51	50	a1i 11	. . . . 5 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) = (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))
52	11	feqmptd 6964	. . . . 5 ⊢ (𝜑 → 𝐹 = (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ (𝐹‘𝑎)))
53		fveq2 6896	. . . . 5 ⊢ (𝑎 = ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩ → (𝐹‘𝑎) = (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))
54	44, 51, 52, 53	fmptco 7141	. . . 4 ⊢ (𝜑 → (𝐹 ∘ (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)) = (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)))
55	54	oveq2d 7446	. . 3 ⊢ (𝜑 → (𝑀 Σ_g (𝐹 ∘ (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))) = (𝑀 Σ_g (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))))
56		nfv 1948	. . . 4 ⊢ Ⅎ𝑤𝜑
57	11, 44	cofmpt 7144	. . . . 5 ⊢ (𝜑 → (𝐹 ∘ (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)) = (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)))
58	20, 51	eqtr2d 2799	. . . . . . . . 9 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) = ^◡(𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩))
59	49	eqcomi 2772	. . . . . . . . . 10 ⊢ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))
60	59	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))))
61		eqidd 2764	. . . . . . . . 9 ⊢ (𝜑 → (Word 𝐴 × Word 𝐴) = (Word 𝐴 × Word 𝐴))
62	58, 60, 61	f1oeq123d 6829	. . . . . . . 8 ⊢ (𝜑 → ((𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))–1-1-onto→(Word 𝐴 × Word 𝐴) ↔ ^◡(𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩):∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))–1-1-onto→(Word 𝐴 × Word 𝐴)))
63	19, 62	mpbird 260	. . . . . . 7 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))–1-1-onto→(Word 𝐴 × Word 𝐴))
64		f1of1 6834	. . . . . . 7 ⊢ ((𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))–1-1-onto→(Word 𝐴 × Word 𝐴) → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))–1-1→(Word 𝐴 × Word 𝐴))
65	63, 64	syl 18	. . . . . 6 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))–1-1→(Word 𝐴 × Word 𝐴))
66	2	fvexi 6910	. . . . . . 7 ⊢ 𝑍 ∈ V
67	66	a1i 11	. . . . . 6 ⊢ (𝜑 → 𝑍 ∈ V)
68	11, 10	fexd 7243	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ V)
69	12, 65, 67, 68	fsuppco 9407	. . . . 5 ⊢ (𝜑 → (𝐹 ∘ (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)) finSupp 𝑍)
70	57, 69	eqbrtrrd 5132	. . . 4 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)) finSupp 𝑍)
71	11	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → 𝐹:(Word 𝐴 × Word 𝐴)⟶𝐵)
72	71, 44	ffvelcdmd 7096	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) ∈ 𝐵)
73	72	fmpttd 7126	. . . 4 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))⟶𝐵)
74		vsnex 5397	. . . . . . . 8 ⊢ {𝑥} ∈ V
75		ovex 7463	. . . . . . . 8 ⊢ (0...(♯‘𝑥)) ∈ V
76	74, 75	xpex 7777	. . . . . . 7 ⊢ ({𝑥} × (0...(♯‘𝑥))) ∈ V
77	76	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → ({𝑥} × (0...(♯‘𝑥))) ∈ V)
78	77	ralrimiva 3158	. . . . 5 ⊢ (𝜑 → ∀𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∈ V)
79		iunexg 7985	. . . . 5 ⊢ ((Word 𝐴 ∈ V ∧ ∀𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∈ V) → ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∈ V)
80	9, 78, 79	syl2anc 596	. . . 4 ⊢ (𝜑 → ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∈ V)
81	56, 1, 2, 28, 70, 3, 73, 80	gsumfs2d 33678	. . 3 ⊢ (𝜑 → (𝑀 Σ_g (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))) = (𝑀 Σ_g (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ ((𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))‘⟨𝑤, 𝑗⟩))))))
82	23, 55, 81	3eqtrd 2802	. 2 ⊢ (𝜑 → (𝑀 Σ_g 𝐹) = (𝑀 Σ_g (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ ((𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))‘⟨𝑤, 𝑗⟩))))))
83		eqid 2763	. . . . . . 7 ⊢ (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)) = (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))
84		vex 3458	. . . . . . . . . . 11 ⊢ 𝑤 ∈ V
85		vex 3458	. . . . . . . . . . 11 ⊢ 𝑗 ∈ V
86	84, 85	op1std 8021	. . . . . . . . . 10 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (1^st ‘𝑏) = 𝑤)
87	84, 85	op2ndd 8022	. . . . . . . . . 10 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (2^nd ‘𝑏) = 𝑗)
88	86, 87	oveq12d 7448	. . . . . . . . 9 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ((1^st ‘𝑏) prefix (2^nd ‘𝑏)) = (𝑤 prefix 𝑗))
89	86	fveq2d 6900	. . . . . . . . . . 11 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (♯‘(1^st ‘𝑏)) = (♯‘𝑤))
90	87, 89	opeq12d 4851	. . . . . . . . . 10 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩ = ⟨𝑗, (♯‘𝑤)⟩)
91	86, 90	oveq12d 7448	. . . . . . . . 9 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩) = (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩))
92	88, 91	opeq12d 4851	. . . . . . . 8 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩ = ⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)
93	92	fveq2d 6900	. . . . . . 7 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) = (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))
94	37	eleq2d 2850	. . . . . . . . . 10 ⊢ (𝜑 → (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↔ 𝑤 ∈ Word 𝐴))
95	94	biimpa 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → 𝑤 ∈ Word 𝐴)
96	95	adantr 486	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → 𝑤 ∈ Word 𝐴)
97		ovexd 7465	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (0...(♯‘𝑥)) ∈ V)
98		nfcv 2926	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥(0...(♯‘𝑤))
99		fveq2 6896	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑤 → (♯‘𝑥) = (♯‘𝑤))
100	99	oveq2d 7446	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑤 → (0...(♯‘𝑥)) = (0...(♯‘𝑤)))
101	9, 97, 98, 100	iunsnima2 33270	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ Word 𝐴) → (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) = (0...(♯‘𝑤)))
102	95, 101	syldan 603	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) = (0...(♯‘𝑤)))
103	102	eleq2d 2850	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↔ 𝑗 ∈ (0...(♯‘𝑤))))
104	103	biimpa 482	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → 𝑗 ∈ (0...(♯‘𝑤)))
105	100	opeliunxp2 5820	. . . . . . . 8 ⊢ (⟨𝑤, 𝑗⟩ ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↔ (𝑤 ∈ Word 𝐴 ∧ 𝑗 ∈ (0...(♯‘𝑤))))
106	96, 104, 105	sylanbrc 595	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → ⟨𝑤, 𝑗⟩ ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
107		fvexd 6911	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩) ∈ V)
108	83, 93, 106, 107	fvmptd3 7028	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → ((𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))‘⟨𝑤, 𝑗⟩) = (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))
109	108	mpteq2dva 5201	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ ((𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))‘⟨𝑤, 𝑗⟩)) = (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)))
110	109	oveq2d 7446	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ ((𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))‘⟨𝑤, 𝑗⟩))) = (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))
111	110	mpteq2dva 5201	. . 3 ⊢ (𝜑 → (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ ((𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))‘⟨𝑤, 𝑗⟩)))) = (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)))))
112	111	oveq2d 7446	. 2 ⊢ (𝜑 → (𝑀 Σ_g (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ ((𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))‘⟨𝑤, 𝑗⟩))))) = (𝑀 Σ_g (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))))
113	102	mpteq1d 5198	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)) = (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)))
114	113	oveq2d 7446	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))) = (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))
115	37, 114	mpteq12dva 5194	. . 3 ⊢ (𝜑 → (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)))) = (𝑤 ∈ Word 𝐴 ↦ (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)))))
116	115	oveq2d 7446	. 2 ⊢ (𝜑 → (𝑀 Σ_g (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))) = (𝑀 Σ_g (𝑤 ∈ Word 𝐴 ↦ (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))))
117	82, 112, 116	3eqtrd 2802	1 ⊢ (𝜑 → (𝑀 Σ_g 𝐹) = (𝑀 Σ_g (𝑤 ∈ Word 𝐴 ↦ (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 401 = wceq 1569 ∈ wcel 2146 ≠ wne 2959 ∀wral 3080 Vcvv 3454 ⊆ wss 3900 ∅c0 4281 {csn 4588 ⟨cop 4838 ∪ ciun 4954 class class class wbr 5106 ↦ cmpt 5189 × cxp 5653 ^◡ccnv 5654 dom cdm 5655 “ cima 5658 ∘ ccom 5659 Rel wrel 5660 ⟶wf 6543 –1-1→wf1 6544 –1-1-onto→wf1o 6546 ‘cfv 6547 (class class class)co 7430 1^st c1st 8009 2^nd c2nd 8010 finSupp cfsupp 9367 0cc0 11213 ℕ₀cn0 12619 ℤ_≥cuz 12978 ...cfz 13652 ♯chash 14487 Word cword 14671 ++ cconcat 14728 substr csubstr 14802 prefix cpfx 14834 Basecbs 17402 0_gc0g 17625 Σ_g cgsu 17626 CMndccmn 20009

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 1944 ax-6 2001 ax-7 2042 ax-8 2148 ax-9 2156 ax-10 2179 ax-11 2196 ax-12 2215 ax-ext 2735 ax-rep 5235 ax-sep 5252 ax-nul 5263 ax-pow 5331 ax-pr 5395 ax-un 7761 ax-cnex 11269 ax-resscn 11270 ax-1cn 11271 ax-icn 11272 ax-addcl 11273 ax-addrcl 11274 ax-mulcl 11275 ax-mulrcl 11276 ax-mulcom 11277 ax-addass 11278 ax-mulass 11279 ax-distr 11280 ax-i2m1 11281 ax-1ne0 11282 ax-1rid 11283 ax-rnegex 11284 ax-rrecex 11285 ax-cnre 11286 ax-pre-lttri 11287 ax-pre-lttrn 11288 ax-pre-ltadd 11289 ax-pre-mulgt0 11290

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 2101 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-nel 3066 df-ral 3081 df-rex 3091 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3456 df-sbc 3743 df-csb 3852 df-ss 3901 df-pss 4017 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-pw 4562 df-sn 4589 df-pr 4591 df-op 4839 df-uni 4871 df-int 4911 df-iun 4956 df-iin 4957 df-br 5107 df-opab 5171 df-mpt 5190 df-tr 5216 df-id 5550 df-eprel 5555 df-po 5563 df-so 5564 df-fr 5608 df-se 5609 df-we 5610 df-xp 5661 df-rel 5662 df-cnv 5663 df-co 5664 df-dm 5665 df-rn 5666 df-res 5667 df-ima 5668 df-pred 6311 df-ord 6372 df-on 6373 df-lim 6374 df-suc 6375 df-iota 6501 df-fun 6549 df-fn 6550 df-f 6551 df-f1 6552 df-fo 6553 df-f1o 6554 df-fv 6555 df-isom 6556 df-riota 7387 df-ov 7433 df-oprab 7434 df-mpo 7435 df-of 7703 df-om 7888 df-1st 8011 df-2nd 8012 df-supp 8191 df-frecs 8313 df-wrecs 8344 df-recs 8393 df-rdg 8432 df-1o 8490 df-2o 8491 df-er 8731 df-map 8863 df-en 8988 df-dom 8989 df-sdom 8990 df-fin 8991 df-fsupp 9368 df-oi 9517 df-card 10033 df-pnf 11358 df-mnf 11359 df-xr 11360 df-ltxr 11361 df-le 11362 df-sub 11556 df-neg 11557 df-nn 12349 df-2 12418 df-n0 12620 df-z 12707 df-uz 12979 df-fz 13653 df-fzo 13802 df-seq 14158 df-hash 14488 df-word 14672 df-concat 14729 df-substr 14803 df-pfx 14835 df-sets 17357 df-slot 17375 df-ndx 17387 df-base 17403 df-ress 17424 df-plusg 17456 df-0g 17627 df-gsum 17628 df-mre 17771 df-mrc 17772 df-acs 17774 df-mgm 18831 df-sgrp 18923 df-mnd 18939 df-submnd 18994 df-mulg 19293 df-cntz 19546 df-cmn 20011

This theorem is used by: elrgspnlem2 33860

W3C validator