Theorem evlseu 22041

Description: For a given interpretation of the variables 𝐺 and of the scalars 𝐹, this extends to a homomorphic interpretation of the polynomial ring in exactly one way. (Contributed by Stefan O'Rear, 9-Mar-2015.) (Revised by AV, 11-Apr-2024.)

Hypotheses

Ref	Expression
evlseu.p	⊢ 𝑃 = (𝐼 mPoly 𝑅)
evlseu.c	⊢ 𝐶 = (Base‘𝑆)
evlseu.a	⊢ 𝐴 = (algSc‘𝑃)
evlseu.v	⊢ 𝑉 = (𝐼 mVar 𝑅)
evlseu.i	⊢ (𝜑 → 𝐼 ∈ 𝑊)
evlseu.r	⊢ (𝜑 → 𝑅 ∈ CRing)
evlseu.s	⊢ (𝜑 → 𝑆 ∈ CRing)
evlseu.f	⊢ (𝜑 → 𝐹 ∈ (𝑅 RingHom 𝑆))
evlseu.g	⊢ (𝜑 → 𝐺:𝐼⟶𝐶)

Assertion

Ref	Expression
evlseu	⊢ (𝜑 → ∃!𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺))

Distinct variable groups:   𝐴,𝑚   𝑚,𝐹   𝑚,𝐺   𝑚,𝐼   𝑃,𝑚   𝜑,𝑚   𝑆,𝑚   𝑚,𝑉

Allowed substitution hints:   𝐶(𝑚)   𝑅(𝑚)   𝑊(𝑚)

Proof of Theorem evlseu

