Theorem mplvrpmga 33876

Description: The action of permuting variables in a multivariate polynomial is a group action. (Contributed by Thierry Arnoux, 10-Jan-2026.)

Hypotheses

Ref	Expression
mplvrpmga.1	⊢ 𝑆 = (SymGrp‘𝐼)
mplvrpmga.2	⊢ 𝑃 = (Base‘𝑆)
mplvrpmga.3	⊢ 𝑀 = (Base‘(𝐼 mPoly 𝑅))
mplvrpmga.4	⊢ 𝐴 = (𝑑 ∈ 𝑃, 𝑓 ∈ 𝑀 ↦ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))))
mplvrpmga.5	⊢ (𝜑 → 𝐼 ∈ 𝑉)

Assertion

Ref	Expression
mplvrpmga	⊢ (𝜑 → 𝐴 ∈ (𝑆 GrpAct 𝑀))

Distinct variable groups:   𝐴,𝑑,𝑓,𝑥   𝐼,𝑑,𝑓,ℎ,𝑥   𝑀,𝑑,𝑓,𝑥   𝑃,𝑑,𝑓,𝑥   𝑥,𝑅   𝜑,𝑑,𝑓,𝑥

Allowed substitution hints:   𝜑(ℎ)   𝐴(ℎ)   𝑃(ℎ)   𝑅(𝑓,ℎ,𝑑)   𝑆(𝑥,𝑓,ℎ,𝑑)   𝑀(ℎ)   𝑉(𝑥,𝑓,ℎ,𝑑)

Proof of Theorem mplvrpmga

