Theorem selvascl 34082

Description: The "variable selection" function evaluated at a scalar. (Contributed by Thierry Arnoux, 4-May-2026.)

Hypotheses

Ref	Expression
selvascl.1	⊢ 𝐵 = (Base‘𝑅)
selvascl.2	⊢ 𝑃 = (𝐼 mPoly 𝑅)
selvascl.3	⊢ 𝐴 = (algSc‘𝑃)
selvascl.4	⊢ 𝐶 = (algSc‘𝑇)
selvascl.5	⊢ (𝜑 → 𝐼 ∈ 𝑉)
selvascl.6	⊢ (𝜑 → 𝑋 ∈ 𝐵)
selvascl.7	⊢ 𝑈 = ((𝐼 ∖ 𝐽) mPoly 𝑅)
selvascl.8	⊢ 𝑇 = (𝐽 mPoly 𝑈)
selvascl.9	⊢ 𝐷 = (𝐶 ∘ (algSc‘𝑈))
selvascl.10	⊢ (𝜑 → 𝑅 ∈ CRing)
selvascl.11	⊢ (𝜑 → 𝐽 ⊆ 𝐼)

Assertion

Ref	Expression
selvascl	⊢ (𝜑 → (((𝐼 selectVars 𝑅)‘𝐽)‘(𝐴‘𝑋)) = (𝐷‘𝑋))

Proof of Theorem selvascl

