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 33047

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 6836	. . . . . . . 8 ⊢ 𝐵 ∈ V
5	4	a1i 11	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ V)
6		gsumwrd2dccat.6	. . . . . . 7 ⊢ (𝜑 → 𝐴 ⊆ 𝐵)
7	5, 6	ssexd 5260	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ V)
8		wrdexg 14431	. . . . . 6 ⊢ (𝐴 ∈ V → Word 𝐴 ∈ V)
9	7, 8	syl 17	. . . . 5 ⊢ (𝜑 → Word 𝐴 ∈ V)
10	9, 9	xpexd 7684	. . . 4 ⊢ (𝜑 → (Word 𝐴 × Word 𝐴) ∈ V)
11		gsumwrd2dccat.3	. . . 4 ⊢ (𝜑 → 𝐹:(Word 𝐴 × Word 𝐴)⟶𝐵)
12		gsumwrd2dccat.4	. . . 4 ⊢ (𝜑 → 𝐹 finSupp 𝑍)
13		eqid 2731	. . . . . . . 8 ⊢ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) = ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))
14		eqid 2731	. . . . . . . 8 ⊢ (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩) = (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ ⟨((1^st ‘𝑎) ++ (2^nd ‘𝑎)), (♯‘(1^st ‘𝑎))⟩)
15		eqid 2731	. . . . . . . 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 33046	. . . . . . 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 6775	. . . . . 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 6758	. . . . 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 19828	. . 3 ⊢ (𝜑 → (𝑀 Σ_g 𝐹) = (𝑀 Σ_g (𝐹 ∘ (𝑏 ∈ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩))))
24		relxp 5632	. . . . . . . . . . . 12 ⊢ Rel ({𝑥} × (0...(♯‘𝑥)))
25	24	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → Rel ({𝑥} × (0...(♯‘𝑥))))
26	25	ralrimiva 3124	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑥 ∈ Word 𝐴Rel ({𝑥} × (0...(♯‘𝑥))))
27		reliun 5755	. . . . . . . . . 10 ⊢ (Rel ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↔ ∀𝑥 ∈ Word 𝐴Rel ({𝑥} × (0...(♯‘𝑥))))
28	26, 27	sylibr 234	. . . . . . . . 9 ⊢ (𝜑 → Rel ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
29		1stdm 7972	. . . . . . . . 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 14440	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ Word 𝐴 → (♯‘𝑥) ∈ ℕ₀)
32	31	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (♯‘𝑥) ∈ ℕ₀)
33		nn0uz 12774	. . . . . . . . . . . 12 ⊢ ℕ₀ = (ℤ_≥‘0)
34	32, 33	eleqtrdi 2841	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (♯‘𝑥) ∈ (ℤ_≥‘0))
35		fzn0 13438	. . . . . . . . . . 11 ⊢ ((0...(♯‘𝑥)) ≠ ∅ ↔ (♯‘𝑥) ∈ (ℤ_≥‘0))
36	34, 35	sylibr 234	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (0...(♯‘𝑥)) ≠ ∅)
37	36	dmdju 32629	. . . . . . . . 9 ⊢ (𝜑 → dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = Word 𝐴)
38	37	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = Word 𝐴)
39	30, 38	eleqtrd 2833	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (1^st ‘𝑏) ∈ Word 𝐴)
40		pfxcl 14585	. . . . . . 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 14553	. . . . . . 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 5653	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩ ∈ (Word 𝐴 × Word 𝐴))
45		sneq 4583	. . . . . . . . 9 ⊢ (𝑤 = 𝑥 → {𝑤} = {𝑥})
46		fveq2 6822	. . . . . . . . . 10 ⊢ (𝑤 = 𝑥 → (♯‘𝑤) = (♯‘𝑥))
47	46	oveq2d 7362	. . . . . . . . 9 ⊢ (𝑤 = 𝑥 → (0...(♯‘𝑤)) = (0...(♯‘𝑥)))
48	45, 47	xpeq12d 5645	. . . . . . . 8 ⊢ (𝑤 = 𝑥 → ({𝑤} × (0...(♯‘𝑤))) = ({𝑥} × (0...(♯‘𝑥))))
49	48	cbviunv 4987	. . . . . . 7 ⊢ ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))) = ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))
50	49	mpteq1i 5180	. . . . . 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 6890	. . . . 5 ⊢ (𝜑 → 𝐹 = (𝑎 ∈ (Word 𝐴 × Word 𝐴) ↦ (𝐹‘𝑎)))
53		fveq2 6822	. . . . 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 7062	. . . 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 7362	. . 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 1915	. . . 4 ⊢ Ⅎ𝑤𝜑
57	11, 44	cofmpt 7065	. . . . 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 2767	. . . . . . . . 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 2740	. . . . . . . . . 10 ⊢ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤)))
60	59	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) = ∪ 𝑤 ∈ Word 𝐴({𝑤} × (0...(♯‘𝑤))))
61		eqidd 2732	. . . . . . . . 9 ⊢ (𝜑 → (Word 𝐴 × Word 𝐴) = (Word 𝐴 × Word 𝐴))
62	58, 60, 61	f1oeq123d 6757	. . . . . . . 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 6762	. . . . . . 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 6836	. . . . . . 7 ⊢ 𝑍 ∈ V
67	66	a1i 11	. . . . . 6 ⊢ (𝜑 → 𝑍 ∈ V)
68	11, 10	fexd 7161	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ V)
69	12, 65, 67, 68	fsuppco 9286	. . . . 5 ⊢ (𝜑 → (𝐹 ∘ (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)) finSupp 𝑍)
70	57, 69	eqbrtrrd 5113	. . . 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 7018	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) ∈ 𝐵)
73	72	fmpttd 7048	. . . 4 ⊢ (𝜑 → (𝑏 ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩)):∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))⟶𝐵)
74		vsnex 5370	. . . . . . . 8 ⊢ {𝑥} ∈ V
75		ovex 7379	. . . . . . . 8 ⊢ (0...(♯‘𝑥)) ∈ V
76	74, 75	xpex 7686	. . . . . . 7 ⊢ ({𝑥} × (0...(♯‘𝑥))) ∈ V
77	76	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → ({𝑥} × (0...(♯‘𝑥))) ∈ V)
78	77	ralrimiva 3124	. . . . 5 ⊢ (𝜑 → ∀𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ∈ V)
79		iunexg 7895	. . . . 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 33035	. . 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 2770	. 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 2731	. . . . . . 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 3440	. . . . . . . . . . 11 ⊢ 𝑤 ∈ V
85		vex 3440	. . . . . . . . . . 11 ⊢ 𝑗 ∈ V
86	84, 85	op1std 7931	. . . . . . . . . 10 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (1^st ‘𝑏) = 𝑤)
87	84, 85	op2ndd 7932	. . . . . . . . . 10 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (2^nd ‘𝑏) = 𝑗)
88	86, 87	oveq12d 7364	. . . . . . . . 9 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ((1^st ‘𝑏) prefix (2^nd ‘𝑏)) = (𝑤 prefix 𝑗))
89	86	fveq2d 6826	. . . . . . . . . . 11 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (♯‘(1^st ‘𝑏)) = (♯‘𝑤))
90	87, 89	opeq12d 4830	. . . . . . . . . 10 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩ = ⟨𝑗, (♯‘𝑤)⟩)
91	86, 90	oveq12d 7364	. . . . . . . . 9 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩) = (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩))
92	88, 91	opeq12d 4830	. . . . . . . 8 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → ⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩ = ⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)
93	92	fveq2d 6826	. . . . . . 7 ⊢ (𝑏 = ⟨𝑤, 𝑗⟩ → (𝐹‘⟨((1^st ‘𝑏) prefix (2^nd ‘𝑏)), ((1^st ‘𝑏) substr ⟨(2^nd ‘𝑏), (♯‘(1^st ‘𝑏))⟩)⟩) = (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))
94	37	eleq2d 2817	. . . . . . . . . 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 7381	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ Word 𝐴) → (0...(♯‘𝑥)) ∈ V)
98		nfcv 2894	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥(0...(♯‘𝑤))
99		fveq2 6822	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑤 → (♯‘𝑥) = (♯‘𝑤))
100	99	oveq2d 7362	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑤 → (0...(♯‘𝑥)) = (0...(♯‘𝑤)))
101	9, 97, 98, 100	iunsnima2 32602	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ Word 𝐴) → (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) = (0...(♯‘𝑤)))
102	95, 101	syldan 591	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) = (0...(♯‘𝑤)))
103	102	eleq2d 2817	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↔ 𝑗 ∈ (0...(♯‘𝑤))))
104	103	biimpa 476	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → 𝑗 ∈ (0...(♯‘𝑤)))
105	100	opeliunxp2 5777	. . . . . . . 8 ⊢ (⟨𝑤, 𝑗⟩ ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↔ (𝑤 ∈ Word 𝐴 ∧ 𝑗 ∈ (0...(♯‘𝑤))))
106	96, 104, 105	sylanbrc 583	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → ⟨𝑤, 𝑗⟩ ∈ ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))))
107		fvexd 6837	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) ∧ 𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤})) → (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩) ∈ V)
108	83, 93, 106, 107	fvmptd3 6952	. . . . . 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 5182	. . . . 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 7362	. . . 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 5182	. . 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 7362	. 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 5179	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)) = (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)))
114	113	oveq2d 7362	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥)))) → (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))) = (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))
115	37, 114	mpteq12dva 5175	. . 3 ⊢ (𝜑 → (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)))) = (𝑤 ∈ Word 𝐴 ↦ (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩)))))
116	115	oveq2d 7362	. 2 ⊢ (𝜑 → (𝑀 Σ_g (𝑤 ∈ dom ∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) ↦ (𝑀 Σ_g (𝑗 ∈ (∪ 𝑥 ∈ Word 𝐴({𝑥} × (0...(♯‘𝑥))) “ {𝑤}) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))) = (𝑀 Σ_g (𝑤 ∈ Word 𝐴 ↦ (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))))
117	82, 112, 116	3eqtrd 2770	1 ⊢ (𝜑 → (𝑀 Σ_g 𝐹) = (𝑀 Σ_g (𝑤 ∈ Word 𝐴 ↦ (𝑀 Σ_g (𝑗 ∈ (0...(♯‘𝑤)) ↦ (𝐹‘⟨(𝑤 prefix 𝑗), (𝑤 substr ⟨𝑗, (♯‘𝑤)⟩)⟩))))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1541 ∈ wcel 2111 ≠ wne 2928 ∀wral 3047 Vcvv 3436 ⊆ wss 3897 ∅c0 4280 {csn 4573 ⟨cop 4579 ∪ ciun 4939 class class class wbr 5089 ↦ cmpt 5170 × cxp 5612 ^◡ccnv 5613 dom cdm 5614 “ cima 5617 ∘ ccom 5618 Rel wrel 5619 ⟶wf 6477 –1-1→wf1 6478 –1-1-onto→wf1o 6480 ‘cfv 6481 (class class class)co 7346 1^st c1st 7919 2^nd c2nd 7920 finSupp cfsupp 9245 0cc0 11006 ℕ₀cn0 12381 ℤ_≥cuz 12732 ...cfz 13407 ♯chash 14237 Word cword 14420 ++ cconcat 14477 substr csubstr 14548 prefix cpfx 14578 Basecbs 17120 0_gc0g 17343 Σ_g cgsu 17344 CMndccmn 19692

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2113 ax-9 2121 ax-10 2144 ax-11 2160 ax-12 2180 ax-ext 2703 ax-rep 5215 ax-sep 5232 ax-nul 5242 ax-pow 5301 ax-pr 5368 ax-un 7668 ax-cnex 11062 ax-resscn 11063 ax-1cn 11064 ax-icn 11065 ax-addcl 11066 ax-addrcl 11067 ax-mulcl 11068 ax-mulrcl 11069 ax-mulcom 11070 ax-addass 11071 ax-mulass 11072 ax-distr 11073 ax-i2m1 11074 ax-1ne0 11075 ax-1rid 11076 ax-rnegex 11077 ax-rrecex 11078 ax-cnre 11079 ax-pre-lttri 11080 ax-pre-lttrn 11081 ax-pre-ltadd 11082 ax-pre-mulgt0 11083

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2535 df-eu 2564 df-clab 2710 df-cleq 2723 df-clel 2806 df-nfc 2881 df-ne 2929 df-nel 3033 df-ral 3048 df-rex 3057 df-rmo 3346 df-reu 3347 df-rab 3396 df-v 3438 df-sbc 3737 df-csb 3846 df-dif 3900 df-un 3902 df-in 3904 df-ss 3914 df-pss 3917 df-nul 4281 df-if 4473 df-pw 4549 df-sn 4574 df-pr 4576 df-op 4580 df-uni 4857 df-int 4896 df-iun 4941 df-iin 4942 df-br 5090 df-opab 5152 df-mpt 5171 df-tr 5197 df-id 5509 df-eprel 5514 df-po 5522 df-so 5523 df-fr 5567 df-se 5568 df-we 5569 df-xp 5620 df-rel 5621 df-cnv 5622 df-co 5623 df-dm 5624 df-rn 5625 df-res 5626 df-ima 5627 df-pred 6248 df-ord 6309 df-on 6310 df-lim 6311 df-suc 6312 df-iota 6437 df-fun 6483 df-fn 6484 df-f 6485 df-f1 6486 df-fo 6487 df-f1o 6488 df-fv 6489 df-isom 6490 df-riota 7303 df-ov 7349 df-oprab 7350 df-mpo 7351 df-of 7610 df-om 7797 df-1st 7921 df-2nd 7922 df-supp 8091 df-frecs 8211 df-wrecs 8242 df-recs 8291 df-rdg 8329 df-1o 8385 df-2o 8386 df-er 8622 df-map 8752 df-en 8870 df-dom 8871 df-sdom 8872 df-fin 8873 df-fsupp 9246 df-oi 9396 df-card 9832 df-pnf 11148 df-mnf 11149 df-xr 11150 df-ltxr 11151 df-le 11152 df-sub 11346 df-neg 11347 df-nn 12126 df-2 12188 df-n0 12382 df-z 12469 df-uz 12733 df-fz 13408 df-fzo 13555 df-seq 13909 df-hash 14238 df-word 14421 df-concat 14478 df-substr 14549 df-pfx 14579 df-sets 17075 df-slot 17093 df-ndx 17105 df-base 17121 df-ress 17142 df-plusg 17174 df-0g 17345 df-gsum 17346 df-mre 17488 df-mrc 17489 df-acs 17491 df-mgm 18548 df-sgrp 18627 df-mnd 18643 df-submnd 18692 df-mulg 18981 df-cntz 19229 df-cmn 19694

This theorem is referenced by: elrgspnlem2 33210

W3C validator