Dummy variables 𝑔 𝑝 𝑞 𝑐 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		mplvrpmga.5	. . 3 ⊢ (𝜑 → 𝐼 ∈ 𝑉)
2		mplvrpmga.1	. . . 4 ⊢ 𝑆 = (SymGrp‘𝐼)
3	2	symggrp 19466	. . 3 ⊢ (𝐼 ∈ 𝑉 → 𝑆 ∈ Grp)
4	1, 3	syl 18	. 2 ⊢ (𝜑 → 𝑆 ∈ Grp)
5		mplvrpmga.3	. . . 4 ⊢ 𝑀 = (Base‘(𝐼 mPoly 𝑅))
6	5	fvexi 6893	. . 3 ⊢ 𝑀 ∈ V
7	6	a1i 11	. 2 ⊢ (𝜑 → 𝑀 ∈ V)
8		fvexd 6894	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (Base‘𝑅) ∈ V)
9		ovex 7441	. . . . . . . 8 ⊢ (ℕ0 ↑m 𝐼) ∈ V
10	9	rabex 5307	. . . . . . 7 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ∈ V
11	10	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ∈ V)
12		eqid 2769	. . . . . . . . 9 ⊢ (𝐼 mPoly 𝑅) = (𝐼 mPoly 𝑅)
13		eqid 2769	. . . . . . . . 9 ⊢ (Base‘𝑅) = (Base‘𝑅)
14		eqid 2769	. . . . . . . . . 10 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} = {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}
15	14	psrbasfsupp 33842	. . . . . . . . 9 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} = {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}
16		xp2nd 8015	. . . . . . . . . 10 ⊢ (𝑐 ∈ (𝑃 × 𝑀) → (2nd ‘𝑐) ∈ 𝑀)
17	16	ad2antlr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (2nd ‘𝑐) ∈ 𝑀)
18	12, 13, 5, 15, 17	mplelf 22112	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (2nd ‘𝑐):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}⟶(Base‘𝑅))
19		breq1 5113	. . . . . . . . 9 ⊢ (ℎ = (𝑥 ∘ (1st ‘𝑐)) → (ℎ finSupp 0 ↔ (𝑥 ∘ (1st ‘𝑐)) finSupp 0))
20		nn0ex 12506	. . . . . . . . . . 11 ⊢ ℕ0 ∈ V
21	20	a1i 11	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → ℕ0 ∈ V)
22	1	ad2antrr 738	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝐼 ∈ 𝑉)
23		ssrab2 4042	. . . . . . . . . . . . . 14 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ⊆ (ℕ0 ↑m 𝐼)
24	23	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ⊆ (ℕ0 ↑m 𝐼))
25	24	sselda 3945	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥 ∈ (ℕ0 ↑m 𝐼))
26	22, 21, 25	elmaprd 32962	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥:𝐼⟶ℕ0)
27		xp1st 8014	. . . . . . . . . . . . 13 ⊢ (𝑐 ∈ (𝑃 × 𝑀) → (1st ‘𝑐) ∈ 𝑃)
28	27	ad2antlr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (1st ‘𝑐) ∈ 𝑃)
29		mplvrpmga.2	. . . . . . . . . . . . 13 ⊢ 𝑃 = (Base‘𝑆)
30	2, 29	symgbasf 19442	. . . . . . . . . . . 12 ⊢ ((1st ‘𝑐) ∈ 𝑃 → (1st ‘𝑐):𝐼⟶𝐼)
31	28, 30	syl 18	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (1st ‘𝑐):𝐼⟶𝐼)
32	26, 31	fcod 6729	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ (1st ‘𝑐)):𝐼⟶ℕ0)
33	21, 22, 32	elmapdd 8834	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ (1st ‘𝑐)) ∈ (ℕ0 ↑m 𝐼))
34		breq1 5113	. . . . . . . . . . . . 13 ⊢ (ℎ = 𝑥 → (ℎ finSupp 0 ↔ 𝑥 finSupp 0))
35	34	elrab 3659	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↔ (𝑥 ∈ (ℕ0 ↑m 𝐼) ∧ 𝑥 finSupp 0))
36	35	bilani 509	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∈ (ℕ0 ↑m 𝐼) ∧ 𝑥 finSupp 0))
37	36	simprd 500	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥 finSupp 0)
38	2, 29	symgbasf1o 19441	. . . . . . . . . . 11 ⊢ ((1st ‘𝑐) ∈ 𝑃 → (1st ‘𝑐):𝐼–1-1-onto→𝐼)
39		f1of1 6817	. . . . . . . . . . 11 ⊢ ((1st ‘𝑐):𝐼–1-1-onto→𝐼 → (1st ‘𝑐):𝐼–1-1→𝐼)
40	28, 38, 39	3syl 19	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (1st ‘𝑐):𝐼–1-1→𝐼)
41		0nn0 12515	. . . . . . . . . . 11 ⊢ 0 ∈ ℕ0
42	41	a1i 11	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 0 ∈ ℕ0)
43		simpr 489	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0})
44	37, 40, 42, 43	fsuppco 9358	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ (1st ‘𝑐)) finSupp 0)
45	19, 33, 44	elrabd 3661	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ (1st ‘𝑐)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0})
46	18, 45	ffvelcdmd 7078	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐))) ∈ (Base‘𝑅))
47	46	fmpttd 7108	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}⟶(Base‘𝑅))
48	8, 11, 47	elmapdd 8834	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))) ∈ ((Base‘𝑅) ↑m {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}))
49		eqid 2769	. . . . . . 7 ⊢ (𝐼 mPwSer 𝑅) = (𝐼 mPwSer 𝑅)
50		eqid 2769	. . . . . . 7 ⊢ (Base‘(𝐼 mPwSer 𝑅)) = (Base‘(𝐼 mPwSer 𝑅))
51	49, 13, 15, 50, 1	psrbas 22049	. . . . . 6 ⊢ (𝜑 → (Base‘(𝐼 mPwSer 𝑅)) = ((Base‘𝑅) ↑m {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}))
52	51	adantr 485	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (Base‘(𝐼 mPwSer 𝑅)) = ((Base‘𝑅) ↑m {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}))
53	48, 52	eleqtrrd 2872	. . . 4 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))) ∈ (Base‘(𝐼 mPwSer 𝑅)))
54		coeq1 5841	. . . . . . 7 ⊢ (𝑥 = 𝑦 → (𝑥 ∘ (1st ‘𝑐)) = (𝑦 ∘ (1st ‘𝑐)))
55	54	fveq2d 6883	. . . . . 6 ⊢ (𝑥 = 𝑦 → ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐))) = ((2nd ‘𝑐)‘(𝑦 ∘ (1st ‘𝑐))))
56	55	cbvmptv 5216	. . . . 5 ⊢ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))) = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑦 ∘ (1st ‘𝑐))))
57		fveq1 6878	. . . . . . . 8 ⊢ (𝑔 = (2nd ‘𝑐) → (𝑔‘(𝑦 ∘ 𝑞)) = ((2nd ‘𝑐)‘(𝑦 ∘ 𝑞)))
58	57	mpteq2dv 5206	. . . . . . 7 ⊢ (𝑔 = (2nd ‘𝑐) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑦 ∘ 𝑞))))
59	58	breq1d 5120	. . . . . 6 ⊢ (𝑔 = (2nd ‘𝑐) → ((𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) finSupp (0g‘𝑅) ↔ (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑦 ∘ 𝑞))) finSupp (0g‘𝑅)))
60		coeq2 5842	. . . . . . . . 9 ⊢ (𝑞 = (1st ‘𝑐) → (𝑦 ∘ 𝑞) = (𝑦 ∘ (1st ‘𝑐)))
61	60	fveq2d 6883	. . . . . . . 8 ⊢ (𝑞 = (1st ‘𝑐) → ((2nd ‘𝑐)‘(𝑦 ∘ 𝑞)) = ((2nd ‘𝑐)‘(𝑦 ∘ (1st ‘𝑐))))
62	61	mpteq2dv 5206	. . . . . . 7 ⊢ (𝑞 = (1st ‘𝑐) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑦 ∘ 𝑞))) = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑦 ∘ (1st ‘𝑐)))))
63	62	breq1d 5120	. . . . . 6 ⊢ (𝑞 = (1st ‘𝑐) → ((𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑦 ∘ 𝑞))) finSupp (0g‘𝑅) ↔ (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑦 ∘ (1st ‘𝑐)))) finSupp (0g‘𝑅)))
64		mplvrpmga.4	. . . . . . . . . . . . 13 ⊢ 𝐴 = (𝑑 ∈ 𝑃, 𝑓 ∈ 𝑀 ↦ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))))
65	64	a1i 11	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) → 𝐴 = (𝑑 ∈ 𝑃, 𝑓 ∈ 𝑀 ↦ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑)))))
66		simpr 489	. . . . . . . . . . . . . . 15 ⊢ ((𝑑 = 𝑞 ∧ 𝑓 = 𝑔) → 𝑓 = 𝑔)
67		coeq2 5842	. . . . . . . . . . . . . . . 16 ⊢ (𝑑 = 𝑞 → (𝑥 ∘ 𝑑) = (𝑥 ∘ 𝑞))
68	67	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝑑 = 𝑞 ∧ 𝑓 = 𝑔) → (𝑥 ∘ 𝑑) = (𝑥 ∘ 𝑞))
69	66, 68	fveq12d 6886	. . . . . . . . . . . . . 14 ⊢ ((𝑑 = 𝑞 ∧ 𝑓 = 𝑔) → (𝑓‘(𝑥 ∘ 𝑑)) = (𝑔‘(𝑥 ∘ 𝑞)))
70	69	mpteq2dv 5206	. . . . . . . . . . . . 13 ⊢ ((𝑑 = 𝑞 ∧ 𝑓 = 𝑔) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ 𝑞))))
71	70	adantl 486	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) ∧ (𝑑 = 𝑞 ∧ 𝑓 = 𝑔)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ 𝑞))))
72		simpr 489	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) → 𝑞 ∈ 𝑃)
73		simplr 780	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) → 𝑔 ∈ 𝑀)
74	10	mptex 7219	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ 𝑞))) ∈ V
75	74	a1i 11	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ 𝑞))) ∈ V)
76	65, 71, 72, 73, 75	ovmpod 7560	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) → (𝑞𝐴𝑔) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ 𝑞))))
77		coeq1 5841	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑦 → (𝑥 ∘ 𝑞) = (𝑦 ∘ 𝑞))
78	77	fveq2d 6883	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑦 → (𝑔‘(𝑥 ∘ 𝑞)) = (𝑔‘(𝑦 ∘ 𝑞)))
79	78	cbvmptv 5216	. . . . . . . . . . 11 ⊢ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ 𝑞))) = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))
80	76, 79	eqtrdi 2820	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) → (𝑞𝐴𝑔) = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))))
81	1	ad2antrr 738	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) → 𝐼 ∈ 𝑉)
82		eqid 2769	. . . . . . . . . . 11 ⊢ (0g‘𝑅) = (0g‘𝑅)
83	2, 29, 5, 64, 81, 82, 73, 72	mplvrpmfgalem 33875	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) → (𝑞𝐴𝑔) finSupp (0g‘𝑅))
84	80, 83	eqbrtrrd 5136	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑞 ∈ 𝑃) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) finSupp (0g‘𝑅))
85	84	anasss 471	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔 ∈ 𝑀 ∧ 𝑞 ∈ 𝑃)) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) finSupp (0g‘𝑅))
86	85	ralrimivva 3214	. . . . . . 7 ⊢ (𝜑 → ∀𝑔 ∈ 𝑀 ∀𝑞 ∈ 𝑃 (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) finSupp (0g‘𝑅))
87	86	adantr 485	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → ∀𝑔 ∈ 𝑀 ∀𝑞 ∈ 𝑃 (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) finSupp (0g‘𝑅))
88	16	adantl 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (2nd ‘𝑐) ∈ 𝑀)
89	27	adantl 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (1st ‘𝑐) ∈ 𝑃)
90	59, 63, 87, 88, 89	rspc2dv 3605	. . . . 5 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑦 ∘ (1st ‘𝑐)))) finSupp (0g‘𝑅))
91	56, 90	eqbrtrid 5147	. . . 4 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))) finSupp (0g‘𝑅))
92	12, 49, 50, 82, 5	mplelbas 22105	. . . 4 ⊢ ((𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))) ∈ 𝑀 ↔ ((𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))) ∈ (Base‘(𝐼 mPwSer 𝑅)) ∧ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))) finSupp (0g‘𝑅)))
93	53, 91, 92	sylanbrc 594	. . 3 ⊢ ((𝜑 ∧ 𝑐 ∈ (𝑃 × 𝑀)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))) ∈ 𝑀)
94		vex 3467	. . . . . . . 8 ⊢ 𝑑 ∈ V
95		vex 3467	. . . . . . . 8 ⊢ 𝑓 ∈ V
96	94, 95	op2ndd 7993	. . . . . . 7 ⊢ (𝑐 = ⟨𝑑, 𝑓⟩ → (2nd ‘𝑐) = 𝑓)
97	94, 95	op1std 7992	. . . . . . . 8 ⊢ (𝑐 = ⟨𝑑, 𝑓⟩ → (1st ‘𝑐) = 𝑑)
98	97	coeq2d 5846	. . . . . . 7 ⊢ (𝑐 = ⟨𝑑, 𝑓⟩ → (𝑥 ∘ (1st ‘𝑐)) = (𝑥 ∘ 𝑑))
99	96, 98	fveq12d 6886	. . . . . 6 ⊢ (𝑐 = ⟨𝑑, 𝑓⟩ → ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐))) = (𝑓‘(𝑥 ∘ 𝑑)))
100	99	mpteq2dv 5206	. . . . 5 ⊢ (𝑐 = ⟨𝑑, 𝑓⟩ → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))))
101	100	mpompt 7522	. . . 4 ⊢ (𝑐 ∈ (𝑃 × 𝑀) ↦ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐))))) = (𝑑 ∈ 𝑃, 𝑓 ∈ 𝑀 ↦ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))))
102	64, 101	eqtr4i 2795	. . 3 ⊢ 𝐴 = (𝑐 ∈ (𝑃 × 𝑀) ↦ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ ((2nd ‘𝑐)‘(𝑥 ∘ (1st ‘𝑐)))))
103	93, 102	fmptd 7107	. 2 ⊢ (𝜑 → 𝐴:(𝑃 × 𝑀)⟶𝑀)
104	2	symgid 19467	. . . . . . . 8 ⊢ (𝐼 ∈ 𝑉 → ( I ↾ 𝐼) = (0g‘𝑆))
105	1, 104	syl 18	. . . . . . 7 ⊢ (𝜑 → ( I ↾ 𝐼) = (0g‘𝑆))
106	105	adantr 485	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → ( I ↾ 𝐼) = (0g‘𝑆))
107	106	oveq1d 7423	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → (( I ↾ 𝐼)𝐴𝑔) = ((0g‘𝑆)𝐴𝑔))
108	64	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → 𝐴 = (𝑑 ∈ 𝑃, 𝑓 ∈ 𝑀 ↦ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑)))))
109	1	ad2antrr 738	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝐼 ∈ 𝑉)
110	20	a1i 11	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → ℕ0 ∈ V)
111	23	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ⊆ (ℕ0 ↑m 𝐼))
112	111	sselda 3945	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥 ∈ (ℕ0 ↑m 𝐼))
113	109, 110, 112	elmaprd 32962	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥:𝐼⟶ℕ0)
114		fcoi1 6750	. . . . . . . . . . 11 ⊢ (𝑥:𝐼⟶ℕ0 → (𝑥 ∘ ( I ↾ 𝐼)) = 𝑥)
115	113, 114	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ ( I ↾ 𝐼)) = 𝑥)
116	115	fveq2d 6883	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑔‘(𝑥 ∘ ( I ↾ 𝐼))) = (𝑔‘𝑥))
117	116	mpteq2dva 5205	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ ( I ↾ 𝐼)))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘𝑥)))
118	117	adantr 485	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ (𝑑 = ( I ↾ 𝐼) ∧ 𝑓 = 𝑔)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ ( I ↾ 𝐼)))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘𝑥)))
119		simpr 489	. . . . . . . . . 10 ⊢ ((𝑑 = ( I ↾ 𝐼) ∧ 𝑓 = 𝑔) → 𝑓 = 𝑔)
120		coeq2 5842	. . . . . . . . . . 11 ⊢ (𝑑 = ( I ↾ 𝐼) → (𝑥 ∘ 𝑑) = (𝑥 ∘ ( I ↾ 𝐼)))
121	120	adantr 485	. . . . . . . . . 10 ⊢ ((𝑑 = ( I ↾ 𝐼) ∧ 𝑓 = 𝑔) → (𝑥 ∘ 𝑑) = (𝑥 ∘ ( I ↾ 𝐼)))
122	119, 121	fveq12d 6886	. . . . . . . . 9 ⊢ ((𝑑 = ( I ↾ 𝐼) ∧ 𝑓 = 𝑔) → (𝑓‘(𝑥 ∘ 𝑑)) = (𝑔‘(𝑥 ∘ ( I ↾ 𝐼))))
123	122	mpteq2dv 5206	. . . . . . . 8 ⊢ ((𝑑 = ( I ↾ 𝐼) ∧ 𝑓 = 𝑔) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ ( I ↾ 𝐼)))))
124	123	adantl 486	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ (𝑑 = ( I ↾ 𝐼) ∧ 𝑓 = 𝑔)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ ( I ↾ 𝐼)))))
125	12, 49, 50, 82, 5	mplelbas 22105	. . . . . . . . . . . 12 ⊢ (𝑔 ∈ 𝑀 ↔ (𝑔 ∈ (Base‘(𝐼 mPwSer 𝑅)) ∧ 𝑔 finSupp (0g‘𝑅)))
126	125	simplbi 501	. . . . . . . . . . 11 ⊢ (𝑔 ∈ 𝑀 → 𝑔 ∈ (Base‘(𝐼 mPwSer 𝑅)))
127	49, 13, 15, 50, 126	psrelbas 22050	. . . . . . . . . 10 ⊢ (𝑔 ∈ 𝑀 → 𝑔:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}⟶(Base‘𝑅))
128	127	ad3antlr 743	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑑 = ( I ↾ 𝐼)) ∧ 𝑓 = 𝑔) → 𝑔:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}⟶(Base‘𝑅))
129	128	feqmptd 6947	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑑 = ( I ↾ 𝐼)) ∧ 𝑓 = 𝑔) → 𝑔 = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘𝑥)))
130	129	anasss 471	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ (𝑑 = ( I ↾ 𝐼) ∧ 𝑓 = 𝑔)) → 𝑔 = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘𝑥)))
131	118, 124, 130	3eqtr4d 2814	. . . . . 6 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ (𝑑 = ( I ↾ 𝐼) ∧ 𝑓 = 𝑔)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))) = 𝑔)
132		eqid 2769	. . . . . . . . . 10 ⊢ (0g‘𝑆) = (0g‘𝑆)
133	29, 132	grpidcl 19028	. . . . . . . . 9 ⊢ (𝑆 ∈ Grp → (0g‘𝑆) ∈ 𝑃)
134	1, 3, 133	3syl 19	. . . . . . . 8 ⊢ (𝜑 → (0g‘𝑆) ∈ 𝑃)
135	105, 134	eqeltrd 2869	. . . . . . 7 ⊢ (𝜑 → ( I ↾ 𝐼) ∈ 𝑃)
136	135	adantr 485	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → ( I ↾ 𝐼) ∈ 𝑃)
137		simpr 489	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → 𝑔 ∈ 𝑀)
138	108, 131, 136, 137, 137	ovmpod 7560	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → (( I ↾ 𝐼)𝐴𝑔) = 𝑔)
139	107, 138	eqtr3d 2806	. . . 4 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → ((0g‘𝑆)𝐴𝑔) = 𝑔)
140		eqid 2769	. . . . . . . . . 10 ⊢ (+g‘𝑆) = (+g‘𝑆)
141	2, 29, 140	symgov 19450	. . . . . . . . 9 ⊢ ((𝑝 ∈ 𝑃 ∧ 𝑞 ∈ 𝑃) → (𝑝(+g‘𝑆)𝑞) = (𝑝 ∘ 𝑞))
142	141	adantll 726	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑝(+g‘𝑆)𝑞) = (𝑝 ∘ 𝑞))
143	142	oveq1d 7423	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → ((𝑝(+g‘𝑆)𝑞)𝐴𝑔) = ((𝑝 ∘ 𝑞)𝐴𝑔))
144		coass 6264	. . . . . . . . . . 11 ⊢ ((𝑥 ∘ 𝑝) ∘ 𝑞) = (𝑥 ∘ (𝑝 ∘ 𝑞))
145	144	a1i 11	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → ((𝑥 ∘ 𝑝) ∘ 𝑞) = (𝑥 ∘ (𝑝 ∘ 𝑞)))
146	145	fveq2d 6883	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞)) = (𝑔‘(𝑥 ∘ (𝑝 ∘ 𝑞))))
147	146	mpteq2dva 5205	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ (𝑝 ∘ 𝑞)))))
148	80	adantlr 727	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑞𝐴𝑔) = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))))
149	148	oveq2d 7424	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑝𝐴(𝑞𝐴𝑔)) = (𝑝𝐴(𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))))
150	64	a1i 11	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → 𝐴 = (𝑑 ∈ 𝑃, 𝑓 ∈ 𝑀 ↦ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑)))))
151		simpllr 787	. . . . . . . . . . . . . . 15 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑑 = 𝑝)
152	151	coeq2d 5846	. . . . . . . . . . . . . 14 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ 𝑑) = (𝑥 ∘ 𝑝))
153	152	fveq2d 6883	. . . . . . . . . . . . 13 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑓‘(𝑥 ∘ 𝑑)) = (𝑓‘(𝑥 ∘ 𝑝)))
154		simplr 780	. . . . . . . . . . . . . 14 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))))
155		simpr 489	. . . . . . . . . . . . . . . 16 ⊢ ((((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) ∧ 𝑦 = (𝑥 ∘ 𝑝)) → 𝑦 = (𝑥 ∘ 𝑝))
156	155	coeq1d 5845	. . . . . . . . . . . . . . 15 ⊢ ((((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) ∧ 𝑦 = (𝑥 ∘ 𝑝)) → (𝑦 ∘ 𝑞) = ((𝑥 ∘ 𝑝) ∘ 𝑞))
157	156	fveq2d 6883	. . . . . . . . . . . . . 14 ⊢ ((((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) ∧ 𝑦 = (𝑥 ∘ 𝑝)) → (𝑔‘(𝑦 ∘ 𝑞)) = (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞)))
158		breq1 5113	. . . . . . . . . . . . . . 15 ⊢ (ℎ = (𝑥 ∘ 𝑝) → (ℎ finSupp 0 ↔ (𝑥 ∘ 𝑝) finSupp 0))
159	20	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → ℕ0 ∈ V)
160	1	ad3antrrr 742	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → 𝐼 ∈ 𝑉)
161	160	ad3antrrr 742	. . . . . . . . . . . . . . . 16 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝐼 ∈ 𝑉)
162	23	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) → {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ⊆ (ℕ0 ↑m 𝐼))
163	162	sselda 3945	. . . . . . . . . . . . . . . . . 18 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥 ∈ (ℕ0 ↑m 𝐼))
164	161, 159, 163	elmaprd 32962	. . . . . . . . . . . . . . . . 17 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥:𝐼⟶ℕ0)
165	2, 29	symgbasf 19442	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 ∈ 𝑃 → 𝑝:𝐼⟶𝐼)
166	165	ad5antlr 747	. . . . . . . . . . . . . . . . 17 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑝:𝐼⟶𝐼)
167	164, 166	fcod 6729	. . . . . . . . . . . . . . . 16 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ 𝑝):𝐼⟶ℕ0)
168	159, 161, 167	elmapdd 8834	. . . . . . . . . . . . . . 15 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ 𝑝) ∈ (ℕ0 ↑m 𝐼))
169	35	simprbi 502	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} → 𝑥 finSupp 0)
170	169	adantl 486	. . . . . . . . . . . . . . . 16 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥 finSupp 0)
171	2, 29	symgbasf1o 19441	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 ∈ 𝑃 → 𝑝:𝐼–1-1-onto→𝐼)
172		f1of1 6817	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝:𝐼–1-1-onto→𝐼 → 𝑝:𝐼–1-1→𝐼)
173	171, 172	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝑝 ∈ 𝑃 → 𝑝:𝐼–1-1→𝐼)
174	173	ad5antlr 747	. . . . . . . . . . . . . . . 16 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑝:𝐼–1-1→𝐼)
175	41	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 0 ∈ ℕ0)
176		simpr 489	. . . . . . . . . . . . . . . 16 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0})
177	170, 174, 175, 176	fsuppco 9358	. . . . . . . . . . . . . . 15 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ 𝑝) finSupp 0)
178	158, 168, 177	elrabd 3661	. . . . . . . . . . . . . 14 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑥 ∘ 𝑝) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0})
179		fvexd 6894	. . . . . . . . . . . . . 14 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞)) ∈ V)
180		nfv 1941	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑦((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝)
181		nfmpt1 5211	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑦(𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))
182	181	nfeq2 2948	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑦 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))
183	180, 182	nfan 1926	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑦(((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))))
184		nfv 1941	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑦 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}
185	183, 184	nfan 1926	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑦((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0})
186		nfcv 2931	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑦(𝑥 ∘ 𝑝)
187		nfcv 2931	. . . . . . . . . . . . . 14 ⊢ Ⅎ𝑦(𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞))
188	154, 157, 178, 179, 185, 186, 187	fvmptdf 6994	. . . . . . . . . . . . 13 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑓‘(𝑥 ∘ 𝑝)) = (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞)))
189	153, 188	eqtrd 2804	. . . . . . . . . . . 12 ⊢ (((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) ∧ 𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑓‘(𝑥 ∘ 𝑑)) = (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞)))
190	189	mpteq2dva 5205	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑑 = 𝑝) ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞))))
191	190	anasss 471	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ (𝑑 = 𝑝 ∧ 𝑓 = (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))))) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞))))
192		simplr 780	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → 𝑝 ∈ 𝑃)
193		fvexd 6894	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (Base‘𝑅) ∈ V)
194	10	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ∈ V)
195	137	ad3antrrr 742	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑔 ∈ 𝑀)
196	12, 13, 5, 15, 195	mplelf 22112	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑔:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}⟶(Base‘𝑅))
197		breq1 5113	. . . . . . . . . . . . . . . 16 ⊢ (ℎ = (𝑦 ∘ 𝑞) → (ℎ finSupp 0 ↔ (𝑦 ∘ 𝑞) finSupp 0))
198	20	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → ℕ0 ∈ V)
199	160	adantr 485	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝐼 ∈ 𝑉)
200	23	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ⊆ (ℕ0 ↑m 𝐼))
201	200	sselda 3945	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑦 ∈ (ℕ0 ↑m 𝐼))
202	199, 198, 201	elmaprd 32962	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑦:𝐼⟶ℕ0)
203	2, 29	symgbasf 19442	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑞 ∈ 𝑃 → 𝑞:𝐼⟶𝐼)
204	203	ad2antlr 739	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑞:𝐼⟶𝐼)
205	202, 204	fcod 6729	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑦 ∘ 𝑞):𝐼⟶ℕ0)
206	198, 199, 205	elmapdd 8834	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑦 ∘ 𝑞) ∈ (ℕ0 ↑m 𝐼))
207		breq1 5113	. . . . . . . . . . . . . . . . . . . 20 ⊢ (ℎ = 𝑦 → (ℎ finSupp 0 ↔ 𝑦 finSupp 0))
208	207	elrab 3659	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↔ (𝑦 ∈ (ℕ0 ↑m 𝐼) ∧ 𝑦 finSupp 0))
209	208	simprbi 502	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} → 𝑦 finSupp 0)
210	209	adantl 486	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑦 finSupp 0)
211	2, 29	symgbasf1o 19441	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑞 ∈ 𝑃 → 𝑞:𝐼–1-1-onto→𝐼)
212	211	ad2antlr 739	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑞:𝐼–1-1-onto→𝐼)
213		f1of1 6817	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑞:𝐼–1-1-onto→𝐼 → 𝑞:𝐼–1-1→𝐼)
214	212, 213	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑞:𝐼–1-1→𝐼)
215	41	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 0 ∈ ℕ0)
216		simpr 489	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0})
217	210, 214, 215, 216	fsuppco 9358	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑦 ∘ 𝑞) finSupp 0)
218	197, 206, 217	elrabd 3661	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑦 ∘ 𝑞) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0})
219	196, 218	ffvelcdmd 7078	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ 𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}) → (𝑔‘(𝑦 ∘ 𝑞)) ∈ (Base‘𝑅))
220	219	fmpttd 7108	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}⟶(Base‘𝑅))
221	193, 194, 220	elmapdd 8834	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) ∈ ((Base‘𝑅) ↑m {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}))
222	51	ad3antrrr 742	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (Base‘(𝐼 mPwSer 𝑅)) = ((Base‘𝑅) ↑m {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0}))
223	221, 222	eleqtrrd 2872	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) ∈ (Base‘(𝐼 mPwSer 𝑅)))
224	84	adantlr 727	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) finSupp (0g‘𝑅))
225	12, 49, 50, 82, 5	mplelbas 22105	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) ∈ 𝑀 ↔ ((𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) ∈ (Base‘(𝐼 mPwSer 𝑅)) ∧ (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) finSupp (0g‘𝑅)))
226	223, 224, 225	sylanbrc 594	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞))) ∈ 𝑀)
227	194	mptexd 7220	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞))) ∈ V)
228	150, 191, 192, 226, 227	ovmpod 7560	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑝𝐴(𝑦 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑦 ∘ 𝑞)))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞))))
229	149, 228	eqtrd 2804	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑝𝐴(𝑞𝐴𝑔)) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘((𝑥 ∘ 𝑝) ∘ 𝑞))))
230		simpr 489	. . . . . . . . . . . 12 ⊢ ((𝑑 = (𝑝 ∘ 𝑞) ∧ 𝑓 = 𝑔) → 𝑓 = 𝑔)
231		coeq2 5842	. . . . . . . . . . . . 13 ⊢ (𝑑 = (𝑝 ∘ 𝑞) → (𝑥 ∘ 𝑑) = (𝑥 ∘ (𝑝 ∘ 𝑞)))
232	231	adantr 485	. . . . . . . . . . . 12 ⊢ ((𝑑 = (𝑝 ∘ 𝑞) ∧ 𝑓 = 𝑔) → (𝑥 ∘ 𝑑) = (𝑥 ∘ (𝑝 ∘ 𝑞)))
233	230, 232	fveq12d 6886	. . . . . . . . . . 11 ⊢ ((𝑑 = (𝑝 ∘ 𝑞) ∧ 𝑓 = 𝑔) → (𝑓‘(𝑥 ∘ 𝑑)) = (𝑔‘(𝑥 ∘ (𝑝 ∘ 𝑞))))
234	233	mpteq2dv 5206	. . . . . . . . . 10 ⊢ ((𝑑 = (𝑝 ∘ 𝑞) ∧ 𝑓 = 𝑔) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ (𝑝 ∘ 𝑞)))))
235	234	adantl 486	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) ∧ (𝑑 = (𝑝 ∘ 𝑞) ∧ 𝑓 = 𝑔)) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑓‘(𝑥 ∘ 𝑑))) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ (𝑝 ∘ 𝑞)))))
236	160, 3	syl 18	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → 𝑆 ∈ Grp)
237		simpr 489	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → 𝑞 ∈ 𝑃)
238	29, 140, 236, 192, 237	grpcld 19010	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑝(+g‘𝑆)𝑞) ∈ 𝑃)
239	142, 238	eqeltrrd 2870	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑝 ∘ 𝑞) ∈ 𝑃)
240		simpllr 787	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → 𝑔 ∈ 𝑀)
241	194	mptexd 7220	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ (𝑝 ∘ 𝑞)))) ∈ V)
242	150, 235, 239, 240, 241	ovmpod 7560	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → ((𝑝 ∘ 𝑞)𝐴𝑔) = (𝑥 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} ↦ (𝑔‘(𝑥 ∘ (𝑝 ∘ 𝑞)))))
243	147, 229, 242	3eqtr4rd 2815	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → ((𝑝 ∘ 𝑞)𝐴𝑔) = (𝑝𝐴(𝑞𝐴𝑔)))
244	143, 243	eqtrd 2804	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ 𝑝 ∈ 𝑃) ∧ 𝑞 ∈ 𝑃) → ((𝑝(+g‘𝑆)𝑞)𝐴𝑔) = (𝑝𝐴(𝑞𝐴𝑔)))
245	244	anasss 471	. . . . 5 ⊢ (((𝜑 ∧ 𝑔 ∈ 𝑀) ∧ (𝑝 ∈ 𝑃 ∧ 𝑞 ∈ 𝑃)) → ((𝑝(+g‘𝑆)𝑞)𝐴𝑔) = (𝑝𝐴(𝑞𝐴𝑔)))
246	245	ralrimivva 3214	. . . 4 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → ∀𝑝 ∈ 𝑃 ∀𝑞 ∈ 𝑃 ((𝑝(+g‘𝑆)𝑞)𝐴𝑔) = (𝑝𝐴(𝑞𝐴𝑔)))
247	139, 246	jca 520	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑀) → (((0g‘𝑆)𝐴𝑔) = 𝑔 ∧ ∀𝑝 ∈ 𝑃 ∀𝑞 ∈ 𝑃 ((𝑝(+g‘𝑆)𝑞)𝐴𝑔) = (𝑝𝐴(𝑞𝐴𝑔))))
248	247	ralrimiva 3163	. 2 ⊢ (𝜑 → ∀𝑔 ∈ 𝑀 (((0g‘𝑆)𝐴𝑔) = 𝑔 ∧ ∀𝑝 ∈ 𝑃 ∀𝑞 ∈ 𝑃 ((𝑝(+g‘𝑆)𝑞)𝐴𝑔) = (𝑝𝐴(𝑞𝐴𝑔))))
249	29, 140, 132	isga 19357	. 2 ⊢ (𝐴 ∈ (𝑆 GrpAct 𝑀) ↔ ((𝑆 ∈ Grp ∧ 𝑀 ∈ V) ∧ (𝐴:(𝑃 × 𝑀)⟶𝑀 ∧ ∀𝑔 ∈ 𝑀 (((0g‘𝑆)𝐴𝑔) = 𝑔 ∧ ∀𝑝 ∈ 𝑃 ∀𝑞 ∈ 𝑃 ((𝑝(+g‘𝑆)𝑞)𝐴𝑔) = (𝑝𝐴(𝑞𝐴𝑔))))))
250	4, 7, 103, 248, 249	syl22anbrc 32743	1 ⊢ (𝜑 → 𝐴 ∈ (𝑆 GrpAct 𝑀))

