Theorem mplsubgfilemcl 14628

Description: Lemma for mplsubgfi 14630. 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 2209	. . 3 ⊢ (Base‘𝑆) = (Base‘𝑆)
3		mplsubgfilemcl.p	. . 3 ⊢ + = (+g‘𝑆)
4		mplsubg.r	. . . 4 ⊢ (𝜑 → 𝑅 ∈ Grp)
5	4	grpmgmd 13525	. . 3 ⊢ (𝜑 → 𝑅 ∈ Mgm)
6		mplsubg.p	. . . . 5 ⊢ 𝑃 = (𝐼 mPoly 𝑅)
7		mplsubg.u	. . . . 5 ⊢ 𝑈 = (Base‘𝑃)
8	6, 1, 7, 2	mplbasss 14625	. . . 4 ⊢ 𝑈 ⊆ (Base‘𝑆)
9		mplsubgfilemcl.x	. . . 4 ⊢ (𝜑 → 𝑋 ∈ 𝑈)
10	8, 9	sselid 3202	. . 3 ⊢ (𝜑 → 𝑋 ∈ (Base‘𝑆))
11		mplsubgfilemcl.y	. . . 4 ⊢ (𝜑 → 𝑌 ∈ 𝑈)
12	8, 11	sselid 3202	. . 3 ⊢ (𝜑 → 𝑌 ∈ (Base‘𝑆))
13	1, 2, 3, 5, 10, 12	psraddcl 14609	. 2 ⊢ (𝜑 → (𝑋 + 𝑌) ∈ (Base‘𝑆))
14		mplsubg.i	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ Fin)
15		eqid 2209	. . . . . . 7 ⊢ (0g‘𝑅) = (0g‘𝑅)
16	6, 1, 2, 15, 7	mplelbascoe 14621	. . . . . 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 14621	. . . . . . . 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 9372	. . . . . . . 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 9343	. . . . . . . . . . 11 ⊢ ℕ0 ∈ V
29	28	a1i 9	. . . . . . . . . 10 ⊢ (𝜑 → ℕ0 ∈ V)
30	29, 14	elmapd 6779	. . . . . . . . 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 6779	. . . . . . . . 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 3393	. . . . . . 7 ⊢ (𝐼 ∩ 𝐼) = 𝐼
39	26, 32, 36, 37, 37, 38	off 6201	. . . . . 6 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → (𝑝 ∘𝑓 + 𝑞):𝐼⟶ℕ0)
40	29, 14	elmapd 6779	. . . . . . 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 2209	. . . . . . . . . . . . . 14 ⊢ (+g‘𝑅) = (+g‘𝑅)
46	1, 2, 45, 3, 10, 12	psradd 14608	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋 + 𝑌) = (𝑋 ∘𝑓 (+g‘𝑅)𝑌))
47	46	fveq1d 5605	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑋 + 𝑌)‘𝑏) = ((𝑋 ∘𝑓 (+g‘𝑅)𝑌)‘𝑏))
48	47	adantr 276	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋 + 𝑌)‘𝑏) = ((𝑋 ∘𝑓 (+g‘𝑅)𝑌)‘𝑏))
49		eqid 2209	. . . . . . . . . . . . . 14 ⊢ (Base‘𝑅) = (Base‘𝑅)
50	1, 49, 14, 2, 10	psrelbasfi 14605	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑋:(ℕ0 ↑𝑚 𝐼)⟶(Base‘𝑅))
51	50	ffnd 5450	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑋 Fn (ℕ0 ↑𝑚 𝐼))
52	1, 49, 14, 2, 12	psrelbasfi 14605	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑌:(ℕ0 ↑𝑚 𝐼)⟶(Base‘𝑅))
53	52	ffnd 5450	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑌 Fn (ℕ0 ↑𝑚 𝐼))
54		fnmap 6772	. . . . . . . . . . . . 13 ⊢ ↑𝑚 Fn (V × V)
55	14	elexd 2793	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐼 ∈ V)
56		fnovex 6007	. . . . . . . . . . . . 13 ⊢ (( ↑𝑚 Fn (V × V) ∧ ℕ0 ∈ V ∧ 𝐼 ∈ V) → (ℕ0 ↑𝑚 𝐼) ∈ V)
57	54, 28, 55, 56	mp3an12i 1356	. . . . . . . . . . . 12 ⊢ (𝜑 → (ℕ0 ↑𝑚 𝐼) ∈ V)
58		inidm 3393	. . . . . . . . . . . 12 ⊢ ((ℕ0 ↑𝑚 𝐼) ∩ (ℕ0 ↑𝑚 𝐼)) = (ℕ0 ↑𝑚 𝐼)
59		eqidd 2210	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑋‘𝑏) = (𝑋‘𝑏))
60		eqidd 2210	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑌‘𝑏) = (𝑌‘𝑏))
61	4	adantr 276	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → 𝑅 ∈ Grp)
62	50	ffvelcdmda 5743	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑋‘𝑏) ∈ (Base‘𝑅))
63	52	ffvelcdmda 5743	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → (𝑌‘𝑏) ∈ (Base‘𝑅))
64	49, 45, 61, 62, 63	grpcld 13513	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)) ∈ (Base‘𝑅))
65	51, 53, 57, 57, 58, 59, 60, 64	ofvalg 6198	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) → ((𝑋 ∘𝑓 (+g‘𝑅)𝑌)‘𝑏) = ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)))
66	48, 65	eqtrd 2242	. . . . . . . . . 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 5744	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ∈ ℕ0)
71	70	nn0red 9391	. . . . . . . . . . . . . 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 5450	. . . . . . . . . . . . . . . . . 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 5450	. . . . . . . . . . . . . . . . . 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 2210	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) = (𝑝‘𝑒))
82		eqidd 2210	. . . . . . . . . . . . . . . . 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 5744	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ∈ ℕ0)
85	70, 84	nn0addcld 9394	. . . . . . . . . . . . . . . . 17 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝‘𝑒) + (𝑞‘𝑒)) ∈ ℕ0)
86	75, 79, 80, 80, 38, 81, 82, 85	ofvalg 6198	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) = ((𝑝‘𝑒) + (𝑞‘𝑒)))
87	86, 85	eqeltrd 2286	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) ∈ ℕ0)
88	87	nn0red 9391	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) ∈ ℝ)
89		elmapi 6787	. . . . . . . . . . . . . . . . . 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 5744	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑏‘𝑒) ∈ ℕ0)
93	92	nn0red 9391	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑏‘𝑒) ∈ ℝ)
94		nn0addge1 9383	. . . . . . . . . . . . . . . 16 ⊢ (((𝑝‘𝑒) ∈ ℝ ∧ (𝑞‘𝑒) ∈ ℕ0) → (𝑝‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
95	71, 84, 94	syl2anc 411	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
96	95, 86	breqtrrd 4090	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) ≤ ((𝑝 ∘𝑓 + 𝑞)‘𝑒))
97		fveq2 5603	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑒 → ((𝑝 ∘𝑓 + 𝑞)‘𝑘) = ((𝑝 ∘𝑓 + 𝑞)‘𝑒))
98		fveq2 5603	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑒 → (𝑏‘𝑘) = (𝑏‘𝑒))
99	97, 98	breq12d 4075	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑒 → (((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘) ↔ ((𝑝 ∘𝑓 + 𝑞)‘𝑒) < (𝑏‘𝑒)))
100		simplr 528	. . . . . . . . . . . . . . 15 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘))
101	99, 100, 69	rspcdva 2892	. . . . . . . . . . . . . 14 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → ((𝑝 ∘𝑓 + 𝑞)‘𝑒) < (𝑏‘𝑒))
102	71, 88, 93, 96, 101	lelttrd 8239	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑝‘𝑒) < (𝑏‘𝑒))
103	102	ralrimiva 2583	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑒 ∈ 𝐼 (𝑝‘𝑒) < (𝑏‘𝑒))
104		fveq2 5603	. . . . . . . . . . . . . 14 ⊢ (𝑣 = 𝑒 → (𝑝‘𝑣) = (𝑝‘𝑒))
105		fveq2 5603	. . . . . . . . . . . . . 14 ⊢ (𝑣 = 𝑒 → (𝑏‘𝑣) = (𝑏‘𝑒))
106	104, 105	breq12d 4075	. . . . . . . . . . . . 13 ⊢ (𝑣 = 𝑒 → ((𝑝‘𝑣) < (𝑏‘𝑣) ↔ (𝑝‘𝑒) < (𝑏‘𝑒)))
107	106	cbvralv 2745	. . . . . . . . . . . 12 ⊢ (∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣) ↔ ∀𝑒 ∈ 𝐼 (𝑝‘𝑒) < (𝑏‘𝑒))
108	103, 107	sylibr 134	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣))
109		fveq1 5602	. . . . . . . . . . . . . . 15 ⊢ (𝑢 = 𝑏 → (𝑢‘𝑣) = (𝑏‘𝑣))
110	109	breq2d 4074	. . . . . . . . . . . . . 14 ⊢ (𝑢 = 𝑏 → ((𝑝‘𝑣) < (𝑢‘𝑣) ↔ (𝑝‘𝑣) < (𝑏‘𝑣)))
111	110	ralbidv 2510	. . . . . . . . . . . . 13 ⊢ (𝑢 = 𝑏 → (∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) ↔ ∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑏‘𝑣)))
112		fveqeq2 5612	. . . . . . . . . . . . 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 2892	. . . . . . . . . . 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 5989	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((𝑋‘𝑏)(+g‘𝑅)(𝑌‘𝑏)) = ((0g‘𝑅)(+g‘𝑅)(𝑌‘𝑏)))
119	67, 118	eqtrd 2242	. . . . . . . 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 13532	. . . . . . . 8 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ((0g‘𝑅)(+g‘𝑅)(𝑌‘𝑏)) = (𝑌‘𝑏))
123	84	nn0red 9391	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ∈ ℝ)
124		nn0addge2 9384	. . . . . . . . . . . . . 14 ⊢ (((𝑞‘𝑒) ∈ ℝ ∧ (𝑝‘𝑒) ∈ ℕ0) → (𝑞‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
125	123, 70, 124	syl2anc 411	. . . . . . . . . . . . 13 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ≤ ((𝑝‘𝑒) + (𝑞‘𝑒)))
126	125, 86	breqtrrd 4090	. . . . . . . . . . . 12 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) ≤ ((𝑝 ∘𝑓 + 𝑞)‘𝑒))
127	123, 88, 93, 126, 101	lelttrd 8239	. . . . . . . . . . 11 ⊢ ((((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) ∧ 𝑒 ∈ 𝐼) → (𝑞‘𝑒) < (𝑏‘𝑒))
128	127	ralrimiva 2583	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑒 ∈ 𝐼 (𝑞‘𝑒) < (𝑏‘𝑒))
129		fveq2 5603	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑒 → (𝑞‘𝑡) = (𝑞‘𝑒))
130		fveq2 5603	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑒 → (𝑏‘𝑡) = (𝑏‘𝑒))
131	129, 130	breq12d 4075	. . . . . . . . . . 11 ⊢ (𝑡 = 𝑒 → ((𝑞‘𝑡) < (𝑏‘𝑡) ↔ (𝑞‘𝑒) < (𝑏‘𝑒)))
132	131	cbvralv 2745	. . . . . . . . . 10 ⊢ (∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡) ↔ ∀𝑒 ∈ 𝐼 (𝑞‘𝑒) < (𝑏‘𝑒))
133	128, 132	sylibr 134	. . . . . . . . 9 ⊢ (((((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) ∧ 𝑏 ∈ (ℕ0 ↑𝑚 𝐼)) ∧ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)) → ∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡))
134		fveq1 5602	. . . . . . . . . . . . 13 ⊢ (𝑠 = 𝑏 → (𝑠‘𝑡) = (𝑏‘𝑡))
135	134	breq2d 4074	. . . . . . . . . . . 12 ⊢ (𝑠 = 𝑏 → ((𝑞‘𝑡) < (𝑠‘𝑡) ↔ (𝑞‘𝑡) < (𝑏‘𝑡)))
136	135	ralbidv 2510	. . . . . . . . . . 11 ⊢ (𝑠 = 𝑏 → (∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) ↔ ∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑏‘𝑡)))
137		fveqeq2 5612	. . . . . . . . . . 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 2892	. . . . . . . . 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 2246	. . . . . . 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 2583	. . . . 5 ⊢ (((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) ∧ (𝑞 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑠 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑡 ∈ 𝐼 (𝑞‘𝑡) < (𝑠‘𝑡) → (𝑌‘𝑠) = (0g‘𝑅)))) → ∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
146		fveq1 5602	. . . . . . . 8 ⊢ (𝑎 = (𝑝 ∘𝑓 + 𝑞) → (𝑎‘𝑘) = ((𝑝 ∘𝑓 + 𝑞)‘𝑘))
147	146	breq1d 4072	. . . . . . 7 ⊢ (𝑎 = (𝑝 ∘𝑓 + 𝑞) → ((𝑎‘𝑘) < (𝑏‘𝑘) ↔ ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)))
148	147	ralbidv 2510	. . . . . 6 ⊢ (𝑎 = (𝑝 ∘𝑓 + 𝑞) → (∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) ↔ ∀𝑘 ∈ 𝐼 ((𝑝 ∘𝑓 + 𝑞)‘𝑘) < (𝑏‘𝑘)))
149	148	rspceaimv 2895	. . . . 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 2633	. . 3 ⊢ ((𝜑 ∧ (𝑝 ∈ (ℕ0 ↑𝑚 𝐼) ∧ ∀𝑢 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑣 ∈ 𝐼 (𝑝‘𝑣) < (𝑢‘𝑣) → (𝑋‘𝑢) = (0g‘𝑅)))) → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
152	19, 151	rexlimddv 2633	. 2 ⊢ (𝜑 → ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))
153	6, 1, 2, 15, 7	mplelbascoe 14621	. . 3 ⊢ ((𝐼 ∈ Fin ∧ 𝑅 ∈ Grp) → ((𝑋 + 𝑌) ∈ 𝑈 ↔ ((𝑋 + 𝑌) ∈ (Base‘𝑆) ∧ ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))))
154	14, 4, 153	syl2anc 411	. 2 ⊢ (𝜑 → ((𝑋 + 𝑌) ∈ 𝑈 ↔ ((𝑋 + 𝑌) ∈ (Base‘𝑆) ∧ ∃𝑎 ∈ (ℕ0 ↑𝑚 𝐼)∀𝑏 ∈ (ℕ0 ↑𝑚 𝐼)(∀𝑘 ∈ 𝐼 (𝑎‘𝑘) < (𝑏‘𝑘) → ((𝑋 + 𝑌)‘𝑏) = (0g‘𝑅)))))
155	13, 152, 154	mpbir2and 949	1 ⊢ (𝜑 → (𝑋 + 𝑌) ∈ 𝑈)

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   = wceq 1375   ∈ wcel 2180  ∀wral 2488  ∃wrex 2489  Vcvv 2779   class class class wbr 4062   × cxp 4694   Fn wfn 5289  ⟶wf 5290  ‘cfv 5294  (class class class)co 5974   ∘_𝑓 cof 6186   ↑_𝑚 cmap 6765  Fincfn 6857  ℝcr 7966   + caddc 7970   < clt 8149   ≤ cle 8150  ℕ₀cn0 9337  Basecbs 12998  +_gcplusg 13076  0_gc0g 13255  Grpcgrp 13499   mPwSer cmps 14590   mPoly cmpl 14591

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 617  ax-in2 618  ax-io 713  ax-5 1473  ax-7 1474  ax-gen 1475  ax-ie1 1519  ax-ie2 1520  ax-8 1530  ax-10 1531  ax-11 1532  ax-i12 1533  ax-bndl 1535  ax-4 1536  ax-17 1552  ax-i9 1556  ax-ial 1560  ax-i5r 1561  ax-13 2182  ax-14 2183  ax-ext 2191  ax-coll 4178  ax-sep 4181  ax-nul 4189  ax-pow 4237  ax-pr 4272  ax-un 4501  ax-setind 4606  ax-iinf 4657  ax-cnex 8058  ax-resscn 8059  ax-1cn 8060  ax-1re 8061  ax-icn 8062  ax-addcl 8063  ax-addrcl 8064  ax-mulcl 8065  ax-addcom 8067  ax-addass 8069  ax-distr 8071  ax-i2m1 8072  ax-0lt1 8073  ax-0id 8075  ax-rnegex 8076  ax-cnre 8078  ax-pre-ltirr 8079  ax-pre-ltwlin 8080  ax-pre-lttrn 8081  ax-pre-apti 8082  ax-pre-ltadd 8083

