Theorem mplsubgfilemcl 14505

Description: Lemma for mplsubgfi 14507. The sum of two polynomials is a polynomial. (Contributed by Jim Kingdon, 26-Nov-2025.)

Hypotheses

Ref	Expression
mplsubg.s	⊢ 𝑆 = (𝐼 mPwSer 𝑅)
mplsubg.p	⊢ 𝑃 = (𝐼 mPoly 𝑅)
mplsubg.u	⊢ 𝑈 = (Base‘𝑃)
mplsubg.i	⊢ (𝜑 → 𝐼 ∈ Fin)
mplsubg.r	⊢ (𝜑 → 𝑅 ∈ Grp)
mplsubgfilemcl.x	⊢ (𝜑 → 𝑋 ∈ 𝑈)
mplsubgfilemcl.y	⊢ (𝜑 → 𝑌 ∈ 𝑈)
mplsubgfilemcl.p	⊢ + = (+g‘𝑆)

Assertion

Ref	Expression
mplsubgfilemcl	⊢ (𝜑 → (𝑋 + 𝑌) ∈ 𝑈)

Proof of Theorem mplsubgfilemcl

Dummy variables 𝑎 𝑏 𝑝 𝑞 𝑘 𝑐 𝑑 𝑢 𝑣 𝑒 𝑠 𝑡 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		mplsubg.s	. . 3 ⊢ 𝑆 = (𝐼 mPwSer 𝑅)
2		eqid 2206	. . 3 ⊢ (Base‘𝑆) = (Base‘𝑆)
3		mplsubgfilemcl.p	. . 3 ⊢ + = (+g‘𝑆)
4		mplsubg.r	. . . 4 ⊢ (𝜑 → 𝑅 ∈ Grp)
5	4	grpmgmd 13402	. . 3 ⊢ (𝜑 → 𝑅 ∈ Mgm)
6		mplsubg.p	. . . . 5 ⊢ 𝑃 = (𝐼 mPoly 𝑅)
7		mplsubg.u	. . . . 5 ⊢ 𝑈 = (Base‘𝑃)
8	6, 1, 7, 2	mplbasss 14502	. . . 4 ⊢ 𝑈 ⊆ (Base‘𝑆)
9		mplsubgfilemcl.x	. . . 4 ⊢ (𝜑 → 𝑋 ∈ 𝑈)
10	8, 9	sselid 3192	. . 3 ⊢ (𝜑 → 𝑋 ∈ (Base‘𝑆))
11		mplsubgfilemcl.y	. . . 4 ⊢ (𝜑 → 𝑌 ∈ 𝑈)
12	8, 11	sselid 3192	. . 3 ⊢ (𝜑 → 𝑌 ∈ (Base‘𝑆))
13	1, 2, 3, 5, 10, 12	psraddcl 14486	. 2 ⊢ (𝜑 → (𝑋 + 𝑌) ∈ (Base‘𝑆))
14		mplsubg.i	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ Fin)
15		eqid 2206	. . . . . . 7 ⊢ (0g‘𝑅) = (0g‘𝑅)
16	6, 1, 2, 15, 7	mplelbascoe 14498	. . . . . 6 ⊢ ((𝐼 ∈ Fin ∧ 𝑅 ∈ Grp) → (𝑋 ∈ 𝑈 ↔ (𝑋 ∈ (Base‘𝑆) ∧ ∃𝑝 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))))
17	14, 4, 16	syl2anc 411	. . . . 5 ⊢ (𝜑 → (𝑋 ∈ 𝑈 ↔ (𝑋 ∈ (Base‘𝑆) ∧ ∃𝑝 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))))
18	9, 17	mpbid 147	. . . 4 ⊢ (𝜑 → (𝑋 ∈ (Base‘𝑆) ∧ ∃𝑝 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅))))
19	18	simprd 114	. . 3 ⊢ (𝜑 → ∃𝑝 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))
20	6, 1, 2, 15, 7	mplelbascoe 14498	. . . . . . . 8 ⊢ ((𝐼 ∈ Fin ∧ 𝑅 ∈ Grp) → (𝑌 ∈ 𝑈 ↔ (𝑌 ∈ (Base‘𝑆) ∧ ∃𝑞 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))))
21	14, 4, 20	syl2anc 411	. . . . . . 7 ⊢ (𝜑 → (𝑌 ∈ 𝑈 ↔ (𝑌 ∈ (Base‘𝑆) ∧ ∃𝑞 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))))
22	11, 21	mpbid 147	. . . . . 6 ⊢ (𝜑 → (𝑌 ∈ (Base‘𝑆) ∧ ∃𝑞 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅))))
23	22	simprd 114	. . . . 5 ⊢ (𝜑 → ∃𝑞 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))
24	23	adantr 276	. . . 4 ⊢ ((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) → ∃𝑞 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))
25		nn0addcl 9337	. . . . . . . 8 ⊢ ((𝑐 ∈ ℕ0 ∧ 𝑑 ∈ ℕ0) → (𝑐 + 𝑑) ∈ ℕ0)
26	25	adantl 277	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ (𝑐 ∈ ℕ0 ∧ 𝑑 ∈ ℕ0)) → (𝑐 + 𝑑) ∈ ℕ0)
27		simplrl 535	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → 𝑝 ∈ (ℕ0 ↑𝑚 𝐼))
28		nn0ex 9308	. . . . . . . . . . 11 ⊢ ℕ0 ∈ V
29	28	a1i 9	. . . . . . . . . 10 ⊢ (𝜑 → ℕ0 ∈ V)
30	29, 14	elmapd 6756	. . . . . . . . 9 ⊢ (𝜑 → (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ↔ 𝑝:𝐼⟶ℕ0))
31	30	ad2antrr 488	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ↔ 𝑝:𝐼⟶ℕ0))
32	27, 31	mpbid 147	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → 𝑝:𝐼⟶ℕ0)
33		simprl 529	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → 𝑞 ∈ (ℕ0 ↑𝑚 𝐼))
34	29, 14	elmapd 6756	. . . . . . . . 9 ⊢ (𝜑 → (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ↔ 𝑞:𝐼⟶ℕ0))
35	34	ad2antrr 488	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ↔ 𝑞:𝐼⟶ℕ0))
36	33, 35	mpbid 147	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → 𝑞:𝐼⟶ℕ0)
37	14	ad2antrr 488	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → 𝐼 ∈ Fin)
38		inidm 3383	. . . . . . 7 ⊢ (𝐼 ∩ 𝐼) = 𝐼
39	26, 32, 36, 37, 37, 38	off 6178	. . . . . 6 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → (𝑝 ∘𝑓 + 𝑞):𝐼⟶ℕ0)
40	29, 14	elmapd 6756	. . . . . . 7 ⊢ (𝜑 → ((𝑝 ∘𝑓 + 𝑞) ∈ (ℕ0 ↑𝑚 𝐼) ↔ (𝑝 ∘𝑓 + 𝑞):𝐼⟶ℕ0))
41	40	ad2antrr 488	. . . . . 6 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → ((𝑝 ∘𝑓 + 𝑞) ∈ (ℕ0 ↑𝑚 𝐼) ↔ (𝑝 ∘𝑓 + 𝑞):𝐼⟶ℕ0))
42	39, 41	mpbird 167	. . . . 5 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → (𝑝 ∘𝑓 + 𝑞) ∈ (ℕ0 ↑𝑚 𝐼))
43		simp-4l 541	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝜑)
44		simplr 528	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑏 ∈ (ℕ0 ↑𝑚 𝐼))
45		eqid 2206	. . . . . . . . . . . . . 14 ⊢ (+g‘𝑅) = (+g‘𝑅)
46	1, 2, 45, 3, 10, 12	psradd 14485	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 + 𝑌) = (𝑋 ∘𝑓 (+g‘𝑅)𝑌))
47	46	fveq1d 5585	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑋 + 𝑌)‘𝑏) = ((𝑋 ∘𝑓 (+g‘𝑅)𝑌)‘𝑏))
48	47	adantr 276	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋 + 𝑌)‘𝑏) = ((𝑋 ∘𝑓 (+g‘𝑅)𝑌)‘𝑏))
49		eqid 2206	. . . . . . . . . . . . . 14 ⊢ (Base‘𝑅) = (Base‘𝑅)
50	1, 49, 14, 2, 10	psrelbasfi 14482	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑋:(ℕ0 ↑𝑚 𝐼)⟶(Base‘𝑅))
51	50	ffnd 5432	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 Fn (ℕ0 ↑𝑚 𝐼))
52	1, 49, 14, 2, 12	psrelbasfi 14482	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑌:(ℕ0 ↑𝑚 𝐼)⟶(Base‘𝑅))
53	52	ffnd 5432	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑌 Fn (ℕ0 ↑𝑚 𝐼))
54		fnmap 6749	. . . . . . . . . . . . 13 ⊢ ↑𝑚 Fn (V × V)
55	14	elexd 2786	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐼 ∈ V)
56		fnovex 5984	. . . . . . . . . . . . 13 ⊢ (( ↑𝑚 Fn (V × V) ∧ ℕ0 ∈ V ∧ 𝐼 ∈ V) → (ℕ0 ↑𝑚 𝐼) ∈ V)
57	54, 28, 55, 56	mp3an12i 1354	. . . . . . . . . . . 12 ⊢ (𝜑 → (ℕ0 ↑𝑚 𝐼) ∈ V)
58		inidm 3383	. . . . . . . . . . . 12 ⊢ ((ℕ0 ↑𝑚 𝐼) ∩ (ℕ0 ↑𝑚 𝐼)) = (ℕ0 ↑𝑚 𝐼)
59		eqidd 2207	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑋‘𝑏) = (𝑋‘𝑏))
60		eqidd 2207	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑌‘𝑏) = (𝑌‘𝑏))
61	4	adantr 276	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑅 ∈ Grp)
62	50	ffvelcdmda 5722	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑋‘𝑏) ∈ (Base‘𝑅))
63	52	ffvelcdmda 5722	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑌‘𝑏) ∈ (Base‘𝑅))
64	49, 45, 61, 62, 63	grpcld 13390	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)) ∈ (Base‘𝑅))
65	51, 53, 57, 57, 58, 59, 60, 64	ofvalg 6175	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋 ∘𝑓 (+g‘𝑅)𝑌)‘𝑏) = ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)))
66	48, 65	eqtrd 2239	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋 + 𝑌)‘𝑏) = ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)))
67	43, 44, 66	syl2anc 411	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((𝑋 + 𝑌)‘𝑏) = ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)))
68	32	ad3antrrr 492	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → 𝑝:𝐼⟶ℕ0)
69		simpr 110	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → 𝑒 ∈ 𝐼)
70	68, 69	ffvelcdmd 5723	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ∈ ℕ0)
71	70	nn0red 9356	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ∈ ℝ)
72	27	ad2antrr 488	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑝 ∈ (ℕ0 ↑𝑚 𝐼))
73	30	biimpa 296	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑝:𝐼⟶ℕ0)
74	73	ffnd 5432	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑝 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑝 Fn 𝐼)
75	43, 72, 74	syl2anc 411	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑝 Fn 𝐼)
76	33	ad2antrr 488	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑞 ∈ (ℕ0 ↑𝑚 𝐼))
77	34	biimpa 296	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑞 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑞:𝐼⟶ℕ0)
78	77	ffnd 5432	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑞 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑞 Fn 𝐼)
79	43, 76, 78	syl2anc 411	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑞 Fn 𝐼)
80	37	ad2antrr 488	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝐼 ∈ Fin)
81		eqidd 2207	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) = (𝑝‘𝑒))
82		eqidd 2207	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) = (𝑞‘𝑒))
83	36	ad3antrrr 492	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → 𝑞:𝐼⟶ℕ0)
84	83, 69	ffvelcdmd 5723	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ∈ ℕ0)
85	70, 84	nn0addcld 9359	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝‘𝑒) + (𝑞‘𝑒)) ∈ ℕ0)
86	75, 79, 80, 80, 38, 81, 82, 85	ofvalg 6175	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) = ((𝑝‘𝑒) + (𝑞‘𝑒)))
87	86, 85	eqeltrd 2283	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) ∈ ℕ0)
88	87	nn0red 9356	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) ∈ ℝ)
89		elmapi 6764	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑏 ∈ (ℕ0 ↑𝑚 𝐼) → 𝑏:𝐼⟶ℕ0)
90	89	adantl 277	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑏:𝐼⟶ℕ0)
91	90	ad2antrr 488	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → 𝑏:𝐼⟶ℕ0)
92	91, 69	ffvelcdmd 5723	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑏‘𝑒) ∈ ℕ0)
93	92	nn0red 9356	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑏‘𝑒) ∈ ℝ)
94		nn0addge1 9348	. . . . . . . . . . . . . . . 16 ⊢ (((𝑝‘𝑒) ∈ ℝ ∧ (𝑞‘𝑒) ∈ ℕ0) → (𝑝‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
95	71, 84, 94	syl2anc 411	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
96	95, 86	breqtrrd 4075	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ≤ ((𝑝 ∘𝑓 + 𝑞)‘𝑒))
97		fveq2 5583	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑒 → ((𝑝 ∘𝑓 + 𝑞)‘𝑘) = ((𝑝 ∘𝑓 + 𝑞)‘𝑒))
98		fveq2 5583	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑒 → (𝑏‘𝑘) = (𝑏‘𝑒))
99	97, 98	breq12d 4060	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑒 → (((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘) ↔ ((𝑝 ∘𝑓 + 𝑞)‘𝑒) < (𝑏‘𝑒)))
100		simplr 528	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘))
101	99, 100, 69	rspcdva 2883	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) < (𝑏‘𝑒))
102	71, 88, 93, 96, 101	lelttrd 8204	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) < (𝑏‘𝑒))
103	102	ralrimiva 2580	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑒 ∈ 𝐼 (𝑝‘𝑒) < (𝑏‘𝑒))
104		fveq2 5583	. . . . . . . . . . . . . 14 ⊢ (𝑣 = 𝑒 → (𝑝‘𝑣) = (𝑝‘𝑒))
105		fveq2 5583	. . . . . . . . . . . . . 14 ⊢ (𝑣 = 𝑒 → (𝑏‘𝑣) = (𝑏‘𝑒))
106	104, 105	breq12d 4060	. . . . . . . . . . . . 13 ⊢ (𝑣 = 𝑒 → ((𝑝‘𝑣) < (𝑏‘𝑣) ↔ (𝑝‘𝑒) < (𝑏‘𝑒)))
107	106	cbvralv 2739	. . . . . . . . . . . 12 ⊢ (∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣) ↔ ∀𝑒 ∈ 𝐼 (𝑝‘𝑒) < (𝑏‘𝑒))
108	103, 107	sylibr 134	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣))
109		fveq1 5582	. . . . . . . . . . . . . . 15 ⊢ (𝑢 = 𝑏 → (𝑢‘𝑣) = (𝑏‘𝑣))
110	109	breq2d 4059	. . . . . . . . . . . . . 14 ⊢ (𝑢 = 𝑏 → ((𝑝‘𝑣) < (𝑢‘𝑣) ↔ (𝑝‘𝑣) < (𝑏‘𝑣)))
111	110	ralbidv 2507	. . . . . . . . . . . . 13 ⊢ (𝑢 = 𝑏 → (∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) ↔ ∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣)))
112		fveqeq2 5592	. . . . . . . . . . . . 13 ⊢ (𝑢 = 𝑏 → ((𝑋‘𝑢) = (0g‘𝑅) ↔ (𝑋‘𝑏) = (0g‘𝑅)))
113	111, 112	imbi12d 234	. . . . . . . . . . . 12 ⊢ (𝑢 = 𝑏 → ((∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)) ↔ (∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣) → (𝑋‘𝑏) = (0g‘𝑅))))
114		simprr 531	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) → ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))
115	114	ad3antrrr 492	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))
116	113, 115, 44	rspcdva 2883	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → (∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣) → (𝑋‘𝑏) = (0g‘𝑅)))
117	108, 116	mpd 13	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → (𝑋‘𝑏) = (0g‘𝑅))
118	117	oveq1d 5966	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)) = ((0g‘𝑅)(+g‘𝑅)(𝑌‘𝑏)))
119	67, 118	eqtrd 2239	. . . . . . . 8 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((𝑋 + 𝑌)‘𝑏) = ((0g‘𝑅)(+g‘𝑅)(𝑌‘𝑏)))
120	43, 4	syl 14	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑅 ∈ Grp)
121	43, 44, 63	syl2anc 411	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → (𝑌‘𝑏) ∈ (Base‘𝑅))
122	49, 45, 15, 120, 121	grplidd 13409	. . . . . . . 8 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((0g‘𝑅)(+g‘𝑅)(𝑌‘𝑏)) = (𝑌‘𝑏))
123	84	nn0red 9356	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ∈ ℝ)
124		nn0addge2 9349	. . . . . . . . . . . . . 14 ⊢ (((𝑞‘𝑒) ∈ ℝ ∧ (𝑝‘𝑒) ∈ ℕ0) → (𝑞‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
125	123, 70, 124	syl2anc 411	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
126	125, 86	breqtrrd 4075	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ≤ ((𝑝 ∘𝑓 + 𝑞)‘𝑒))
127	123, 88, 93, 126, 101	lelttrd 8204	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) < (𝑏‘𝑒))
128	127	ralrimiva 2580	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑒 ∈ 𝐼 (𝑞‘𝑒) < (𝑏‘𝑒))
129		fveq2 5583	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑒 → (𝑞‘𝑡) = (𝑞‘𝑒))
130		fveq2 5583	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑒 → (𝑏‘𝑡) = (𝑏‘𝑒))
131	129, 130	breq12d 4060	. . . . . . . . . . 11 ⊢ (𝑡 = 𝑒 → ((𝑞‘𝑡) < (𝑏‘𝑡) ↔ (𝑞‘𝑒) < (𝑏‘𝑒)))
132	131	cbvralv 2739	. . . . . . . . . 10 ⊢ (∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡) ↔ ∀𝑒 ∈ 𝐼 (𝑞‘𝑒) < (𝑏‘𝑒))
133	128, 132	sylibr 134	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡))
134		fveq1 5582	. . . . . . . . . . . . 13 ⊢ (𝑠 = 𝑏 → (𝑠‘𝑡) = (𝑏‘𝑡))
135	134	breq2d 4059	. . . . . . . . . . . 12 ⊢ (𝑠 = 𝑏 → ((𝑞‘𝑡) < (𝑠‘𝑡) ↔ (𝑞‘𝑡) < (𝑏‘𝑡)))
136	135	ralbidv 2507	. . . . . . . . . . 11 ⊢ (𝑠 = 𝑏 → (∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) ↔ ∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡)))
137		fveqeq2 5592	. . . . . . . . . . 11 ⊢ (𝑠 = 𝑏 → ((𝑌‘𝑠) = (0g‘𝑅) ↔ (𝑌‘𝑏) = (0g‘𝑅)))
138	136, 137	imbi12d 234	. . . . . . . . . 10 ⊢ (𝑠 = 𝑏 → ((∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)) ↔ (∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡) → (𝑌‘𝑏) = (0g‘𝑅))))
139		simprr 531	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))
140	139	ad2antrr 488	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))
141	138, 140, 44	rspcdva 2883	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → (∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡) → (𝑌‘𝑏) = (0g‘𝑅)))
142	133, 141	mpd 13	. . . . . . . 8 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → (𝑌‘𝑏) = (0g‘𝑅))
143	119, 122, 142	3eqtrd 2243	. . . . . . 7 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅))
144	143	ex 115	. . . . . 6 ⊢ ((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
145	144	ralrimiva 2580	. . . . 5 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → ∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
146		fveq1 5582	. . . . . . . 8 ⊢ (𝑎 = (𝑝 ∘𝑓 + 𝑞) → (𝑎‘𝑘) = ((𝑝 ∘𝑓 + 𝑞)‘𝑘))
147	146	breq1d 4057	. . . . . . 7 ⊢ (𝑎 = (𝑝 ∘𝑓 + 𝑞) → ((𝑎‘𝑘) < (𝑏‘𝑘) ↔ ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)))
148	147	ralbidv 2507	. . . . . 6 ⊢ (𝑎 = (𝑝 ∘𝑓 + 𝑞) → (∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) ↔ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)))
149	148	rspceaimv 2886	. . . . 5 ⊢ (((𝑝 ∘𝑓 + 𝑞) ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅))) → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
150	42, 145, 149	syl2anc 411	. . . 4 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
151	24, 150	rexlimddv 2629	. . 3 ⊢ ((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
152	19, 151	rexlimddv 2629	. 2 ⊢ (𝜑 → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
153	6, 1, 2, 15, 7	mplelbascoe 14498	. . 3 ⊢ ((𝐼 ∈ Fin ∧ 𝑅 ∈ Grp) → ((𝑋 + 𝑌) ∈ 𝑈 ↔ ((𝑋 + 𝑌) ∈ (Base‘𝑆) ∧ ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))))
154	14, 4, 153	syl2anc 411	. 2 ⊢ (𝜑 → ((𝑋 + 𝑌) ∈ 𝑈 ↔ ((𝑋 + 𝑌) ∈ (Base‘𝑆) ∧ ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))))
155	13, 152, 154	mpbir2and 947	1 ⊢ (𝜑 → (𝑋 + 𝑌) ∈ 𝑈)

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   = wceq 1373   ∈ wcel 2177  ∀wral 2485  ∃wrex 2486  Vcvv 2773   class class class wbr 4047   × cxp 4677   Fn wfn 5271  ⟶wf 5272  ‘cfv 5276  (class class class)co 5951   ∘_𝑓 cof 6163   ↑_𝑚 cmap 6742  Fincfn 6834  ℝcr 7931   + caddc 7935   < clt 8114   ≤ cle 8115  ℕ₀cn0 9302  Basecbs 12876  +_gcplusg 12953  0_gc0g 13132  Grpcgrp 13376   mPwSer cmps 14467   mPoly cmpl 14468

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 711  ax-5 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-13 2179  ax-14 2180  ax-ext 2188  ax-coll 4163  ax-sep 4166  ax-nul 4174  ax-pow 4222  ax-pr 4257  ax-un 4484  ax-setind 4589  ax-iinf 4640  ax-cnex 8023  ax-resscn 8024  ax-1cn 8025  ax-1re 8026  ax-icn 8027  ax-addcl 8028  ax-addrcl 8029  ax-mulcl 8030  ax-addcom 8032  ax-addass 8034  ax-distr 8036  ax-i2m1 8037  ax-0lt1 8038  ax-0id 8040  ax-rnegex 8041  ax-cnre 8043  ax-pre-ltirr 8044  ax-pre-ltwlin 8045  ax-pre-lttrn 8046  ax-pre-apti 8047  ax-pre-ltadd 8048

This theorem depends on definitions:  df-bi 117  df-dc 837  df-3or 982  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2193  df-cleq 2199  df-clel 2202  df-nfc 2338  df-ne 2378  df-nel 2473  df-ral 2490  df-rex 2491  df-reu 2492  df-rmo 2493  df-rab 2494  df-v 2775  df-sbc 3000  df-csb 3095  df-dif 3169  df-un 3171  df-in 3173  df-ss 3180  df-nul 3462  df-if 3573  df-pw 3619  df-sn 3640  df-pr 3641  df-tp 3642  df-op 3643  df-uni 3853  df-int 3888  df-iun 3931  df-br 4048  df-opab 4110  df-mpt 4111  df-tr 4147  df-id 4344  df-iord 4417  df-on 4419  df-suc 4422  df-iom 4643  df-xp 4685  df-rel 4686  df-cnv 4687  df-co 4688  df-dm 4689  df-rn 4690  df-res 4691  df-ima 4692  df-iota 5237  df-fun 5278  df-fn 5279  df-f 5280  df-f1 5281  df-fo 5282  df-f1o 5283  df-fv 5284  df-riota 5906  df-ov 5954  df-oprab 5955  df-mpo 5956  df-of 6165  df-1st 6233  df-2nd 6234  df-1o 6509  df-er 6627  df-map 6744  df-ixp 6793  df-en 6835  df-fin 6837  df-pnf 8116  df-mnf 8117  df-xr 8118  df-ltxr 8119  df-le 8120  df-sub 8252  df-neg 8253  df-inn 9044  df-2 9102  df-3 9103  df-4 9104  df-5 9105  df-6 9106  df-7 9107  df-8 9108  df-9 9109  df-n0 9303  df-z 9380  df-uz 9656  df-fz 10138  df-struct 12878  df-ndx 12879  df-slot 12880  df-base 12882  df-sets 12883  df-iress 12884  df-plusg 12966  df-mulr 12967  df-sca 12969  df-vsca 12970  df-tset 12972  df-rest 13117  df-topn 13118  df-0g 13134  df-topgen 13136  df-pt 13137  df-mgm 13232  df-sgrp 13278  df-mnd 13293  df-grp 13379  df-psr 14469  df-mplcoe 14470

This theorem is referenced by:  mplsubgfi  14507