Dummy variables 𝑖 ℎ are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		selvascl.9	. . . . . . . . . 10 ⊢ 𝐷 = (𝐶 ∘ (algSc‘𝑈))
2	1	coeq1i 5833	. . . . . . . . 9 ⊢ (𝐷 ∘ (𝐴‘𝑋)) = ((𝐶 ∘ (algSc‘𝑈)) ∘ (𝐴‘𝑋))
3		coass 6256	. . . . . . . . 9 ⊢ ((𝐶 ∘ (algSc‘𝑈)) ∘ (𝐴‘𝑋)) = (𝐶 ∘ ((algSc‘𝑈) ∘ (𝐴‘𝑋)))
4	2, 3	eqtri 2783	. . . . . . . 8 ⊢ (𝐷 ∘ (𝐴‘𝑋)) = (𝐶 ∘ ((algSc‘𝑈) ∘ (𝐴‘𝑋)))
5		selvascl.1	. . . . . . . . . 10 ⊢ 𝐵 = (Base‘𝑅)
6		selvascl.7	. . . . . . . . . 10 ⊢ 𝑈 = ((𝐼 ∖ 𝐽) mPoly 𝑅)
7		selvascl.2	. . . . . . . . . 10 ⊢ 𝑃 = (𝐼 mPoly 𝑅)
8		eqid 2760	. . . . . . . . . 10 ⊢ (𝐼 mPoly 𝑈) = (𝐼 mPoly 𝑈)
9		eqid 2760	. . . . . . . . . 10 ⊢ (algSc‘𝑈) = (algSc‘𝑈)
10		selvascl.3	. . . . . . . . . 10 ⊢ 𝐴 = (algSc‘𝑃)
11		eqid 2760	. . . . . . . . . 10 ⊢ (algSc‘(𝐼 mPoly 𝑈)) = (algSc‘(𝐼 mPoly 𝑈))
12		eqid 2760	. . . . . . . . . 10 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} = {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}
13		eqid 2760	. . . . . . . . . 10 ⊢ {ℎ ∈ (ℕ0 ↑m (𝐼 ∖ 𝐽)) ∣ (◡ℎ “ ℕ) ∈ Fin} = {ℎ ∈ (ℕ0 ↑m (𝐼 ∖ 𝐽)) ∣ (◡ℎ “ ℕ) ∈ Fin}
14		selvascl.5	. . . . . . . . . 10 ⊢ (𝜑 → 𝐼 ∈ 𝑉)
15		difssd 4083	. . . . . . . . . 10 ⊢ (𝜑 → (𝐼 ∖ 𝐽) ⊆ 𝐼)
16		selvascl.10	. . . . . . . . . 10 ⊢ (𝜑 → 𝑅 ∈ CRing)
17		selvascl.6	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
18	5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17	mplasclco 34081	. . . . . . . . 9 ⊢ (𝜑 → ((algSc‘𝑈) ∘ (𝐴‘𝑋)) = ((algSc‘(𝐼 mPoly 𝑈))‘((algSc‘𝑈)‘𝑋)))
19	18	coeq2d 5836	. . . . . . . 8 ⊢ (𝜑 → (𝐶 ∘ ((algSc‘𝑈) ∘ (𝐴‘𝑋))) = (𝐶 ∘ ((algSc‘(𝐼 mPoly 𝑈))‘((algSc‘𝑈)‘𝑋))))
20	4, 19	eqtrid 2807	. . . . . . 7 ⊢ (𝜑 → (𝐷 ∘ (𝐴‘𝑋)) = (𝐶 ∘ ((algSc‘(𝐼 mPoly 𝑈))‘((algSc‘𝑈)‘𝑋))))
21		eqid 2760	. . . . . . . 8 ⊢ (Base‘𝑈) = (Base‘𝑈)
22		selvascl.8	. . . . . . . 8 ⊢ 𝑇 = (𝐽 mPoly 𝑈)
23		eqid 2760	. . . . . . . 8 ⊢ (𝐼 mPoly 𝑇) = (𝐼 mPoly 𝑇)
24		selvascl.4	. . . . . . . 8 ⊢ 𝐶 = (algSc‘𝑇)
25		eqid 2760	. . . . . . . 8 ⊢ (algSc‘(𝐼 mPoly 𝑇)) = (algSc‘(𝐼 mPoly 𝑇))
26		eqid 2760	. . . . . . . 8 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐽) ∣ (◡ℎ “ ℕ) ∈ Fin} = {ℎ ∈ (ℕ0 ↑m 𝐽) ∣ (◡ℎ “ ℕ) ∈ Fin}
27		selvascl.11	. . . . . . . 8 ⊢ (𝜑 → 𝐽 ⊆ 𝐼)
28	14	difexd 5292	. . . . . . . . 9 ⊢ (𝜑 → (𝐼 ∖ 𝐽) ∈ V)
29	6, 28, 16	mplcrngd 22292	. . . . . . . 8 ⊢ (𝜑 → 𝑈 ∈ CRing)
30		eqid 2760	. . . . . . . . . 10 ⊢ (Scalar‘𝑈) = (Scalar‘𝑈)
31	16	crngringd 20434	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 ∈ Ring)
32	6, 28, 31	mplringd 22291	. . . . . . . . . 10 ⊢ (𝜑 → 𝑈 ∈ Ring)
33	6, 28, 31	mpllmodd 22293	. . . . . . . . . 10 ⊢ (𝜑 → 𝑈 ∈ LMod)
34		eqid 2760	. . . . . . . . . 10 ⊢ (Base‘(Scalar‘𝑈)) = (Base‘(Scalar‘𝑈))
35	9, 30, 32, 33, 34, 21	asclf 22150	. . . . . . . . 9 ⊢ (𝜑 → (algSc‘𝑈):(Base‘(Scalar‘𝑈))⟶(Base‘𝑈))
36	6, 28, 31	mplsca 22281	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑅 = (Scalar‘𝑈))
37	36	fveq2d 6877	. . . . . . . . . . 11 ⊢ (𝜑 → (Base‘𝑅) = (Base‘(Scalar‘𝑈)))
38	5, 37	eqtr2id 2808	. . . . . . . . . 10 ⊢ (𝜑 → (Base‘(Scalar‘𝑈)) = 𝐵)
39	17, 38	eleqtrrd 2863	. . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ (Base‘(Scalar‘𝑈)))
40	35, 39	ffvelcdmd 7073	. . . . . . . 8 ⊢ (𝜑 → ((algSc‘𝑈)‘𝑋) ∈ (Base‘𝑈))
41	21, 22, 8, 23, 24, 11, 25, 12, 26, 14, 27, 29, 40	mplasclco 34081	. . . . . . 7 ⊢ (𝜑 → (𝐶 ∘ ((algSc‘(𝐼 mPoly 𝑈))‘((algSc‘𝑈)‘𝑋))) = ((algSc‘(𝐼 mPoly 𝑇))‘(𝐶‘((algSc‘𝑈)‘𝑋))))
42	20, 41	eqtrd 2795	. . . . . 6 ⊢ (𝜑 → (𝐷 ∘ (𝐴‘𝑋)) = ((algSc‘(𝐼 mPoly 𝑇))‘(𝐶‘((algSc‘𝑈)‘𝑋))))
43	42	fveq2d 6877	. . . . 5 ⊢ (𝜑 → ((𝐼 eval 𝑇)‘(𝐷 ∘ (𝐴‘𝑋))) = ((𝐼 eval 𝑇)‘((algSc‘(𝐼 mPoly 𝑇))‘(𝐶‘((algSc‘𝑈)‘𝑋)))))
44		eqid 2760	. . . . . 6 ⊢ (𝐼 eval 𝑇) = (𝐼 eval 𝑇)
45		eqid 2760	. . . . . 6 ⊢ (Base‘𝑇) = (Base‘𝑇)
46	14, 27	ssexd 5285	. . . . . . 7 ⊢ (𝜑 → 𝐽 ∈ V)
47	22, 46, 29	mplcrngd 22292	. . . . . 6 ⊢ (𝜑 → 𝑇 ∈ CRing)
48	22, 45, 21, 24, 46, 32	mplasclf 22335	. . . . . . 7 ⊢ (𝜑 → 𝐶:(Base‘𝑈)⟶(Base‘𝑇))
49	48, 40	ffvelcdmd 7073	. . . . . 6 ⊢ (𝜑 → (𝐶‘((algSc‘𝑈)‘𝑋)) ∈ (Base‘𝑇))
50	44, 23, 45, 25, 14, 47, 49	evlsca 22376	. . . . 5 ⊢ (𝜑 → ((𝐼 eval 𝑇)‘((algSc‘(𝐼 mPoly 𝑇))‘(𝐶‘((algSc‘𝑈)‘𝑋)))) = (((Base‘𝑇) ↑m 𝐼) × {(𝐶‘((algSc‘𝑈)‘𝑋))}))
51	43, 50	eqtrd 2795	. . . 4 ⊢ (𝜑 → ((𝐼 eval 𝑇)‘(𝐷 ∘ (𝐴‘𝑋))) = (((Base‘𝑇) ↑m 𝐼) × {(𝐶‘((algSc‘𝑈)‘𝑋))}))
52	51	fveq1d 6875	. . 3 ⊢ (𝜑 → (((𝐼 eval 𝑇)‘(𝐷 ∘ (𝐴‘𝑋)))‘(𝑖 ∈ 𝐼 ↦ if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖))))) = ((((Base‘𝑇) ↑m 𝐼) × {(𝐶‘((algSc‘𝑈)‘𝑋))})‘(𝑖 ∈ 𝐼 ↦ if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖))))))
53	47	crngringd 20434	. . . . . 6 ⊢ (𝜑 → 𝑇 ∈ Ring)
54	45	subrgid 20786	. . . . . 6 ⊢ (𝑇 ∈ Ring → (Base‘𝑇) ∈ (SubRing‘𝑇))
55	53, 54	syl 18	. . . . 5 ⊢ (𝜑 → (Base‘𝑇) ∈ (SubRing‘𝑇))
56		eqid 2760	. . . . . . . 8 ⊢ (𝐽 mVar 𝑈) = (𝐽 mVar 𝑈)
57	46	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ∈ 𝐽) → 𝐽 ∈ V)
58	32	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ∈ 𝐽) → 𝑈 ∈ Ring)
59		simpr 490	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ∈ 𝐽) → 𝑖 ∈ 𝐽)
60	22, 56, 45, 57, 58, 59	mvrcl 22260	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ∈ 𝐽) → ((𝐽 mVar 𝑈)‘𝑖) ∈ (Base‘𝑇))
61	48	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 ∈ 𝐽) → 𝐶:(Base‘𝑈)⟶(Base‘𝑇))
62		eqid 2760	. . . . . . . . 9 ⊢ ((𝐼 ∖ 𝐽) mVar 𝑅) = ((𝐼 ∖ 𝐽) mVar 𝑅)
63	28	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 ∈ 𝐽) → (𝐼 ∖ 𝐽) ∈ V)
64	31	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 ∈ 𝐽) → 𝑅 ∈ Ring)
65		simplr 781	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 ∈ 𝐽) → 𝑖 ∈ 𝐼)
66		simpr 490	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 ∈ 𝐽) → ¬ 𝑖 ∈ 𝐽)
67	65, 66	eldifd 3909	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 ∈ 𝐽) → 𝑖 ∈ (𝐼 ∖ 𝐽))
68	6, 62, 21, 63, 64, 67	mvrcl 22260	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 ∈ 𝐽) → (((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖) ∈ (Base‘𝑈))
69	61, 68	ffvelcdmd 7073	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 ∈ 𝐽) → (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖)) ∈ (Base‘𝑇))
70	60, 69	ifclda 4517	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝐼) → if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖))) ∈ (Base‘𝑇))
71	70	fmpttd 7103	. . . . 5 ⊢ (𝜑 → (𝑖 ∈ 𝐼 ↦ if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖)))):𝐼⟶(Base‘𝑇))
72	55, 14, 71	elmapdd 8839	. . . 4 ⊢ (𝜑 → (𝑖 ∈ 𝐼 ↦ if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖)))) ∈ ((Base‘𝑇) ↑m 𝐼))
73		fvex 6886	. . . . 5 ⊢ (𝐶‘((algSc‘𝑈)‘𝑋)) ∈ V
74	73	fvconst2 7198	. . . 4 ⊢ ((𝑖 ∈ 𝐼 ↦ if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖)))) ∈ ((Base‘𝑇) ↑m 𝐼) → ((((Base‘𝑇) ↑m 𝐼) × {(𝐶‘((algSc‘𝑈)‘𝑋))})‘(𝑖 ∈ 𝐼 ↦ if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖))))) = (𝐶‘((algSc‘𝑈)‘𝑋)))
75	72, 74	syl 18	. . 3 ⊢ (𝜑 → ((((Base‘𝑇) ↑m 𝐼) × {(𝐶‘((algSc‘𝑈)‘𝑋))})‘(𝑖 ∈ 𝐼 ↦ if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖))))) = (𝐶‘((algSc‘𝑈)‘𝑋)))
76	52, 75	eqtrd 2795	. 2 ⊢ (𝜑 → (((𝐼 eval 𝑇)‘(𝐷 ∘ (𝐴‘𝑋)))‘(𝑖 ∈ 𝐼 ↦ if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖))))) = (𝐶‘((algSc‘𝑈)‘𝑋)))
77		eqid 2760	. . 3 ⊢ (Base‘𝑃) = (Base‘𝑃)
78		eqid 2760	. . . . 5 ⊢ (Scalar‘𝑃) = (Scalar‘𝑃)
79	7, 14, 31	mplringd 22291	. . . . 5 ⊢ (𝜑 → 𝑃 ∈ Ring)
80	7, 14, 31	mpllmodd 22293	. . . . 5 ⊢ (𝜑 → 𝑃 ∈ LMod)
81		eqid 2760	. . . . 5 ⊢ (Base‘(Scalar‘𝑃)) = (Base‘(Scalar‘𝑃))
82	10, 78, 79, 80, 81, 77	asclf 22150	. . . 4 ⊢ (𝜑 → 𝐴:(Base‘(Scalar‘𝑃))⟶(Base‘𝑃))
83	7, 14, 31	mplsca 22281	. . . . . . 7 ⊢ (𝜑 → 𝑅 = (Scalar‘𝑃))
84	83	fveq2d 6877	. . . . . 6 ⊢ (𝜑 → (Base‘𝑅) = (Base‘(Scalar‘𝑃)))
85	5, 84	eqtr2id 2808	. . . . 5 ⊢ (𝜑 → (Base‘(Scalar‘𝑃)) = 𝐵)
86	17, 85	eleqtrrd 2863	. . . 4 ⊢ (𝜑 → 𝑋 ∈ (Base‘(Scalar‘𝑃)))
87	82, 86	ffvelcdmd 7073	. . 3 ⊢ (𝜑 → (𝐴‘𝑋) ∈ (Base‘𝑃))
88	7, 77, 6, 22, 24, 1, 16, 27, 87	selvval2 22411	. 2 ⊢ (𝜑 → (((𝐼 selectVars 𝑅)‘𝐽)‘(𝐴‘𝑋)) = (((𝐼 eval 𝑇)‘(𝐷 ∘ (𝐴‘𝑋)))‘(𝑖 ∈ 𝐼 ↦ if(𝑖 ∈ 𝐽, ((𝐽 mVar 𝑈)‘𝑖), (𝐶‘(((𝐼 ∖ 𝐽) mVar 𝑅)‘𝑖))))))
89	35	ffund 6702	. . 3 ⊢ (𝜑 → Fun (algSc‘𝑈))
90	35	fdmd 6708	. . . 4 ⊢ (𝜑 → dom (algSc‘𝑈) = (Base‘(Scalar‘𝑈)))
91	39, 90	eleqtrrd 2863	. . 3 ⊢ (𝜑 → 𝑋 ∈ dom (algSc‘𝑈))
92	89, 91, 1	fvcod 6972	. 2 ⊢ (𝜑 → (𝐷‘𝑋) = (𝐶‘((algSc‘𝑈)‘𝑋)))
93	76, 88, 92	3eqtr4d 2805	1 ⊢ (𝜑 → (((𝐼 selectVars 𝑅)‘𝐽)‘(𝐴‘𝑋)) = (𝐷‘𝑋))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2145  {crab 3412  Vcvv 3450   ∖ cdif 3895   ⊆ wss 3898  ifcif 4481  {csn 4583   ↦ cmpt 5185   × cxp 5645  ^◡ccnv 5646  dom cdm 5647   “ cima 5650   ∘ ccom 5651  ⟶wf 6523  ‘cfv 6527  (class class class)co 7408   ↑_m cmap 8825  Fincfn 8951  ℕcn 12304  ℕ₀cn0 12575  Basecbs 17348  Scalarcsca 17392  Ringcrg 20420  CRingccrg 20421  SubRingcsubrg 20782  algSccascl 22121   mVar cmvr 22174   mPoly cmpl 22175   eval cevl 22343   selectVars cslv 22386

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7734  ax-cnex 11227  ax-resscn 11228  ax-1cn 11229  ax-icn 11230  ax-addcl 11231  ax-addrcl 11232  ax-mulcl 11233  ax-mulrcl 11234  ax-mulcom 11235  ax-addass 11236  ax-mulass 11237  ax-distr 11238  ax-i2m1 11239  ax-1ne0 11240  ax-1rid 11241  ax-rnegex 11242  ax-rrecex 11243  ax-cnre 11244  ax-pre-lttri 11245  ax-pre-lttrn 11246  ax-pre-ltadd 11247  ax-pre-mulgt0 11248

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-tp 4588  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-iin 4953  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-se 5601  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6293  df-ord 6354  df-on 6355  df-lim 6356  df-suc 6357  df-iota 6483  df-fun 6529  df-fn 6530  df-f 6531  df-f1 6532  df-fo 6533  df-f1o 6534  df-fv 6535  df-isom 6536  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-of 7676  df-ofr 7677  df-om 7861  df-1st 7984  df-2nd 7985  df-supp 8156  df-frecs 8277  df-wrecs 8308  df-recs 8357  df-rdg 8396  df-1o 8454  df-2o 8455  df-er 8695  df-map 8827  df-pm 8828  df-ixp 8904  df-en 8952  df-dom 8953  df-sdom 8954  df-fin 8955  df-fsupp 9332  df-sup 9412  df-oi 9482  df-card 9991  df-pnf 11316  df-mnf 11317  df-xr 11318  df-ltxr 11319  df-le 11320  df-sub 11514  df-neg 11515  df-nn 12305  df-2 12374  df-3 12375  df-4 12376  df-5 12377  df-6 12378  df-7 12379  df-8 12380  df-9 12381  df-n0 12576  df-z 12663  df-dec 12784  df-uz 12935  df-fz 13609  df-fzo 13757  df-seq 14113  df-hash 14442  df-struct 17286  df-sets 17303  df-slot 17321  df-ndx 17333  df-base 17349  df-ress 17370  df-plusg 17402  df-mulr 17403  df-sca 17405  df-vsca 17406  df-ip 17407  df-tset 17408  df-ple 17409  df-ds 17411  df-hom 17413  df-cco 17414  df-0g 17573  df-gsum 17574  df-prds 17579  df-pws 17581  df-mre 17717  df-mrc 17718  df-acs 17720  df-mgm 18777  df-sgrp 18869  df-mnd 18885  df-mhm 18939  df-submnd 18940  df-grp 19108  df-minusg 19109  df-sbg 19110  df-mulg 19239  df-subg 19294  df-ghm 19389  df-cntz 19492  df-cmn 19957  df-abl 19958  df-mgp 20322  df-rng 20336  df-ur 20369  df-srg 20374  df-ring 20422  df-cring 20423  df-rhm 20663  df-subrng 20759  df-subrg 20783  df-lmod 21098  df-lss 21168  df-lsp 21208  df-assa 22122  df-asp 22123  df-ascl 22124  df-psr 22178  df-mvr 22179  df-mpl 22180  df-evls 22344  df-evl 22345  df-selv 22387

This theorem is used by:  selvply1rhmlem2  34086