This theorem depends on definitions:  df-bi 117  df-dc 839  df-3or 984  df-3an 985  df-tru 1378  df-fal 1381  df-nf 1487  df-sb 1789  df-eu 2060  df-mo 2061  df-clab 2196  df-cleq 2202  df-clel 2205  df-nfc 2341  df-ne 2381  df-nel 2476  df-ral 2493  df-rex 2494  df-reu 2495  df-rmo 2496  df-rab 2497  df-v 2781  df-sbc 3009  df-csb 3105  df-dif 3179  df-un 3181  df-in 3183  df-ss 3190  df-nul 3472  df-if 3583  df-pw 3631  df-sn 3652  df-pr 3653  df-tp 3654  df-op 3655  df-uni 3868  df-int 3903  df-iun 3946  df-br 4063  df-opab 4125  df-mpt 4126  df-tr 4162  df-id 4361  df-iord 4434  df-on 4436  df-suc 4439  df-iom 4660  df-xp 4702  df-rel 4703  df-cnv 4704  df-co 4705  df-dm 4706  df-rn 4707  df-res 4708  df-ima 4709  df-iota 5254  df-fun 5296  df-fn 5297  df-f 5298  df-f1 5299  df-fo 5300  df-f1o 5301  df-fv 5302  df-riota 5927  df-ov 5977  df-oprab 5978  df-mpo 5979  df-of 6188  df-1st 6256  df-2nd 6257  df-1o 6532  df-er 6650  df-map 6767  df-ixp 6816  df-en 6858  df-fin 6860  df-pnf 8151  df-mnf 8152  df-xr 8153  df-ltxr 8154  df-le 8155  df-sub 8287  df-neg 8288  df-inn 9079  df-2 9137  df-3 9138  df-4 9139  df-5 9140  df-6 9141  df-7 9142  df-8 9143  df-9 9144  df-n0 9338  df-z 9415  df-uz 9691  df-fz 10173  df-struct 13000  df-ndx 13001  df-slot 13002  df-base 13004  df-sets 13005  df-iress 13006  df-plusg 13089  df-mulr 13090  df-sca 13092  df-vsca 13093  df-tset 13095  df-rest 13240  df-topn 13241  df-0g 13257  df-topgen 13259  df-pt 13260  df-mgm 13355  df-sgrp 13401  df-mnd 13416  df-grp 13502  df-psr 14592  df-mplcoe 14593

This theorem is referenced by:  mplsubgfi  14630