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 33052

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 6920	. . . . . . . 8 ⊢ 𝐵 ∈ V
5	4	a1i 11	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ V)
6		gsumwrd2dccat.6	. . . . . . 7 ⊢ (𝜑 → 𝐴 ⊆ 𝐵)
7	5, 6	ssexd 5329	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ V)
8		wrdexg 14558	. . . . . 6 ⊢ (𝐴 ∈ V → Word 𝐴 ∈ V)
9	7, 8	syl 17	. . . . 5 ⊢ (𝜑 → Word 𝐴 ∈ V)
10	9, 9	xpexd 7769	. . . 4 ⊢ (𝜑 → (Word 𝐴 × Word 𝐴) ∈ V)
11		gsumwrd2dccat.3	. . . 4 ⊢ (𝜑 → 𝐹:(Word 𝐴 × Word 𝐴)⟶𝐵)
12		gsumwrd2dccat.4	. . . 4 ⊢ (𝜑 → 𝐹 finSupp 𝑍)
13		eqid 2734	. . . . . . . 8 ⊢ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) = ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))
14		eqid 2734	. . . . . . . 8 ⊢ (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩) = (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩)
15		eqid 2734	. . . . . . . 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 33051	. . . . . . 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 494	. . . . . 6 ⊢ (𝜑 → (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩):(Word 𝐴 × Word 𝐴)–1-1-onto→∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))))
18		f1ocnv 6860	. . . . . 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 17	. . . . 5 ⊢ (𝜑 → ^◡(𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩):∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))–1-1-onto→(Word 𝐴 × Word 𝐴))
20	16	simprd 495	. . . . . 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 6843	. . . . 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 232	. . . 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 19948	. . 3 ⊢ (𝜑 → (𝑀 Σ_g 𝐹) = (𝑀 Σ_g (𝐹 ∘ (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))))
24		relxp 5706	. . . . . . . . . . . 12 ⊢ Rel ({𝑥} × (0...(♯‘𝑥)))
25	24	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → Rel ({𝑥} × (0...(♯‘𝑥))))
26	25	ralrimiva 3143	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑥 ∈ Word 𝐴Rel ({𝑥} × (0...(♯‘𝑥))))
27		reliun 5828	. . . . . . . . . 10 ⊢ (Rel ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↔ ∀𝑥 ∈ Word 𝐴Rel ({𝑥} × (0...(♯‘𝑥))))
28	26, 27	sylibr 234	. . . . . . . . 9 ⊢ (𝜑 → Rel ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
29		1stdm 8063	. . . . . . . . 9 ⊢ ((Rel ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (1^st ‘𝑏) ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
30	28, 29	sylan 580	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (1^st ‘𝑏) ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
31		lencl 14567	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ Word 𝐴 → (♯‘𝑥) ∈ ℕ₀)
32	31	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (♯‘𝑥) ∈ ℕ₀)
33		nn0uz 12917	. . . . . . . . . . . 12 ⊢ ℕ₀ = (ℤ_≥‘0)
34	32, 33	eleqtrdi 2848	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (♯‘𝑥) ∈ (ℤ_≥‘0))
35		fzn0 13574	. . . . . . . . . . 11 ⊢ ((0...(♯‘𝑥)) ≠ ∅ ↔ (♯‘𝑥) ∈ (ℤ_≥‘0))
36	34, 35	sylibr 234	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (0...(♯‘𝑥)) ≠ ∅)
37	36	dmdju 32663	. . . . . . . . 9 ⊢ (𝜑 → dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = Word 𝐴)
38	37	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = Word 𝐴)
39	30, 38	eleqtrd 2840	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (1^st ‘𝑏) ∈ Word 𝐴)
40		pfxcl 14711	. . . . . . 7 ⊢ ((1^st ‘𝑏) ∈ Word 𝐴 → ((1^st ‘𝑏) prefix (2^nd ‘𝑏)) ∈ Word 𝐴)
41	39, 40	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → ((1^st ‘𝑏) prefix (2^nd ‘𝑏)) ∈ Word 𝐴)
42		swrdcl 14679	. . . . . . 7 ⊢ ((1^st ‘𝑏) ∈ Word 𝐴 → ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩) ∈ Word 𝐴)
43	39, 42	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩) ∈ Word 𝐴)
44	41, 43	opelxpd 5727	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩ ∈ (Word 𝐴 × Word 𝐴))
45		sneq 4640	. . . . . . . . 9 ⊢ (𝑤 = 𝑥 → {𝑤} = {𝑥})
46		fveq2 6906	. . . . . . . . . 10 ⊢ (𝑤 = 𝑥 → (♯‘𝑤) = (♯‘𝑥))
47	46	oveq2d 7446	. . . . . . . . 9 ⊢ (𝑤 = 𝑥 → (0...(♯‘𝑤)) = (0...(♯‘𝑥)))
48	45, 47	xpeq12d 5719	. . . . . . . 8 ⊢ (𝑤 = 𝑥 → ({𝑤} × (0...(♯‘𝑤))) = ({𝑥} × (0...(♯‘𝑥))))
49	48	cbviunv 5044	. . . . . . 7 ⊢ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) = ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))
50	49	mpteq1i 5243	. . . . . 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 6976	. . . . 5 ⊢ (𝜑 → 𝐹 = (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ (𝐹‘𝑎)))
53		fveq2 6906	. . . . 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 7148	. . . 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 1911	. . . 4 ⊢ Ⅎ𝑤𝜑
57	11, 44	cofmpt 7151	. . . . 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 2775	. . . . . . . . 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 2743	. . . . . . . . . 10 ⊢ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))
60	59	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))))
61		eqidd 2735	. . . . . . . . 9 ⊢ (𝜑 → (Word 𝐴 × Word 𝐴) = (Word 𝐴 × Word 𝐴))
62	58, 60, 61	f1oeq123d 6842	. . . . . . . 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 257	. . . . . . 7 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))–1-1-onto→(Word 𝐴 × Word 𝐴))
64		f1of1 6847	. . . . . . 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 17	. . . . . 6 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))–1-1→(Word 𝐴 × Word 𝐴))
66	2	fvexi 6920	. . . . . . 7 ⊢ 𝑍 ∈ V
67	66	a1i 11	. . . . . 6 ⊢ (𝜑 → 𝑍 ∈ V)
68	11, 10	fexd 7246	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ V)
69	12, 65, 67, 68	fsuppco 9439	. . . . 5 ⊢ (𝜑 → (𝐹 ∘ (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)) finSupp 𝑍)
70	57, 69	eqbrtrrd 5171	. . . 4 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)) finSupp 𝑍)
71	11	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → 𝐹:(Word 𝐴 × Word 𝐴)⟶𝐵)
72	71, 44	ffvelcdmd 7104	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) ∈ 𝐵)
73	72	fmpttd 7134	. . . 4 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))⟶𝐵)
74		vsnex 5439	. . . . . . . 8 ⊢ {𝑥} ∈ V
75		ovex 7463	. . . . . . . 8 ⊢ (0...(♯‘𝑥)) ∈ V
76	74, 75	xpex 7771	. . . . . . 7 ⊢ ({𝑥} × (0...(♯‘𝑥))) ∈ V
77	76	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → ({𝑥} × (0...(♯‘𝑥))) ∈ V)
78	77	ralrimiva 3143	. . . . 5 ⊢ (𝜑 → ∀𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∈ V)
79		iunexg 7986	. . . . 5 ⊢ ((Word 𝐴 ∈ V ∧ ∀𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∈ V) → ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∈ V)
80	9, 78, 79	syl2anc 584	. . . 4 ⊢ (𝜑 → ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∈ V)
81	56, 1, 2, 28, 70, 3, 73, 80	gsumfs2d 33040	. . 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 2778	. 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 2734	. . . . . . 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 3481	. . . . . . . . . . 11 ⊢ 𝑤 ∈ V
85		vex 3481	. . . . . . . . . . 11 ⊢ 𝑗 ∈ V
86	84, 85	op1std 8022	. . . . . . . . . 10 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (1^st ‘𝑏) = 𝑤)
87	84, 85	op2ndd 8023	. . . . . . . . . 10 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (2^nd ‘𝑏) = 𝑗)
88	86, 87	oveq12d 7448	. . . . . . . . 9 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ((1^st ‘𝑏) prefix (2^nd ‘𝑏)) = (𝑤 prefix 𝑗))
89	86	fveq2d 6910	. . . . . . . . . . 11 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (♯‘(1^st ‘𝑏)) = (♯‘𝑤))
90	87, 89	opeq12d 4885	. . . . . . . . . 10 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩ = ⟨𝑗, (♯‘𝑤)⟩)
91	86, 90	oveq12d 7448	. . . . . . . . 9 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩) = (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩))
92	88, 91	opeq12d 4885	. . . . . . . 8 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩ = ⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)
93	92	fveq2d 6910	. . . . . . 7 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) = (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))
94	37	eleq2d 2824	. . . . . . . . . 10 ⊢ (𝜑 → (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↔ 𝑤 ∈ Word 𝐴))
95	94	biimpa 476	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → 𝑤 ∈ Word 𝐴)
96	95	adantr 480	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → 𝑤 ∈ Word 𝐴)
97		ovexd 7465	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (0...(♯‘𝑥)) ∈ V)
98		nfcv 2902	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥(0...(♯‘𝑤))
99		fveq2 6906	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑤 → (♯‘𝑥) = (♯‘𝑤))
100	99	oveq2d 7446	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑤 → (0...(♯‘𝑥)) = (0...(♯‘𝑤)))
101	9, 97, 98, 100	iunsnima2 32638	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ Word 𝐴) → (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) = (0...(♯‘𝑤)))
102	95, 101	syldan 591	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) = (0...(♯‘𝑤)))
103	102	eleq2d 2824	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↔ 𝑗 ∈ (0...(♯‘𝑤))))
104	103	biimpa 476	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → 𝑗 ∈ (0...(♯‘𝑤)))
105	100	opeliunxp2 5851	. . . . . . . 8 ⊢ (⟨𝑤, 𝑗⟩ ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↔ (𝑤 ∈ Word 𝐴 ∧ 𝑗 ∈ (0...(♯‘𝑤))))
106	96, 104, 105	sylanbrc 583	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → ⟨𝑤, 𝑗⟩ ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
107		fvexd 6921	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩) ∈ V)
108	83, 93, 106, 107	fvmptd3 7038	. . . . . 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 5247	. . . . 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 5247	. . 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 5242	. . . . 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 5236	. . 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 2778	1 ⊢ (𝜑 → (𝑀 Σ_g 𝐹) = (𝑀 Σ_g (𝑤 ∈ Word 𝐴 ↦ (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1536 ∈ wcel 2105 ≠ wne 2937 ∀wral 3058 Vcvv 3477 ⊆ wss 3962 ∅c0 4338 {csn 4630 ⟨cop 4636 ∪ ciun 4995 class class class wbr 5147 ↦ cmpt 5230 × cxp 5686 ^◡ccnv 5687 dom cdm 5688 “ cima 5691 ∘ ccom 5692 Rel wrel 5693 ⟶wf 6558 –1-1→wf1 6559 –1-1-onto→wf1o 6561 ‘cfv 6562 (class class class)co 7430 1^st c1st 8010 2^nd c2nd 8011 finSupp cfsupp 9398 0cc0 11152 ℕ₀cn0 12523 ℤ_≥cuz 12875 ...cfz 13543 ♯chash 14365 Word cword 14548 ++ cconcat 14604 substr csubstr 14674 prefix cpfx 14704 Basecbs 17244 0_gc0g 17485 Σ_g cgsu 17486 CMndccmn 19812

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1791 ax-4 1805 ax-5 1907 ax-6 1964 ax-7 2004 ax-8 2107 ax-9 2115 ax-10 2138 ax-11 2154 ax-12 2174 ax-ext 2705 ax-rep 5284 ax-sep 5301 ax-nul 5311 ax-pow 5370 ax-pr 5437 ax-un 7753 ax-cnex 11208 ax-resscn 11209 ax-1cn 11210 ax-icn 11211 ax-addcl 11212 ax-addrcl 11213 ax-mulcl 11214 ax-mulrcl 11215 ax-mulcom 11216 ax-addass 11217 ax-mulass 11218 ax-distr 11219 ax-i2m1 11220 ax-1ne0 11221 ax-1rid 11222 ax-rnegex 11223 ax-rrecex 11224 ax-cnre 11225 ax-pre-lttri 11226 ax-pre-lttrn 11227 ax-pre-ltadd 11228 ax-pre-mulgt0 11229

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1539 df-fal 1549 df-ex 1776 df-nf 1780 df-sb 2062 df-mo 2537 df-eu 2566 df-clab 2712 df-cleq 2726 df-clel 2813 df-nfc 2889 df-ne 2938 df-nel 3044 df-ral 3059 df-rex 3068 df-rmo 3377 df-reu 3378 df-rab 3433 df-v 3479 df-sbc 3791 df-csb 3908 df-dif 3965 df-un 3967 df-in 3969 df-ss 3979 df-pss 3982 df-nul 4339 df-if 4531 df-pw 4606 df-sn 4631 df-pr 4633 df-op 4637 df-uni 4912 df-int 4951 df-iun 4997 df-iin 4998 df-br 5148 df-opab 5210 df-mpt 5231 df-tr 5265 df-id 5582 df-eprel 5588 df-po 5596 df-so 5597 df-fr 5640 df-se 5641 df-we 5642 df-xp 5694 df-rel 5695 df-cnv 5696 df-co 5697 df-dm 5698 df-rn 5699 df-res 5700 df-ima 5701 df-pred 6322 df-ord 6388 df-on 6389 df-lim 6390 df-suc 6391 df-iota 6515 df-fun 6564 df-fn 6565 df-f 6566 df-f1 6567 df-fo 6568 df-f1o 6569 df-fv 6570 df-isom 6571 df-riota 7387 df-ov 7433 df-oprab 7434 df-mpo 7435 df-of 7696 df-om 7887 df-1st 8012 df-2nd 8013 df-supp 8184 df-frecs 8304 df-wrecs 8335 df-recs 8409 df-rdg 8448 df-1o 8504 df-2o 8505 df-er 8743 df-map 8866 df-en 8984 df-dom 8985 df-sdom 8986 df-fin 8987 df-fsupp 9399 df-oi 9547 df-card 9976 df-pnf 11294 df-mnf 11295 df-xr 11296 df-ltxr 11297 df-le 11298 df-sub 11491 df-neg 11492 df-nn 12264 df-2 12326 df-n0 12524 df-z 12611 df-uz 12876 df-fz 13544 df-fzo 13691 df-seq 14039 df-hash 14366 df-word 14549 df-concat 14605 df-substr 14675 df-pfx 14705 df-sets 17197 df-slot 17215 df-ndx 17227 df-base 17245 df-ress 17274 df-plusg 17310 df-0g 17487 df-gsum 17488 df-mre 17630 df-mrc 17631 df-acs 17633 df-mgm 18665 df-sgrp 18744 df-mnd 18760 df-submnd 18809 df-mulg 19098 df-cntz 19347 df-cmn 19814

This theorem is referenced by: elrgspnlem2 33232

W3C validator