Theorem mplsubgfilemcl 15181

Description: Lemma for mplsubgfi 15183. 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 2238	. . 3 ⊢ (Base‘𝑆) = (Base‘𝑆)
3		mplsubgfilemcl.p	. . 3 ⊢ + = (+g‘𝑆)
4		mplsubg.r	. . . 4 ⊢ (𝜑 → 𝑅 ∈ Grp)
5	4	grpmgmd 13884	. . 3 ⊢ (𝜑 → 𝑅 ∈ Mgm)
6		mplsubg.p	. . . . 5 ⊢ 𝑃 = (𝐼 mPoly 𝑅)
7		mplsubg.u	. . . . 5 ⊢ 𝑈 = (Base‘𝑃)
8	6, 1, 7, 2	mplbasss 15178	. . . 4 ⊢ 𝑈 ⊆ (Base‘𝑆)
9		mplsubgfilemcl.x	. . . 4 ⊢ (𝜑 → 𝑋 ∈ 𝑈)
10	8, 9	sselid 3246	. . 3 ⊢ (𝜑 → 𝑋 ∈ (Base‘𝑆))
11		mplsubgfilemcl.y	. . . 4 ⊢ (𝜑 → 𝑌 ∈ 𝑈)
12	8, 11	sselid 3246	. . 3 ⊢ (𝜑 → 𝑌 ∈ (Base‘𝑆))
13	1, 2, 3, 5, 10, 12	psraddcl 15156	. 2 ⊢ (𝜑 → (𝑋 + 𝑌) ∈ (Base‘𝑆))
14		mplsubg.i	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ Fin)
15		eqid 2238	. . . . . . 7 ⊢ (0g‘𝑅) = (0g‘𝑅)
16	6, 1, 2, 15, 7	mplelbascoe 15174	. . . . . 6 ⊢ ((𝐼 ∈ Fin ∧ 𝑅 ∈ Grp) → (𝑋 ∈ 𝑈 ↔ (𝑋 ∈ (Base‘𝑆) ∧ ∃𝑝 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))))
17	14, 4, 16	syl2anc 415	. . . . 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 15174	. . . . . . . 8 ⊢ ((𝐼 ∈ Fin ∧ 𝑅 ∈ Grp) → (𝑌 ∈ 𝑈 ↔ (𝑌 ∈ (Base‘𝑆) ∧ ∃𝑞 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))))
21	14, 4, 20	syl2anc 415	. . . . . . 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 9603	. . . . . . . 8 ⊢ ((𝑐 ∈ ℕ0 ∧ 𝑑 ∈ ℕ0) → (𝑐 + 𝑑) ∈ ℕ0)
26	25	adantl 277	. . . . . . 7 ⊢ ((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ (𝑐 ∈ ℕ0 ∧ 𝑑 ∈ ℕ0)) → (𝑐 + 𝑑) ∈ ℕ0)
27		simplrl 541	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → 𝑝 ∈ (ℕ0 ↑𝑚 𝐼))
28		nn0ex 9574	. . . . . . . . . . 11 ⊢ ℕ0 ∈ V
29	28	a1i 9	. . . . . . . . . 10 ⊢ (𝜑 → ℕ0 ∈ V)
30	29, 14	elmapd 6936	. . . . . . . . 9 ⊢ (𝜑 → (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ↔ 𝑝:𝐼⟶ℕ0))
31	30	ad2antrr 492	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ↔ 𝑝:𝐼⟶ℕ0))
32	27, 31	mpbid 147	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → 𝑝:𝐼⟶ℕ0)
33		simprl 535	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → 𝑞 ∈ (ℕ0 ↑𝑚 𝐼))
34	29, 14	elmapd 6936	. . . . . . . . 9 ⊢ (𝜑 → (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ↔ 𝑞:𝐼⟶ℕ0))
35	34	ad2antrr 492	. . . . . . . 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 492	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → 𝐼 ∈ Fin)
38		inidm 3440	. . . . . . 7 ⊢ (𝐼 ∩ 𝐼) = 𝐼
39	26, 32, 36, 37, 37, 38	off 6315	. . . . . 6 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → (𝑝 ∘𝑓 + 𝑞):𝐼⟶ℕ0)
40	29, 14	elmapd 6936	. . . . . . 7 ⊢ (𝜑 → ((𝑝 ∘𝑓 + 𝑞) ∈ (ℕ0 ↑𝑚 𝐼) ↔ (𝑝 ∘𝑓 + 𝑞):𝐼⟶ℕ0))
41	40	ad2antrr 492	. . . . . 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 547	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝜑)
44		simplr 533	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑏 ∈ (ℕ0 ↑𝑚 𝐼))
45		eqid 2238	. . . . . . . . . . . . . 14 ⊢ (+g‘𝑅) = (+g‘𝑅)
46	1, 2, 45, 3, 10, 12	psradd 15155	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 + 𝑌) = (𝑋 ∘𝑓 (+g‘𝑅)𝑌))
47	46	fveq1d 5697	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑋 + 𝑌)‘𝑏) = ((𝑋 ∘𝑓 (+g‘𝑅)𝑌)‘𝑏))
48	47	adantr 276	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋 + 𝑌)‘𝑏) = ((𝑋 ∘𝑓 (+g‘𝑅)𝑌)‘𝑏))
49		eqid 2238	. . . . . . . . . . . . . 14 ⊢ (Base‘𝑅) = (Base‘𝑅)
50	1, 49, 14, 2, 10	psrelbasfi 15152	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑋:(ℕ0 ↑𝑚 𝐼)⟶(Base‘𝑅))
51	50	ffnd 5534	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 Fn (ℕ0 ↑𝑚 𝐼))
52	1, 49, 14, 2, 12	psrelbasfi 15152	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑌:(ℕ0 ↑𝑚 𝐼)⟶(Base‘𝑅))
53	52	ffnd 5534	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑌 Fn (ℕ0 ↑𝑚 𝐼))
54		fnmap 6929	. . . . . . . . . . . . 13 ⊢ ↑𝑚 Fn (V × V)
55	14	elexd 2835	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐼 ∈ V)
56		fnovex 6118	. . . . . . . . . . . . 13 ⊢ (( ↑𝑚 Fn (V × V) ∧ ℕ0 ∈ V ∧ 𝐼 ∈ V) → (ℕ0 ↑𝑚 𝐼) ∈ V)
57	54, 28, 55, 56	mp3an12i 1382	. . . . . . . . . . . 12 ⊢ (𝜑 → (ℕ0 ↑𝑚 𝐼) ∈ V)
58		inidm 3440	. . . . . . . . . . . 12 ⊢ ((ℕ0 ↑𝑚 𝐼) ∩ (ℕ0 ↑𝑚 𝐼)) = (ℕ0 ↑𝑚 𝐼)
59		eqidd 2239	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑋‘𝑏) = (𝑋‘𝑏))
60		eqidd 2239	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑌‘𝑏) = (𝑌‘𝑏))
61	4	adantr 276	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑅 ∈ Grp)
62	50	ffvelcdmda 5843	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑋‘𝑏) ∈ (Base‘𝑅))
63	52	ffvelcdmda 5843	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑌‘𝑏) ∈ (Base‘𝑅))
64	49, 45, 61, 62, 63	grpcld 13872	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)) ∈ (Base‘𝑅))
65	51, 53, 57, 57, 58, 59, 60, 64	ofvalg 6312	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋 ∘𝑓 (+g‘𝑅)𝑌)‘𝑏) = ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)))
66	48, 65	eqtrd 2271	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋 + 𝑌)‘𝑏) = ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)))
67	43, 44, 66	syl2anc 415	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((𝑋 + 𝑌)‘𝑏) = ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)))
68	32	ad3antrrr 496	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → 𝑝:𝐼⟶ℕ0)
69		simpr 110	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → 𝑒 ∈ 𝐼)
70	68, 69	ffvelcdmd 5844	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ∈ ℕ0)
71	70	nn0red 9626	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ∈ ℝ)
72	27	ad2antrr 492	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑝 ∈ (ℕ0 ↑𝑚 𝐼))
73	30	biimpa 296	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑝:𝐼⟶ℕ0)
74	73	ffnd 5534	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑝 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑝 Fn 𝐼)
75	43, 72, 74	syl2anc 415	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑝 Fn 𝐼)
76	33	ad2antrr 492	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑞 ∈ (ℕ0 ↑𝑚 𝐼))
77	34	biimpa 296	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑞 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑞:𝐼⟶ℕ0)
78	77	ffnd 5534	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑞 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑞 Fn 𝐼)
79	43, 76, 78	syl2anc 415	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝑞 Fn 𝐼)
80	37	ad2antrr 492	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → 𝐼 ∈ Fin)
81		eqidd 2239	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) = (𝑝‘𝑒))
82		eqidd 2239	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) = (𝑞‘𝑒))
83	36	ad3antrrr 496	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → 𝑞:𝐼⟶ℕ0)
84	83, 69	ffvelcdmd 5844	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ∈ ℕ0)
85	70, 84	nn0addcld 9629	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝‘𝑒) + (𝑞‘𝑒)) ∈ ℕ0)
86	75, 79, 80, 80, 38, 81, 82, 85	ofvalg 6312	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) = ((𝑝‘𝑒) + (𝑞‘𝑒)))
87	86, 85	eqeltrd 2315	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) ∈ ℕ0)
88	87	nn0red 9626	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) ∈ ℝ)
89		elmapi 6944	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑏 ∈ (ℕ0 ↑𝑚 𝐼) → 𝑏:𝐼⟶ℕ0)
90	89	adantl 277	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑏:𝐼⟶ℕ0)
91	90	ad2antrr 492	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → 𝑏:𝐼⟶ℕ0)
92	91, 69	ffvelcdmd 5844	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑏‘𝑒) ∈ ℕ0)
93	92	nn0red 9626	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑏‘𝑒) ∈ ℝ)
94		nn0addge1 9614	. . . . . . . . . . . . . . . 16 ⊢ (((𝑝‘𝑒) ∈ ℝ ∧ (𝑞‘𝑒) ∈ ℕ0) → (𝑝‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
95	71, 84, 94	syl2anc 415	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
96	95, 86	breqtrrd 4158	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ≤ ((𝑝 ∘𝑓 + 𝑞)‘𝑒))
97		fveq2 5695	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑒 → ((𝑝 ∘𝑓 + 𝑞)‘𝑘) = ((𝑝 ∘𝑓 + 𝑞)‘𝑒))
98		fveq2 5695	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑒 → (𝑏‘𝑘) = (𝑏‘𝑒))
99	97, 98	breq12d 4143	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑒 → (((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘) ↔ ((𝑝 ∘𝑓 + 𝑞)‘𝑒) < (𝑏‘𝑒)))
100		simplr 533	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘))
101	99, 100, 69	rspcdva 2934	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) < (𝑏‘𝑒))
102	71, 88, 93, 96, 101	lelttrd 8453	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) < (𝑏‘𝑒))
103	102	ralrimiva 2623	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑒 ∈ 𝐼 (𝑝‘𝑒) < (𝑏‘𝑒))
104		fveq2 5695	. . . . . . . . . . . . . 14 ⊢ (𝑣 = 𝑒 → (𝑝‘𝑣) = (𝑝‘𝑒))
105		fveq2 5695	. . . . . . . . . . . . . 14 ⊢ (𝑣 = 𝑒 → (𝑏‘𝑣) = (𝑏‘𝑒))
106	104, 105	breq12d 4143	. . . . . . . . . . . . 13 ⊢ (𝑣 = 𝑒 → ((𝑝‘𝑣) < (𝑏‘𝑣) ↔ (𝑝‘𝑒) < (𝑏‘𝑒)))
107	106	cbvralv 2786	. . . . . . . . . . . 12 ⊢ (∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣) ↔ ∀𝑒 ∈ 𝐼 (𝑝‘𝑒) < (𝑏‘𝑒))
108	103, 107	sylibr 134	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣))
109		fveq1 5694	. . . . . . . . . . . . . . 15 ⊢ (𝑢 = 𝑏 → (𝑢‘𝑣) = (𝑏‘𝑣))
110	109	breq2d 4142	. . . . . . . . . . . . . 14 ⊢ (𝑢 = 𝑏 → ((𝑝‘𝑣) < (𝑢‘𝑣) ↔ (𝑝‘𝑣) < (𝑏‘𝑣)))
111	110	ralbidv 2550	. . . . . . . . . . . . 13 ⊢ (𝑢 = 𝑏 → (∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) ↔ ∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣)))
112		fveqeq2 5704	. . . . . . . . . . . . 13 ⊢ (𝑢 = 𝑏 → ((𝑋‘𝑢) = (0g‘𝑅) ↔ (𝑋‘𝑏) = (0g‘𝑅)))
113	111, 112	imbi12d 234	. . . . . . . . . . . 12 ⊢ (𝑢 = 𝑏 → ((∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)) ↔ (∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣) → (𝑋‘𝑏) = (0g‘𝑅))))
114		simprr 537	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) → ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))
115	114	ad3antrrr 496	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))
116	113, 115, 44	rspcdva 2934	. . . . . . . . . . 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 6100	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)) = ((0g‘𝑅)(+g‘𝑅)(𝑌‘𝑏)))
119	67, 118	eqtrd 2271	. . . . . . . 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 415	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → (𝑌‘𝑏) ∈ (Base‘𝑅))
122	49, 45, 15, 120, 121	grplidd 13891	. . . . . . . 8 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((0g‘𝑅)(+g‘𝑅)(𝑌‘𝑏)) = (𝑌‘𝑏))
123	84	nn0red 9626	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ∈ ℝ)
124		nn0addge2 9615	. . . . . . . . . . . . . 14 ⊢ (((𝑞‘𝑒) ∈ ℝ ∧ (𝑝‘𝑒) ∈ ℕ0) → (𝑞‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
125	123, 70, 124	syl2anc 415	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
126	125, 86	breqtrrd 4158	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ≤ ((𝑝 ∘𝑓 + 𝑞)‘𝑒))
127	123, 88, 93, 126, 101	lelttrd 8453	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) < (𝑏‘𝑒))
128	127	ralrimiva 2623	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑒 ∈ 𝐼 (𝑞‘𝑒) < (𝑏‘𝑒))
129		fveq2 5695	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑒 → (𝑞‘𝑡) = (𝑞‘𝑒))
130		fveq2 5695	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑒 → (𝑏‘𝑡) = (𝑏‘𝑒))
131	129, 130	breq12d 4143	. . . . . . . . . . 11 ⊢ (𝑡 = 𝑒 → ((𝑞‘𝑡) < (𝑏‘𝑡) ↔ (𝑞‘𝑒) < (𝑏‘𝑒)))
132	131	cbvralv 2786	. . . . . . . . . 10 ⊢ (∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡) ↔ ∀𝑒 ∈ 𝐼 (𝑞‘𝑒) < (𝑏‘𝑒))
133	128, 132	sylibr 134	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡))
134		fveq1 5694	. . . . . . . . . . . . 13 ⊢ (𝑠 = 𝑏 → (𝑠‘𝑡) = (𝑏‘𝑡))
135	134	breq2d 4142	. . . . . . . . . . . 12 ⊢ (𝑠 = 𝑏 → ((𝑞‘𝑡) < (𝑠‘𝑡) ↔ (𝑞‘𝑡) < (𝑏‘𝑡)))
136	135	ralbidv 2550	. . . . . . . . . . 11 ⊢ (𝑠 = 𝑏 → (∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) ↔ ∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡)))
137		fveqeq2 5704	. . . . . . . . . . 11 ⊢ (𝑠 = 𝑏 → ((𝑌‘𝑠) = (0g‘𝑅) ↔ (𝑌‘𝑏) = (0g‘𝑅)))
138	136, 137	imbi12d 234	. . . . . . . . . 10 ⊢ (𝑠 = 𝑏 → ((∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)) ↔ (∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡) → (𝑌‘𝑏) = (0g‘𝑅))))
139		simprr 537	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))
140	139	ad2antrr 492	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))
141	138, 140, 44	rspcdva 2934	. . . . . . . . 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 2275	. . . . . . 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 2623	. . . . 5 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → ∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
146		fveq1 5694	. . . . . . . 8 ⊢ (𝑎 = (𝑝 ∘𝑓 + 𝑞) → (𝑎‘𝑘) = ((𝑝 ∘𝑓 + 𝑞)‘𝑘))
147	146	breq1d 4140	. . . . . . 7 ⊢ (𝑎 = (𝑝 ∘𝑓 + 𝑞) → ((𝑎‘𝑘) < (𝑏‘𝑘) ↔ ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)))
148	147	ralbidv 2550	. . . . . 6 ⊢ (𝑎 = (𝑝 ∘𝑓 + 𝑞) → (∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) ↔ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)))
149	148	rspceaimv 2938	. . . . 5 ⊢ (((𝑝 ∘𝑓 + 𝑞) ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅))) → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
150	42, 145, 149	syl2anc 415	. . . 4 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
151	24, 150	rexlimddv 2673	. . 3 ⊢ ((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
152	19, 151	rexlimddv 2673	. 2 ⊢ (𝜑 → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
153	6, 1, 2, 15, 7	mplelbascoe 15174	. . 3 ⊢ ((𝐼 ∈ Fin ∧ 𝑅 ∈ Grp) → ((𝑋 + 𝑌) ∈ 𝑈 ↔ ((𝑋 + 𝑌) ∈ (Base‘𝑆) ∧ ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))))
154	14, 4, 153	syl2anc 415	. 2 ⊢ (𝜑 → ((𝑋 + 𝑌) ∈ 𝑈 ↔ ((𝑋 + 𝑌) ∈ (Base‘𝑆) ∧ ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))))
155	13, 152, 154	mpbir2and 957	1 ⊢ (𝜑 → (𝑋 + 𝑌) ∈ 𝑈)

This proof depends on syntax axioms:   → wi 4   ∧ wa 104   ↔ wb 105   = wceq 1402   ∈ wcel 2209  ∀wral 2528  ∃wrex 2529  Vcvv 2821   class class class wbr 4130   × cxp 4772   Fn wfn 5372  ⟶wf 5373  ‘cfv 5377  (class class class)co 6085   ∘_𝑓 cof 6300   ↑_𝑚 cmap 6922  Fincfn 7022  ℝcr 8179   + caddc 8183   < clt 8361   ≤ cle 8362  ℕ₀cn0 9568  Basecbs 13404  +_gcplusg 13484  0_gc0g 13663  Grpcgrp 13858   mPwSer cmps 15129   mPoly cmpl 15130

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4246  ax-sep 4249  ax-nul 4259  ax-pow 4311  ax-pr 4346  ax-un 4578  ax-setind 4684  ax-iinf 4735  ax-cnex 8271  ax-resscn 8272  ax-1cn 8273  ax-1re 8274  ax-icn 8275  ax-addcl 8276  ax-addrcl 8277  ax-mulcl 8278  ax-addcom 8280  ax-addass 8282  ax-distr 8284  ax-i2m1 8285  ax-0lt1 8286  ax-0id 8288  ax-rnegex 8289  ax-cnre 8291  ax-pre-ltirr 8292  ax-pre-ltwlin 8293  ax-pre-lttrn 8294  ax-pre-apti 8295  ax-pre-ltadd 8296

This proof depends on definitions:  df-bi 117  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3715  df-pr 3716  df-tp 3717  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4131  df-opab 4193  df-mpt 4194  df-tr 4230  df-id 4438  df-iord 4511  df-on 4513  df-suc 4516  df-iom 4738  df-xp 4780  df-rel 4781  df-cnv 4782  df-co 4783  df-dm 4784  df-rn 4785  df-res 4786  df-ima 4787  df-iota 5337  df-fun 5379  df-fn 5380  df-f 5381  df-f1 5382  df-fo 5383  df-f1o 5384  df-fv 5385  df-riota 6038  df-ov 6088  df-oprab 6089  df-mpo 6090  df-of 6302  df-1st 6374  df-2nd 6375  df-1o 6687  df-er 6807  df-map 6924  df-ixp 6981  df-en 7023  df-fin 7025  df-pnf 8363  df-mnf 8364  df-xr 8365  df-ltxr 8366  df-le 8367  df-sub 8501  df-neg 8502  df-inn 9308  df-2 9366  df-3 9367  df-4 9368  df-5 9369  df-6 9370  df-7 9371  df-8 9372  df-9 9373  df-n0 9569  df-z 9650  df-uz 9932  df-fz 10423  df-struct 13406  df-ndx 13407  df-slot 13408  df-base 13410  df-sets 13411  df-iress 13412  df-plusg 13497  df-mulr 13498  df-sca 13500  df-vsca 13501  df-tset 13503  df-rest 13648  df-topn 13649  df-0g 13665  df-topgen 13667  df-pt 13668  df-mgm 13729  df-sgrp 13770  df-mnd 13783  df-grp 13861  df-psr 15131  df-mplcoe 15132

This theorem is used by:  mplsubgfi  15183