Syntax hints:   → wi 4   ∧ wa 400   = wceq 1567   ∈ wcel 2149  ∀wral 3085  {crab 3423  Vcvv 3463   ⊆ wss 3913  ⟨cop 4597   class class class wbr 5110   ↦ cmpt 5193   I cid 5553   × cxp 5657   ↾ cres 5661   ∘ ccom 5663  ⟶wf 6529  –1-1→wf1 6530  –1-1-onto→wf1o 6532  ‘cfv 6533  (class class class)co 7408   ∈ cmpo 7410  1^st c1st 7980  2^nd c2nd 7981   ↑_m cmap 8820   finSupp cfsupp 9317  0cc0 11096  ℕ₀cn0 12500  Basecbs 17265  +_gcplusg 17306  0_gc0g 17488  Grpcgrp 18996   GrpAct cga 19355  SymGrpcsymg 19435   mPwSer cmps 22019   mPoly cmpl 22021

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5239  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730  ax-cnex 11152  ax-resscn 11153  ax-1cn 11154  ax-icn 11155  ax-addcl 11156  ax-addrcl 11157  ax-mulcl 11158  ax-mulrcl 11159  ax-mulcom 11160  ax-addass 11161  ax-mulass 11162  ax-distr 11163  ax-i2m1 11164  ax-1ne0 11165  ax-1rid 11166  ax-rnegex 11167  ax-rrecex 11168  ax-cnre 11169  ax-pre-lttri 11170  ax-pre-lttrn 11171  ax-pre-ltadd 11172  ax-pre-mulgt0 11173

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4874  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-of 7672  df-om 7859  df-1st 7982  df-2nd 7983  df-supp 8153  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-er 8690  df-map 8822  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-fsupp 9318  df-pnf 11241  df-mnf 11242  df-xr 11243  df-ltxr 11244  df-le 11245  df-sub 11439  df-neg 11440  df-nn 12230  df-2 12299  df-3 12300  df-4 12301  df-5 12302  df-6 12303  df-7 12304  df-8 12305  df-9 12306  df-n0 12501  df-z 12588  df-uz 12859  df-fz 13532  df-struct 17203  df-sets 17220  df-slot 17238  df-ndx 17250  df-base 17266  df-ress 17287  df-plusg 17319  df-mulr 17320  df-sca 17322  df-vsca 17323  df-tset 17325  df-0g 17490  df-mgm 18694  df-sgrp 18773  df-mnd 18789  df-submnd 18838  df-efmnd 18924  df-grp 18999  df-ga 19356  df-symg 19436  df-psr 22024  df-mpl 22026

This theorem is referenced by:  mplvrpmmhm  33877  mplvrpmrhm  33878  splysubrg  33891  issply  33892