Dummy variables 𝑛 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		evlseu.p	. . . 4 ⊢ 𝑃 = (𝐼 mPoly 𝑅)
2		eqid 2735	. . . 4 ⊢ (Base‘𝑃) = (Base‘𝑃)
3		evlseu.c	. . . 4 ⊢ 𝐶 = (Base‘𝑆)
4		eqid 2735	. . . 4 ⊢ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} = {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin}
5		eqid 2735	. . . 4 ⊢ (mulGrp‘𝑆) = (mulGrp‘𝑆)
6		eqid 2735	. . . 4 ⊢ (.g‘(mulGrp‘𝑆)) = (.g‘(mulGrp‘𝑆))
7		eqid 2735	. . . 4 ⊢ (.r‘𝑆) = (.r‘𝑆)
8		evlseu.v	. . . 4 ⊢ 𝑉 = (𝐼 mVar 𝑅)
9		eqid 2735	. . . 4 ⊢ (𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) = (𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺))))))
10		evlseu.i	. . . 4 ⊢ (𝜑 → 𝐼 ∈ 𝑊)
11		evlseu.r	. . . 4 ⊢ (𝜑 → 𝑅 ∈ CRing)
12		evlseu.s	. . . 4 ⊢ (𝜑 → 𝑆 ∈ CRing)
13		evlseu.f	. . . 4 ⊢ (𝜑 → 𝐹 ∈ (𝑅 RingHom 𝑆))
14		evlseu.g	. . . 4 ⊢ (𝜑 → 𝐺:𝐼⟶𝐶)
15		evlseu.a	. . . 4 ⊢ 𝐴 = (algSc‘𝑃)
16	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15	evlslem1 22040	. . 3 ⊢ (𝜑 → ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∈ (𝑃 RingHom 𝑆) ∧ ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝐴) = 𝐹 ∧ ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝑉) = 𝐺))
17		coeq1 5837	. . . . . . 7 ⊢ (𝑚 = (𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) → (𝑚 ∘ 𝐴) = ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝐴))
18	17	eqeq1d 2737	. . . . . 6 ⊢ (𝑚 = (𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) → ((𝑚 ∘ 𝐴) = 𝐹 ↔ ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝐴) = 𝐹))
19		coeq1 5837	. . . . . . 7 ⊢ (𝑚 = (𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) → (𝑚 ∘ 𝑉) = ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝑉))
20	19	eqeq1d 2737	. . . . . 6 ⊢ (𝑚 = (𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) → ((𝑚 ∘ 𝑉) = 𝐺 ↔ ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝑉) = 𝐺))
21	18, 20	anbi12d 632	. . . . 5 ⊢ (𝑚 = (𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) → (((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺) ↔ (((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝐴) = 𝐹 ∧ ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝑉) = 𝐺)))
22	21	rspcev 3601	. . . 4 ⊢ (((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∈ (𝑃 RingHom 𝑆) ∧ (((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝐴) = 𝐹 ∧ ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝑉) = 𝐺)) → ∃𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺))
23	22	3impb 1114	. . 3 ⊢ (((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∈ (𝑃 RingHom 𝑆) ∧ ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝐴) = 𝐹 ∧ ((𝑥 ∈ (Base‘𝑃) ↦ (𝑆 Σg (𝑦 ∈ {𝑧 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑧 “ ℕ) ∈ Fin} ↦ ((𝐹‘(𝑥‘𝑦))(.r‘𝑆)((mulGrp‘𝑆) Σg (𝑦 ∘f (.g‘(mulGrp‘𝑆))𝐺)))))) ∘ 𝑉) = 𝐺) → ∃𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺))
24	16, 23	syl 17	. 2 ⊢ (𝜑 → ∃𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺))
25		eqid 2735	. . . . . . . . . 10 ⊢ (Base‘𝑅) = (Base‘𝑅)
26		crngring 20205	. . . . . . . . . . 11 ⊢ (𝑅 ∈ CRing → 𝑅 ∈ Ring)
27	11, 26	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝑅 ∈ Ring)
28	1, 2, 25, 15, 10, 27	mplasclf 22023	. . . . . . . . 9 ⊢ (𝜑 → 𝐴:(Base‘𝑅)⟶(Base‘𝑃))
29	28	ffund 6710	. . . . . . . 8 ⊢ (𝜑 → Fun 𝐴)
30		funcoeqres 6849	. . . . . . . 8 ⊢ ((Fun 𝐴 ∧ (𝑚 ∘ 𝐴) = 𝐹) → (𝑚 ↾ ran 𝐴) = (𝐹 ∘ ◡𝐴))
31	29, 30	sylan 580	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑚 ∘ 𝐴) = 𝐹) → (𝑚 ↾ ran 𝐴) = (𝐹 ∘ ◡𝐴))
32	1, 8, 2, 10, 27	mvrf2 21953	. . . . . . . . 9 ⊢ (𝜑 → 𝑉:𝐼⟶(Base‘𝑃))
33	32	ffund 6710	. . . . . . . 8 ⊢ (𝜑 → Fun 𝑉)
34		funcoeqres 6849	. . . . . . . 8 ⊢ ((Fun 𝑉 ∧ (𝑚 ∘ 𝑉) = 𝐺) → (𝑚 ↾ ran 𝑉) = (𝐺 ∘ ◡𝑉))
35	33, 34	sylan 580	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑚 ∘ 𝑉) = 𝐺) → (𝑚 ↾ ran 𝑉) = (𝐺 ∘ ◡𝑉))
36	31, 35	anim12dan 619	. . . . . 6 ⊢ ((𝜑 ∧ ((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺)) → ((𝑚 ↾ ran 𝐴) = (𝐹 ∘ ◡𝐴) ∧ (𝑚 ↾ ran 𝑉) = (𝐺 ∘ ◡𝑉)))
37	36	ex 412	. . . . 5 ⊢ (𝜑 → (((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺) → ((𝑚 ↾ ran 𝐴) = (𝐹 ∘ ◡𝐴) ∧ (𝑚 ↾ ran 𝑉) = (𝐺 ∘ ◡𝑉))))
38		resundi 5980	. . . . . 6 ⊢ (𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝑚 ↾ ran 𝐴) ∪ (𝑚 ↾ ran 𝑉))
39		uneq12 4138	. . . . . 6 ⊢ (((𝑚 ↾ ran 𝐴) = (𝐹 ∘ ◡𝐴) ∧ (𝑚 ↾ ran 𝑉) = (𝐺 ∘ ◡𝑉)) → ((𝑚 ↾ ran 𝐴) ∪ (𝑚 ↾ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)))
40	38, 39	eqtrid 2782	. . . . 5 ⊢ (((𝑚 ↾ ran 𝐴) = (𝐹 ∘ ◡𝐴) ∧ (𝑚 ↾ ran 𝑉) = (𝐺 ∘ ◡𝑉)) → (𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)))
41	37, 40	syl6 35	. . . 4 ⊢ (𝜑 → (((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺) → (𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉))))
42	41	ralrimivw 3136	. . 3 ⊢ (𝜑 → ∀𝑚 ∈ (𝑃 RingHom 𝑆)(((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺) → (𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉))))
43		eqtr3 2757	. . . . . 6 ⊢ (((𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)) ∧ (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉))) → (𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)))
44		eqid 2735	. . . . . . . . . . . . 13 ⊢ (𝐼 mPwSer 𝑅) = (𝐼 mPwSer 𝑅)
45	44, 10, 11	psrassa 21933	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐼 mPwSer 𝑅) ∈ AssAlg)
46		eqid 2735	. . . . . . . . . . . . . 14 ⊢ (Base‘(𝐼 mPwSer 𝑅)) = (Base‘(𝐼 mPwSer 𝑅))
47	44, 8, 46, 10, 27	mvrf 21945	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑉:𝐼⟶(Base‘(𝐼 mPwSer 𝑅)))
48	47	frnd 6714	. . . . . . . . . . . 12 ⊢ (𝜑 → ran 𝑉 ⊆ (Base‘(𝐼 mPwSer 𝑅)))
49		eqid 2735	. . . . . . . . . . . . 13 ⊢ (AlgSpan‘(𝐼 mPwSer 𝑅)) = (AlgSpan‘(𝐼 mPwSer 𝑅))
50		eqid 2735	. . . . . . . . . . . . 13 ⊢ (algSc‘(𝐼 mPwSer 𝑅)) = (algSc‘(𝐼 mPwSer 𝑅))
51		eqid 2735	. . . . . . . . . . . . 13 ⊢ (mrCls‘(SubRing‘(𝐼 mPwSer 𝑅))) = (mrCls‘(SubRing‘(𝐼 mPwSer 𝑅)))
52	49, 50, 51, 46	aspval2 21858	. . . . . . . . . . . 12 ⊢ (((𝐼 mPwSer 𝑅) ∈ AssAlg ∧ ran 𝑉 ⊆ (Base‘(𝐼 mPwSer 𝑅))) → ((AlgSpan‘(𝐼 mPwSer 𝑅))‘ran 𝑉) = ((mrCls‘(SubRing‘(𝐼 mPwSer 𝑅)))‘(ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉)))
53	45, 48, 52	syl2anc 584	. . . . . . . . . . 11 ⊢ (𝜑 → ((AlgSpan‘(𝐼 mPwSer 𝑅))‘ran 𝑉) = ((mrCls‘(SubRing‘(𝐼 mPwSer 𝑅)))‘(ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉)))
54	1, 44, 8, 49, 10, 11	mplbas2 22000	. . . . . . . . . . 11 ⊢ (𝜑 → ((AlgSpan‘(𝐼 mPwSer 𝑅))‘ran 𝑉) = (Base‘𝑃))
55	44, 1, 2, 10, 27	mplsubrg 21965	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (Base‘𝑃) ∈ (SubRing‘(𝐼 mPwSer 𝑅)))
56	1, 44, 2	mplval2 21956	. . . . . . . . . . . . . . . 16 ⊢ 𝑃 = ((𝐼 mPwSer 𝑅) ↾s (Base‘𝑃))
57	56	subsubrg2 20559	. . . . . . . . . . . . . . 15 ⊢ ((Base‘𝑃) ∈ (SubRing‘(𝐼 mPwSer 𝑅)) → (SubRing‘𝑃) = ((SubRing‘(𝐼 mPwSer 𝑅)) ∩ 𝒫 (Base‘𝑃)))
58	55, 57	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (SubRing‘𝑃) = ((SubRing‘(𝐼 mPwSer 𝑅)) ∩ 𝒫 (Base‘𝑃)))
59	58	fveq2d 6880	. . . . . . . . . . . . 13 ⊢ (𝜑 → (mrCls‘(SubRing‘𝑃)) = (mrCls‘((SubRing‘(𝐼 mPwSer 𝑅)) ∩ 𝒫 (Base‘𝑃))))
60	50, 56	ressascl 21856	. . . . . . . . . . . . . . . . 17 ⊢ ((Base‘𝑃) ∈ (SubRing‘(𝐼 mPwSer 𝑅)) → (algSc‘(𝐼 mPwSer 𝑅)) = (algSc‘𝑃))
61	55, 60	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (algSc‘(𝐼 mPwSer 𝑅)) = (algSc‘𝑃))
62	15, 61	eqtr4id 2789	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐴 = (algSc‘(𝐼 mPwSer 𝑅)))
63	62	rneqd 5918	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ran 𝐴 = ran (algSc‘(𝐼 mPwSer 𝑅)))
64	63	uneq1d 4142	. . . . . . . . . . . . 13 ⊢ (𝜑 → (ran 𝐴 ∪ ran 𝑉) = (ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉))
65	59, 64	fveq12d 6883	. . . . . . . . . . . 12 ⊢ (𝜑 → ((mrCls‘(SubRing‘𝑃))‘(ran 𝐴 ∪ ran 𝑉)) = ((mrCls‘((SubRing‘(𝐼 mPwSer 𝑅)) ∩ 𝒫 (Base‘𝑃)))‘(ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉)))
66		assaring 21821	. . . . . . . . . . . . . 14 ⊢ ((𝐼 mPwSer 𝑅) ∈ AssAlg → (𝐼 mPwSer 𝑅) ∈ Ring)
67	46	subrgmre 20557	. . . . . . . . . . . . . 14 ⊢ ((𝐼 mPwSer 𝑅) ∈ Ring → (SubRing‘(𝐼 mPwSer 𝑅)) ∈ (Moore‘(Base‘(𝐼 mPwSer 𝑅))))
68	45, 66, 67	3syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → (SubRing‘(𝐼 mPwSer 𝑅)) ∈ (Moore‘(Base‘(𝐼 mPwSer 𝑅))))
69	28	frnd 6714	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ran 𝐴 ⊆ (Base‘𝑃))
70	63, 69	eqsstrrd 3994	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ran (algSc‘(𝐼 mPwSer 𝑅)) ⊆ (Base‘𝑃))
71	32	frnd 6714	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ran 𝑉 ⊆ (Base‘𝑃))
72	70, 71	unssd 4167	. . . . . . . . . . . . 13 ⊢ (𝜑 → (ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉) ⊆ (Base‘𝑃))
73		eqid 2735	. . . . . . . . . . . . . 14 ⊢ (mrCls‘((SubRing‘(𝐼 mPwSer 𝑅)) ∩ 𝒫 (Base‘𝑃))) = (mrCls‘((SubRing‘(𝐼 mPwSer 𝑅)) ∩ 𝒫 (Base‘𝑃)))
74	51, 73	submrc 17640	. . . . . . . . . . . . 13 ⊢ (((SubRing‘(𝐼 mPwSer 𝑅)) ∈ (Moore‘(Base‘(𝐼 mPwSer 𝑅))) ∧ (Base‘𝑃) ∈ (SubRing‘(𝐼 mPwSer 𝑅)) ∧ (ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉) ⊆ (Base‘𝑃)) → ((mrCls‘((SubRing‘(𝐼 mPwSer 𝑅)) ∩ 𝒫 (Base‘𝑃)))‘(ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉)) = ((mrCls‘(SubRing‘(𝐼 mPwSer 𝑅)))‘(ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉)))
75	68, 55, 72, 74	syl3anc 1373	. . . . . . . . . . . 12 ⊢ (𝜑 → ((mrCls‘((SubRing‘(𝐼 mPwSer 𝑅)) ∩ 𝒫 (Base‘𝑃)))‘(ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉)) = ((mrCls‘(SubRing‘(𝐼 mPwSer 𝑅)))‘(ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉)))
76	65, 75	eqtr2d 2771	. . . . . . . . . . 11 ⊢ (𝜑 → ((mrCls‘(SubRing‘(𝐼 mPwSer 𝑅)))‘(ran (algSc‘(𝐼 mPwSer 𝑅)) ∪ ran 𝑉)) = ((mrCls‘(SubRing‘𝑃))‘(ran 𝐴 ∪ ran 𝑉)))
77	53, 54, 76	3eqtr3d 2778	. . . . . . . . . 10 ⊢ (𝜑 → (Base‘𝑃) = ((mrCls‘(SubRing‘𝑃))‘(ran 𝐴 ∪ ran 𝑉)))
78	77	ad2antrr 726	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) ∧ (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛)) → (Base‘𝑃) = ((mrCls‘(SubRing‘𝑃))‘(ran 𝐴 ∪ ran 𝑉)))
79	1, 10, 27	mplringd 21983	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑃 ∈ Ring)
80	2	subrgmre 20557	. . . . . . . . . . . 12 ⊢ (𝑃 ∈ Ring → (SubRing‘𝑃) ∈ (Moore‘(Base‘𝑃)))
81	79, 80	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (SubRing‘𝑃) ∈ (Moore‘(Base‘𝑃)))
82	81	ad2antrr 726	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) ∧ (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛)) → (SubRing‘𝑃) ∈ (Moore‘(Base‘𝑃)))
83		simpr 484	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) ∧ (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛)) → (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛))
84		rhmeql 20563	. . . . . . . . . . 11 ⊢ ((𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆)) → dom (𝑚 ∩ 𝑛) ∈ (SubRing‘𝑃))
85	84	ad2antlr 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) ∧ (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛)) → dom (𝑚 ∩ 𝑛) ∈ (SubRing‘𝑃))
86		eqid 2735	. . . . . . . . . . 11 ⊢ (mrCls‘(SubRing‘𝑃)) = (mrCls‘(SubRing‘𝑃))
87	86	mrcsscl 17632	. . . . . . . . . 10 ⊢ (((SubRing‘𝑃) ∈ (Moore‘(Base‘𝑃)) ∧ (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛) ∧ dom (𝑚 ∩ 𝑛) ∈ (SubRing‘𝑃)) → ((mrCls‘(SubRing‘𝑃))‘(ran 𝐴 ∪ ran 𝑉)) ⊆ dom (𝑚 ∩ 𝑛))
88	82, 83, 85, 87	syl3anc 1373	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) ∧ (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛)) → ((mrCls‘(SubRing‘𝑃))‘(ran 𝐴 ∪ ran 𝑉)) ⊆ dom (𝑚 ∩ 𝑛))
89	78, 88	eqsstrd 3993	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) ∧ (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛)) → (Base‘𝑃) ⊆ dom (𝑚 ∩ 𝑛))
90	89	ex 412	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → ((ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛) → (Base‘𝑃) ⊆ dom (𝑚 ∩ 𝑛)))
91		simprl 770	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → 𝑚 ∈ (𝑃 RingHom 𝑆))
92	2, 3	rhmf 20445	. . . . . . . . 9 ⊢ (𝑚 ∈ (𝑃 RingHom 𝑆) → 𝑚:(Base‘𝑃)⟶𝐶)
93		ffn 6706	. . . . . . . . 9 ⊢ (𝑚:(Base‘𝑃)⟶𝐶 → 𝑚 Fn (Base‘𝑃))
94	91, 92, 93	3syl 18	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → 𝑚 Fn (Base‘𝑃))
95		simprr 772	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → 𝑛 ∈ (𝑃 RingHom 𝑆))
96	2, 3	rhmf 20445	. . . . . . . . 9 ⊢ (𝑛 ∈ (𝑃 RingHom 𝑆) → 𝑛:(Base‘𝑃)⟶𝐶)
97		ffn 6706	. . . . . . . . 9 ⊢ (𝑛:(Base‘𝑃)⟶𝐶 → 𝑛 Fn (Base‘𝑃))
98	95, 96, 97	3syl 18	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → 𝑛 Fn (Base‘𝑃))
99	69	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → ran 𝐴 ⊆ (Base‘𝑃))
100	71	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → ran 𝑉 ⊆ (Base‘𝑃))
101	99, 100	unssd 4167	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → (ran 𝐴 ∪ ran 𝑉) ⊆ (Base‘𝑃))
102		fnreseql 7038	. . . . . . . 8 ⊢ ((𝑚 Fn (Base‘𝑃) ∧ 𝑛 Fn (Base‘𝑃) ∧ (ran 𝐴 ∪ ran 𝑉) ⊆ (Base‘𝑃)) → ((𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)) ↔ (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛)))
103	94, 98, 101, 102	syl3anc 1373	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → ((𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)) ↔ (ran 𝐴 ∪ ran 𝑉) ⊆ dom (𝑚 ∩ 𝑛)))
104		fneqeql2 7037	. . . . . . . 8 ⊢ ((𝑚 Fn (Base‘𝑃) ∧ 𝑛 Fn (Base‘𝑃)) → (𝑚 = 𝑛 ↔ (Base‘𝑃) ⊆ dom (𝑚 ∩ 𝑛)))
105	94, 98, 104	syl2anc 584	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → (𝑚 = 𝑛 ↔ (Base‘𝑃) ⊆ dom (𝑚 ∩ 𝑛)))
106	90, 103, 105	3imtr4d 294	. . . . . 6 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → ((𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)) → 𝑚 = 𝑛))
107	43, 106	syl5 34	. . . . 5 ⊢ ((𝜑 ∧ (𝑚 ∈ (𝑃 RingHom 𝑆) ∧ 𝑛 ∈ (𝑃 RingHom 𝑆))) → (((𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)) ∧ (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉))) → 𝑚 = 𝑛))
108	107	ralrimivva 3187	. . . 4 ⊢ (𝜑 → ∀𝑚 ∈ (𝑃 RingHom 𝑆)∀𝑛 ∈ (𝑃 RingHom 𝑆)(((𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)) ∧ (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉))) → 𝑚 = 𝑛))
109		reseq1 5960	. . . . . 6 ⊢ (𝑚 = 𝑛 → (𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)))
110	109	eqeq1d 2737	. . . . 5 ⊢ (𝑚 = 𝑛 → ((𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)) ↔ (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉))))
111	110	rmo4 3713	. . . 4 ⊢ (∃*𝑚 ∈ (𝑃 RingHom 𝑆)(𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)) ↔ ∀𝑚 ∈ (𝑃 RingHom 𝑆)∀𝑛 ∈ (𝑃 RingHom 𝑆)(((𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)) ∧ (𝑛 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉))) → 𝑚 = 𝑛))
112	108, 111	sylibr 234	. . 3 ⊢ (𝜑 → ∃*𝑚 ∈ (𝑃 RingHom 𝑆)(𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)))
113		rmoim 3723	. . 3 ⊢ (∀𝑚 ∈ (𝑃 RingHom 𝑆)(((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺) → (𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉))) → (∃*𝑚 ∈ (𝑃 RingHom 𝑆)(𝑚 ↾ (ran 𝐴 ∪ ran 𝑉)) = ((𝐹 ∘ ◡𝐴) ∪ (𝐺 ∘ ◡𝑉)) → ∃*𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺)))
114	42, 112, 113	sylc 65	. 2 ⊢ (𝜑 → ∃*𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺))
115		reu5 3361	. 2 ⊢ (∃!𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺) ↔ (∃𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺) ∧ ∃*𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺)))
116	24, 114, 115	sylanbrc 583	1 ⊢ (𝜑 → ∃!𝑚 ∈ (𝑃 RingHom 𝑆)((𝑚 ∘ 𝐴) = 𝐹 ∧ (𝑚 ∘ 𝑉) = 𝐺))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1086   = wceq 1540   ∈ wcel 2108  ∀wral 3051  ∃wrex 3060  ∃!wreu 3357  ∃*wrmo 3358  {crab 3415   ∪ cun 3924   ∩ cin 3925   ⊆ wss 3926  𝒫 cpw 4575   ↦ cmpt 5201  ^◡ccnv 5653  dom cdm 5654  ran crn 5655   ↾ cres 5656   “ cima 5657   ∘ ccom 5658  Fun wfun 6525   Fn wfn 6526  ⟶wf 6527  ‘cfv 6531  (class class class)co 7405   ∘_f cof 7669   ↑_m cmap 8840  Fincfn 8959  ℕcn 12240  ℕ₀cn0 12501  Basecbs 17228  ._rcmulr 17272   Σ_g cgsu 17454  Moorecmre 17594  mrClscmrc 17595  ._gcmg 19050  mulGrpcmgp 20100  Ringcrg 20193  CRingccrg 20194   RingHom crh 20429  SubRingcsubrg 20529  AssAlgcasa 21810  AlgSpancasp 21811  algSccascl 21812   mPwSer cmps 21864   mVar cmvr 21865   mPoly cmpl 21866

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-rep 5249  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7729  ax-cnex 11185  ax-resscn 11186  ax-1cn 11187  ax-icn 11188  ax-addcl 11189  ax-addrcl 11190  ax-mulcl 11191  ax-mulrcl 11192  ax-mulcom 11193  ax-addass 11194  ax-mulass 11195  ax-distr 11196  ax-i2m1 11197  ax-1ne0 11198  ax-1rid 11199  ax-rnegex 11200  ax-rrecex 11201  ax-cnre 11202  ax-pre-lttri 11203  ax-pre-lttrn 11204  ax-pre-ltadd 11205  ax-pre-mulgt0 11206

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3359  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-tp 4606  df-op 4608  df-uni 4884  df-int 4923  df-iun 4969  df-iin 4970  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-se 5607  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6484  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-isom 6540  df-riota 7362  df-ov 7408  df-oprab 7409  df-mpo 7410  df-of 7671  df-ofr 7672  df-om 7862  df-1st 7988  df-2nd 7989  df-supp 8160  df-frecs 8280  df-wrecs 8311  df-recs 8385  df-rdg 8424  df-1o 8480  df-2o 8481  df-er 8719  df-map 8842  df-pm 8843  df-ixp 8912  df-en 8960  df-dom 8961  df-sdom 8962  df-fin 8963  df-fsupp 9374  df-sup 9454  df-oi 9524  df-card 9953  df-pnf 11271  df-mnf 11272  df-xr 11273  df-ltxr 11274  df-le 11275  df-sub 11468  df-neg 11469  df-nn 12241  df-2 12303  df-3 12304  df-4 12305  df-5 12306  df-6 12307  df-7 12308  df-8 12309  df-9 12310  df-n0 12502  df-z 12589  df-dec 12709  df-uz 12853  df-fz 13525  df-fzo 13672  df-seq 14020  df-hash 14349  df-struct 17166  df-sets 17183  df-slot 17201  df-ndx 17213  df-base 17229  df-ress 17252  df-plusg 17284  df-mulr 17285  df-sca 17287  df-vsca 17288  df-ip 17289  df-tset 17290  df-ple 17291  df-ds 17293  df-hom 17295  df-cco 17296  df-0g 17455  df-gsum 17456  df-prds 17461  df-pws 17463  df-mre 17598  df-mrc 17599  df-acs 17601  df-mgm 18618  df-sgrp 18697  df-mnd 18713  df-mhm 18761  df-submnd 18762  df-grp 18919  df-minusg 18920  df-sbg 18921  df-mulg 19051  df-subg 19106  df-ghm 19196  df-cntz 19300  df-cmn 19763  df-abl 19764  df-mgp 20101  df-rng 20113  df-ur 20142  df-srg 20147  df-ring 20195  df-cring 20196  df-rhm 20432  df-subrng 20506  df-subrg 20530  df-lmod 20819  df-lss 20889  df-lsp 20929  df-assa 21813  df-asp 21814  df-ascl 21815  df-psr 21869  df-mvr 21870  df-mpl 21871

This theorem is referenced by:  evlsval2  22045  evlsval3  42582