Theorem psdmul 22467

Description: Product rule for power series. An outline is available at https://github.com/icecream17/Stuff/blob/main/math/psdmul.pdf. (Contributed by SN, 25-Apr-2025.)

Hypotheses

Ref	Expression
psdmul.s	⊢ 𝑆 = (𝐼 mPwSer 𝑅)
psdmul.b	⊢ 𝐵 = (Base‘𝑆)
psdmul.p	⊢ + = (+g‘𝑆)
psdmul.m	⊢ · = (.r‘𝑆)
psdmul.r	⊢ (𝜑 → 𝑅 ∈ CRing)
psdmul.x	⊢ (𝜑 → 𝑋 ∈ 𝐼)
psdmul.f	⊢ (𝜑 → 𝐹 ∈ 𝐵)
psdmul.g	⊢ (𝜑 → 𝐺 ∈ 𝐵)

Assertion

Ref	Expression
psdmul	⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘(𝐹 · 𝐺)) = (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) + (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))))

Proof of Theorem psdmul

Dummy variables 𝑏 𝑑 𝑖 𝑘 𝑚 𝑛 𝑜 𝑝 𝑞 𝑟 𝑠 𝑢 𝑣 ℎ 𝑙 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2761	. . . . . 6 ⊢ (Base‘𝑅) = (Base‘𝑅)
2		eqid 2761	. . . . . 6 ⊢ (+g‘𝑅) = (+g‘𝑅)
3		psdmul.r	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ∈ CRing)
4	3	crngringd 20453	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ Ring)
5	4	ringcmnd 20493	. . . . . . 7 ⊢ (𝜑 → 𝑅 ∈ CMnd)
6	5	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑅 ∈ CMnd)
7		simpr 490	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
8		psdmul.f	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹 ∈ 𝐵)
9		psdmul.s	. . . . . . . . . . . 12 ⊢ 𝑆 = (𝐼 mPwSer 𝑅)
10		psdmul.b	. . . . . . . . . . . 12 ⊢ 𝐵 = (Base‘𝑆)
11		reldmpsr 22202	. . . . . . . . . . . 12 ⊢ Rel dom mPwSer
12	9, 10, 11	strov2rcl 17375	. . . . . . . . . . 11 ⊢ (𝐹 ∈ 𝐵 → 𝐼 ∈ V)
13	8, 12	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → 𝐼 ∈ V)
14		eqid 2761	. . . . . . . . . . 11 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} = {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}
15	14	psrbagsn 22352	. . . . . . . . . 10 ⊢ (𝐼 ∈ V → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
16	13, 15	syl 18	. . . . . . . . 9 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
17	16	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
18	14	psrbagaddcl 22212	. . . . . . . 8 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
19	7, 17, 18	syl2anc 596	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
20	14	psrbaglefi 22214	. . . . . . 7 ⊢ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∈ Fin)
21	19, 20	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∈ Fin)
22		eqid 2761	. . . . . . 7 ⊢ (.g‘𝑅) = (.g‘𝑅)
23	3	crnggrpd 20454	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ∈ Grp)
24	23	grpmndd 19137	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ Mnd)
25	24	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑅 ∈ Mnd)
26	14	psrbagf 22206	. . . . . . . . . . 11 ⊢ (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑑:𝐼⟶ℕ0)
27	26	adantl 487	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑:𝐼⟶ℕ0)
28		psdmul.x	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ 𝐼)
29	28	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑋 ∈ 𝐼)
30	27, 29	ffvelcdmd 7077	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑‘𝑋) ∈ ℕ0)
31		peano2nn0 12627	. . . . . . . . 9 ⊢ ((𝑑‘𝑋) ∈ ℕ0 → ((𝑑‘𝑋) + 1) ∈ ℕ0)
32	30, 31	syl 18	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑑‘𝑋) + 1) ∈ ℕ0)
33	32	adantr 486	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝑑‘𝑋) + 1) ∈ ℕ0)
34		eqid 2761	. . . . . . . 8 ⊢ (.r‘𝑅) = (.r‘𝑅)
35	4	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑅 ∈ Ring)
36	9, 1, 14, 10, 8	psrelbas 22223	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
37	36	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝐹:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
38		elrabi 3641	. . . . . . . . . 10 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
39	38	adantl 487	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
40	37, 39	ffvelcdmd 7077	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → (𝐹‘𝑢) ∈ (Base‘𝑅))
41		psdmul.g	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺 ∈ 𝐵)
42	9, 1, 14, 10, 41	psrelbas 22223	. . . . . . . . . 10 ⊢ (𝜑 → 𝐺:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
43	42	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝐺:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
44		eqid 2761	. . . . . . . . . . . 12 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}
45	14, 44	psrbagconcl 22215	. . . . . . . . . . 11 ⊢ (((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
46	19, 45	sylan 592	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
47		elrabi 3641	. . . . . . . . . 10 ⊢ (((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
48	46, 47	syl 18	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
49	43, 48	ffvelcdmd 7077	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)) ∈ (Base‘𝑅))
50	1, 34, 35, 40, 49	ringcld 20464	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) ∈ (Base‘𝑅))
51	1, 22, 25, 33, 50	mulgnn0cld 19285	. . . . . 6 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
52		disjdifr 4427	. . . . . . 7 ⊢ (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∩ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) = ∅
53	52	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∩ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) = ∅)
54		1nn0 12603	. . . . . . . . . . . . . . . 16 ⊢ 1 ∈ ℕ0
55		0nn0 12602	. . . . . . . . . . . . . . . 16 ⊢ 0 ∈ ℕ0
56	54, 55	ifcli 4530	. . . . . . . . . . . . . . 15 ⊢ if(𝑖 = 𝑋, 1, 0) ∈ ℕ0
57	56	nn0ge0i 12614	. . . . . . . . . . . . . 14 ⊢ 0 ≤ if(𝑖 = 𝑋, 1, 0)
58	27	ffvelcdmda 7076	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
59	58	nn0red 12649	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℝ)
60	56	nn0rei 12598	. . . . . . . . . . . . . . . 16 ⊢ if(𝑖 = 𝑋, 1, 0) ∈ ℝ
61	60	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℝ)
62	59, 61	addge01d 11885	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (0 ≤ if(𝑖 = 𝑋, 1, 0) ↔ (𝑑‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
63	57, 62	mpbii 236	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
64	63	ralrimiva 3155	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ∀𝑖 ∈ 𝐼 (𝑑‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
65	27	ffnd 6702	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 Fn 𝐼)
66	54, 55	ifcli 4530	. . . . . . . . . . . . . . . . 17 ⊢ if(𝑦 = 𝑋, 1, 0) ∈ ℕ0
67	66	elexi 3473	. . . . . . . . . . . . . . . 16 ⊢ if(𝑦 = 𝑋, 1, 0) ∈ V
68		eqid 2761	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))
69	67, 68	fnmpti 6674	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼
70	69	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
71	13	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐼 ∈ V)
72		inidm 4172	. . . . . . . . . . . . . 14 ⊢ (𝐼 ∩ 𝐼) = 𝐼
73	65, 70, 71, 71, 72	offn 7695	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
74		eqidd 2762	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
75		eqeq1 2765	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑖 → (𝑦 = 𝑋 ↔ 𝑖 = 𝑋))
76	75	ifbid 4506	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 𝑖 → if(𝑦 = 𝑋, 1, 0) = if(𝑖 = 𝑋, 1, 0))
77	56	elexi 3473	. . . . . . . . . . . . . . . 16 ⊢ if(𝑖 = 𝑋, 1, 0) ∈ V
78	76, 68, 77	fvmpt 6985	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ 𝐼 → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
79	78	adantl 487	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
80	65, 70, 71, 71, 72, 74, 79	ofval 7693	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
81	65, 73, 71, 71, 72, 74, 80	ofrfval 7692	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ ∀𝑖 ∈ 𝐼 (𝑑‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
82	64, 81	mpbird 260	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
83	82	adantr 486	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
84	13	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐼 ∈ V)
85	14	psrbagf 22206	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑘:𝐼⟶ℕ0)
86	85	adantl 487	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑘:𝐼⟶ℕ0)
87	27	adantr 486	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑:𝐼⟶ℕ0)
88	14	psrbagf 22206	. . . . . . . . . . . . 13 ⊢ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
89	19, 88	syl 18	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
90	89	adantr 486	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
91		nn0re 12596	. . . . . . . . . . . . 13 ⊢ (𝑞 ∈ ℕ0 → 𝑞 ∈ ℝ)
92		nn0re 12596	. . . . . . . . . . . . 13 ⊢ (𝑟 ∈ ℕ0 → 𝑟 ∈ ℝ)
93		nn0re 12596	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℕ0 → 𝑠 ∈ ℝ)
94		letr 11385	. . . . . . . . . . . . 13 ⊢ ((𝑞 ∈ ℝ ∧ 𝑟 ∈ ℝ ∧ 𝑠 ∈ ℝ) → ((𝑞 ≤ 𝑟 ∧ 𝑟 ≤ 𝑠) → 𝑞 ≤ 𝑠))
95	91, 92, 93, 94	syl3an 1178	. . . . . . . . . . . 12 ⊢ ((𝑞 ∈ ℕ0 ∧ 𝑟 ∈ ℕ0 ∧ 𝑠 ∈ ℕ0) → ((𝑞 ≤ 𝑟 ∧ 𝑟 ≤ 𝑠) → 𝑞 ≤ 𝑠))
96	95	adantl 487	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑞 ∈ ℕ0 ∧ 𝑟 ∈ ℕ0 ∧ 𝑠 ∈ ℕ0)) → ((𝑞 ≤ 𝑟 ∧ 𝑟 ≤ 𝑠) → 𝑞 ≤ 𝑠))
97	84, 86, 87, 90, 96	caoftrn 7723	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑘 ∘r ≤ 𝑑 ∧ 𝑑 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) → 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
98	83, 97	mpan2d 707	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑘 ∘r ≤ 𝑑 → 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
99	98	ss2rabdv 4023	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
100		undifr 4439	. . . . . . . 8 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↔ (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∪ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
101	99, 100	sylib 221	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∪ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
102	101	eqcomd 2767	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} = (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∪ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
103	1, 2, 6, 21, 51, 53, 102	gsummptfidmsplit 20124	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
104		eqid 2761	. . . . . 6 ⊢ (0g‘𝑅) = (0g‘𝑅)
105		ovex 7445	. . . . . . . . 9 ⊢ (ℕ0 ↑m 𝐼) ∈ V
106	105	rabex 5300	. . . . . . . 8 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∈ V
107	106	rabex 5300	. . . . . . 7 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∈ V
108	107	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∈ V)
109		ovex 7445	. . . . . . . . 9 ⊢ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) ∈ V
110		eqid 2761	. . . . . . . . 9 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) = (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))
111	109, 110	fnmpti 6674	. . . . . . . 8 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) Fn {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}
112	111	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) Fn {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
113		fvexd 6892	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (0g‘𝑅) ∈ V)
114	112, 21, 113	fndmfifsupp 9354	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) finSupp (0g‘𝑅))
115	1, 104, 22, 108, 50, 114, 6, 32	gsummulg 20136	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = (((𝑑‘𝑋) + 1)(.g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))
116		difrab 4264	. . . . . . . . . . 11 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑘 ∘r ≤ 𝑑)}
117	116	eleq2i 2853	. . . . . . . . . 10 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↔ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑘 ∘r ≤ 𝑑)})
118		breq1 5106	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑢 → (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ 𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
119		breq1 5106	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑢 → (𝑘 ∘r ≤ 𝑑 ↔ 𝑢 ∘r ≤ 𝑑))
120	119	notbid 321	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑢 → (¬ 𝑘 ∘r ≤ 𝑑 ↔ ¬ 𝑢 ∘r ≤ 𝑑))
121	118, 120	anbi12d 644	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑢 → ((𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑘 ∘r ≤ 𝑑) ↔ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑)))
122	121	elrab 3645	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑘 ∘r ≤ 𝑑)} ↔ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑)))
123	14	psrbagf 22206	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑢:𝐼⟶ℕ0)
124	123	ffnd 6702	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑢 Fn 𝐼)
125	124	adantl 487	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑢 Fn 𝐼)
126	73	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
127	13	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐼 ∈ V)
128		eqidd 2762	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
129	65	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 Fn 𝐼)
130	66	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 ∈ 𝐼 → if(𝑦 = 𝑋, 1, 0) ∈ ℕ0)
131	68, 130	fmpti 7104	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0
132	131	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0)
133	132	ffnd 6702	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
134	133	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
135		eqidd 2762	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
136	78	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
137	129, 134, 127, 127, 72, 135, 136	ofval 7693	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
138	125, 126, 127, 127, 72, 128, 137	ofrfval 7692	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
139	125, 129, 127, 127, 72, 128, 135	ofrfval 7692	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∘r ≤ 𝑑 ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
140	139	notbid 321	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (¬ 𝑢 ∘r ≤ 𝑑 ↔ ¬ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
141		rexnal 3115	. . . . . . . . . . . . . . 15 ⊢ (∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) ↔ ¬ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖))
142	140, 141	bitr4di 292	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (¬ 𝑢 ∘r ≤ 𝑑 ↔ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
143	138, 142	anbi12d 644	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑) ↔ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
144	30	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑑‘𝑋) ∈ ℕ0)
145	123	adantl 487	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑢:𝐼⟶ℕ0)
146	28	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑋 ∈ 𝐼)
147	145, 146	ffvelcdmd 7077	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢‘𝑋) ∈ ℕ0)
148	147	adantlr 728	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢‘𝑋) ∈ ℕ0)
149	148	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑢‘𝑋) ∈ ℕ0)
150		nn0nlt0 12613	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑑‘𝑋) ∈ ℕ0 → ¬ (𝑑‘𝑋) < 0)
151	144, 150	syl 18	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ¬ (𝑑‘𝑋) < 0)
152	27	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑:𝐼⟶ℕ0)
153	152	ffvelcdmda 7076	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
154	153	nn0cnd 12650	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℂ)
155	154	addridd 11491	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑑‘𝑖) + 0) = (𝑑‘𝑖))
156	155	breq2d 5115	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + 0) ↔ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
157	156	biimpd 232	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + 0) → (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
158		ifnefalse 4494	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (𝑖 ≠ 𝑋 → if(𝑖 = 𝑋, 1, 0) = 0)
159	158	oveq2d 7428	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (𝑖 ≠ 𝑋 → ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) = ((𝑑‘𝑖) + 0))
160	159	breq2d 5115	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (𝑖 ≠ 𝑋 → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ↔ (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + 0)))
161	160	imbi1d 344	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑖 ≠ 𝑋 → (((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑖) ≤ (𝑑‘𝑖)) ↔ ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + 0) → (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
162	157, 161	syl5ibrcom 250	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑖 ≠ 𝑋 → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
163	162	imp 412	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
164	163	impancom 457	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) ∧ (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))) → (𝑖 ≠ 𝑋 → (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
165	164	necon1bd 2974	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) ∧ (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))) → (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → 𝑖 = 𝑋))
166	165	ancrd 561	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) ∧ (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))) → (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
167	166	ex 418	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))))
168	167	ralimdva 3175	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → ∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))))
169	168	anim1d 623	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) → (∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
170	169	imp 412	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
171		rexim 3104	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → ∃𝑖 ∈ 𝐼 (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
172	171	imp 412	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) → ∃𝑖 ∈ 𝐼 (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
173		fveq2 6877	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑖 = 𝑋 → (𝑢‘𝑖) = (𝑢‘𝑋))
174		fveq2 6877	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑖 = 𝑋 → (𝑑‘𝑖) = (𝑑‘𝑋))
175	173, 174	breq12d 5116	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑖 = 𝑋 → ((𝑢‘𝑖) ≤ (𝑑‘𝑖) ↔ (𝑢‘𝑋) ≤ (𝑑‘𝑋)))
176	175	notbid 321	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑖 = 𝑋 → (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) ↔ ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋)))
177	176	ceqsrexbv 3610	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (∃𝑖 ∈ 𝐼 (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) ↔ (𝑋 ∈ 𝐼 ∧ ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋)))
178	177	simprbi 503	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃𝑖 ∈ 𝐼 (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) → ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋))
179	172, 178	syl 18	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) → ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋))
180	30	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑‘𝑋) ∈ ℕ0)
181	180	nn0red 12649	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑‘𝑋) ∈ ℝ)
182	148	nn0red 12649	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢‘𝑋) ∈ ℝ)
183	181, 182	ltnled 11438	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑑‘𝑋) < (𝑢‘𝑋) ↔ ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋)))
184	183	biimpar 483	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋)) → (𝑑‘𝑋) < (𝑢‘𝑋))
185	179, 184	sylan2 605	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑑‘𝑋) < (𝑢‘𝑋))
186	170, 185	syldan 603	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑑‘𝑋) < (𝑢‘𝑋))
187		breq2 5107	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑢‘𝑋) = 0 → ((𝑑‘𝑋) < (𝑢‘𝑋) ↔ (𝑑‘𝑋) < 0))
188	186, 187	syl5ibcom 248	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ((𝑢‘𝑋) = 0 → (𝑑‘𝑋) < 0))
189	151, 188	mtod 201	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ¬ (𝑢‘𝑋) = 0)
190	189	neqned 2963	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑢‘𝑋) ≠ 0)
191		elnnne0 12601	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑢‘𝑋) ∈ ℕ ↔ ((𝑢‘𝑋) ∈ ℕ0 ∧ (𝑢‘𝑋) ≠ 0))
192	149, 190, 191	sylanbrc 595	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑢‘𝑋) ∈ ℕ)
193		elfzo0 13815	. . . . . . . . . . . . . . . 16 ⊢ ((𝑑‘𝑋) ∈ (0..^(𝑢‘𝑋)) ↔ ((𝑑‘𝑋) ∈ ℕ0 ∧ (𝑢‘𝑋) ∈ ℕ ∧ (𝑑‘𝑋) < (𝑢‘𝑋)))
194	144, 192, 186, 193	syl3anbrc 1362	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑑‘𝑋) ∈ (0..^(𝑢‘𝑋)))
195		fzostep1 13901	. . . . . . . . . . . . . . 15 ⊢ ((𝑑‘𝑋) ∈ (0..^(𝑢‘𝑋)) → (((𝑑‘𝑋) + 1) ∈ (0..^(𝑢‘𝑋)) ∨ ((𝑑‘𝑋) + 1) = (𝑢‘𝑋)))
196	194, 195	syl 18	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (((𝑑‘𝑋) + 1) ∈ (0..^(𝑢‘𝑋)) ∨ ((𝑑‘𝑋) + 1) = (𝑢‘𝑋)))
197	149	nn0red 12649	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑢‘𝑋) ∈ ℝ)
198	32	ad2antrr 739	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ((𝑑‘𝑋) + 1) ∈ ℕ0)
199	198	nn0red 12649	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ((𝑑‘𝑋) + 1) ∈ ℝ)
200	28	ad2antrr 739	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑋 ∈ 𝐼)
201		iftrue 4488	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑖 = 𝑋 → if(𝑖 = 𝑋, 1, 0) = 1)
202	174, 201	oveq12d 7430	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 = 𝑋 → ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) = ((𝑑‘𝑋) + 1))
203	173, 202	breq12d 5116	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑖 = 𝑋 → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ↔ (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1)))
204	203	rspcv 3573	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑋 ∈ 𝐼 → (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1)))
205	200, 204	syl 18	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1)))
206	205	imp 412	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))) → (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1))
207	206	adantrr 730	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1))
208	197, 199, 207	lensymd 11442	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ¬ ((𝑑‘𝑋) + 1) < (𝑢‘𝑋))
209	208	intn3an3d 1512	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ¬ (((𝑑‘𝑋) + 1) ∈ ℕ0 ∧ (𝑢‘𝑋) ∈ ℕ ∧ ((𝑑‘𝑋) + 1) < (𝑢‘𝑋)))
210		elfzo0 13815	. . . . . . . . . . . . . . 15 ⊢ (((𝑑‘𝑋) + 1) ∈ (0..^(𝑢‘𝑋)) ↔ (((𝑑‘𝑋) + 1) ∈ ℕ0 ∧ (𝑢‘𝑋) ∈ ℕ ∧ ((𝑑‘𝑋) + 1) < (𝑢‘𝑋)))
211	209, 210	sylnibr 332	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ¬ ((𝑑‘𝑋) + 1) ∈ (0..^(𝑢‘𝑋)))
212	196, 211	orcnd 892	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
213	143, 212	sylbida 604	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑)) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
214	213	anasss 472	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑))) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
215	122, 214	sylan2b 606	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑘 ∘r ≤ 𝑑)}) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
216	117, 215	sylan2b 606	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
217	216	oveq1d 7427	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) = ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
218	217	mpteq2dva 5198	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) = (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
219	218	oveq2d 7428	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = (𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))
220	14	psrbaglefi 22214	. . . . . . . . 9 ⊢ (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∈ Fin)
221	220	adantl 487	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∈ Fin)
222	24	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑅 ∈ Mnd)
223	32	adantr 486	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑‘𝑋) + 1) ∈ ℕ0)
224	4	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑅 ∈ Ring)
225		elrabi 3641	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
226	36	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐹:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
227	226	ffvelcdmda 7076	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝐹‘𝑢) ∈ (Base‘𝑅))
228	225, 227	sylan2 605	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝐹‘𝑢) ∈ (Base‘𝑅))
229	42	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐺:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
230	27	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑑:𝐼⟶ℕ0)
231	230	ffvelcdmda 7076	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
232	231	nn0cnd 12650	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℂ)
233	225, 123	syl 18	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑢:𝐼⟶ℕ0)
234	233	adantl 487	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑢:𝐼⟶ℕ0)
235	234	ffvelcdmda 7076	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℕ0)
236	235	nn0cnd 12650	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℂ)
237	56	nn0cni 12599	. . . . . . . . . . . . . . . . 17 ⊢ if(𝑖 = 𝑋, 1, 0) ∈ ℂ
238	237	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℂ)
239	232, 236, 238	subadd23d 11672	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (((𝑑‘𝑖) − (𝑢‘𝑖)) + if(𝑖 = 𝑋, 1, 0)) = ((𝑑‘𝑖) + (if(𝑖 = 𝑋, 1, 0) − (𝑢‘𝑖))))
240	232, 238, 236	addsubassd 11670	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖)) = ((𝑑‘𝑖) + (if(𝑖 = 𝑋, 1, 0) − (𝑢‘𝑖))))
241	239, 240	eqtr4d 2799	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (((𝑑‘𝑖) − (𝑢‘𝑖)) + if(𝑖 = 𝑋, 1, 0)) = (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖)))
242	241	mpteq2dva 5198	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑖 ∈ 𝐼 ↦ (((𝑑‘𝑖) − (𝑢‘𝑖)) + if(𝑖 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖))))
243		eqid 2761	. . . . . . . . . . . . . . . . . . 19 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}
244	14, 243	psrbagconcl 22215	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑢) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
245		elrabi 3641	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑑 ∘f − 𝑢) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → (𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
246	244, 245	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
247	246	adantll 727	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
248	14	psrbagf 22206	. . . . . . . . . . . . . . . 16 ⊢ ((𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (𝑑 ∘f − 𝑢):𝐼⟶ℕ0)
249	247, 248	syl 18	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑢):𝐼⟶ℕ0)
250	249	ffnd 6702	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑢) Fn 𝐼)
251	69	a1i 11	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
252	13	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐼 ∈ V)
253	230	ffnd 6702	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑑 Fn 𝐼)
254	234	ffnd 6702	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑢 Fn 𝐼)
255		eqidd 2762	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
256		eqidd 2762	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
257	253, 254, 252, 252, 72, 255, 256	ofval 7693	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f − 𝑢)‘𝑖) = ((𝑑‘𝑖) − (𝑢‘𝑖)))
258	78	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
259	250, 251, 252, 252, 72, 257, 258	offval 7691	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (((𝑑‘𝑖) − (𝑢‘𝑖)) + if(𝑖 = 𝑋, 1, 0))))
260		simplr 781	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
261	16	ad2antrr 739	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
262	260, 261, 18	syl2anc 596	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
263	262, 88	syl 18	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
264	263	ffnd 6702	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
265	253, 251, 252, 252, 72, 255, 258	ofval 7693	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
266	264, 254, 252, 252, 72, 265, 256	offval 7691	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) = (𝑖 ∈ 𝐼 ↦ (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖))))
267	242, 259, 266	3eqtr4d 2806	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))
268	14	psrbagaddcl 22212	. . . . . . . . . . . . 13 ⊢ (((𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
269	247, 261, 268	syl2anc 596	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
270	267, 269	eqeltrrd 2862	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
271	229, 270	ffvelcdmd 7077	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)) ∈ (Base‘𝑅))
272	1, 34, 224, 228, 271	ringcld 20464	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) ∈ (Base‘𝑅))
273	1, 22, 222, 223, 272	mulgnn0cld 19285	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
274		disjdifr 4427	. . . . . . . . 9 ⊢ (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∩ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) = ∅
275	274	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∩ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) = ∅)
276		simpl 488	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) → 𝑘 ∘r ≤ 𝑑)
277	276	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → ((𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) → 𝑘 ∘r ≤ 𝑑))
278	277	ss2rabi 4024	. . . . . . . . . . 11 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}
279	278	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
280		undifr 4439	. . . . . . . . . 10 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↔ (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∪ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
281	279, 280	sylib 221	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∪ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
282	281	eqcomd 2767	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} = (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∪ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}))
283	1, 2, 6, 221, 273, 275, 282	gsummptfidmsplit 20124	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
284		eldifi 4078	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
285	28	ad2antrr 739	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑋 ∈ 𝐼)
286		eqidd 2762	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → (𝑑‘𝑋) = (𝑑‘𝑋))
287		eqidd 2762	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → (𝑢‘𝑋) = (𝑢‘𝑋))
288	253, 254, 252, 252, 72, 286, 287	ofval 7693	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
289	285, 288	mpdan 700	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
290	284, 289	sylan2 605	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
291	290	oveq2d 7428	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑢‘𝑋) + ((𝑑 ∘f − 𝑢)‘𝑋)) = ((𝑢‘𝑋) + ((𝑑‘𝑋) − (𝑢‘𝑋))))
292	234, 285	ffvelcdmd 7077	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑢‘𝑋) ∈ ℕ0)
293	284, 292	sylan2 605	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (𝑢‘𝑋) ∈ ℕ0)
294	293	nn0cnd 12650	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (𝑢‘𝑋) ∈ ℂ)
295	30	nn0cnd 12650	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑‘𝑋) ∈ ℂ)
296	295	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (𝑑‘𝑋) ∈ ℂ)
297	294, 296	pncan3d 11653	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑢‘𝑋) + ((𝑑‘𝑋) − (𝑢‘𝑋))) = (𝑑‘𝑋))
298	291, 297	eqtrd 2796	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑢‘𝑋) + ((𝑑 ∘f − 𝑢)‘𝑋)) = (𝑑‘𝑋))
299	298	oveq1d 7427	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (((𝑢‘𝑋) + ((𝑑 ∘f − 𝑢)‘𝑋)) + 1) = ((𝑑‘𝑋) + 1))
300	249, 285	ffvelcdmd 7077	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f − 𝑢)‘𝑋) ∈ ℕ0)
301	284, 300	sylan2 605	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑑 ∘f − 𝑢)‘𝑋) ∈ ℕ0)
302	301	nn0cnd 12650	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑑 ∘f − 𝑢)‘𝑋) ∈ ℂ)
303		1cnd 11283	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → 1 ∈ ℂ)
304	294, 302, 303	addassd 11312	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (((𝑢‘𝑋) + ((𝑑 ∘f − 𝑢)‘𝑋)) + 1) = ((𝑢‘𝑋) + (((𝑑 ∘f − 𝑢)‘𝑋) + 1)))
305	299, 304	eqtr3d 2798	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑑‘𝑋) + 1) = ((𝑢‘𝑋) + (((𝑑 ∘f − 𝑢)‘𝑋) + 1)))
306	305	oveq1d 7427	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) = (((𝑢‘𝑋) + (((𝑑 ∘f − 𝑢)‘𝑋) + 1))(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
307	24	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → 𝑅 ∈ Mnd)
308		peano2nn0 12627	. . . . . . . . . . . . . . 15 ⊢ (((𝑑 ∘f − 𝑢)‘𝑋) ∈ ℕ0 → (((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℕ0)
309	300, 308	syl 18	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℕ0)
310	284, 309	sylan2 605	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℕ0)
311	284, 272	sylan2 605	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) ∈ (Base‘𝑅))
312	1, 22, 2	mulgnn0dir 19294	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ Mnd ∧ ((𝑢‘𝑋) ∈ ℕ0 ∧ (((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℕ0 ∧ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) ∈ (Base‘𝑅))) → (((𝑢‘𝑋) + (((𝑑 ∘f − 𝑢)‘𝑋) + 1))(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) = (((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))(+g‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
313	307, 293, 310, 311, 312	syl13anc 1399	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (((𝑢‘𝑋) + (((𝑑 ∘f − 𝑢)‘𝑋) + 1))(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) = (((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))(+g‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
314	306, 313	eqtrd 2796	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) = (((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))(+g‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
315	314	mpteq2dva 5198	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) = (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ (((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))(+g‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))
316	315	oveq2d 7428	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = (𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ (((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))(+g‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
317		difssd 4084	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
318	221, 317	ssfid 9244	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∈ Fin)
319	1, 22, 222, 292, 272	mulgnn0cld 19285	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
320	284, 319	sylan2 605	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
321	1, 22, 222, 309, 272	mulgnn0cld 19285	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
322	284, 321	sylan2 605	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
323		eqid 2761	. . . . . . . . . 10 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) = (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
324		eqid 2761	. . . . . . . . . 10 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) = (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
325	1, 2, 6, 318, 320, 322, 323, 324	gsummptfidmadd 20119	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ (((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))(+g‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
326	316, 325	eqtrd 2796	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
327	28	ad2antrr 739	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → 𝑋 ∈ 𝐼)
328	65	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → 𝑑 Fn 𝐼)
329		elrabi 3641	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
330	329, 124	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → 𝑢 Fn 𝐼)
331	330	adantl 487	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → 𝑢 Fn 𝐼)
332	13	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → 𝐼 ∈ V)
333		eqidd 2762	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∧ 𝑋 ∈ 𝐼) → (𝑑‘𝑋) = (𝑑‘𝑋))
334		eqidd 2762	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∧ 𝑋 ∈ 𝐼) → (𝑢‘𝑋) = (𝑢‘𝑋))
335	328, 331, 332, 332, 72, 333, 334	ofval 7693	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∧ 𝑋 ∈ 𝐼) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
336	327, 335	mpdan 700	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
337		fveq1 6876	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = 𝑢 → (𝑘‘𝑋) = (𝑢‘𝑋))
338	337	eqeq1d 2763	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑢 → ((𝑘‘𝑋) = 0 ↔ (𝑢‘𝑋) = 0))
339	119, 338	anbi12d 644	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑢 → ((𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) ↔ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0)))
340	339	elrab 3645	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↔ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0)))
341	340	simprbi 503	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))
342	341	simprd 501	. . . . . . . . . . . . . . 15 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → (𝑢‘𝑋) = 0)
343	342	adantl 487	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → (𝑢‘𝑋) = 0)
344	343	oveq2d 7428	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → ((𝑑‘𝑋) − (𝑢‘𝑋)) = ((𝑑‘𝑋) − 0))
345	30	adantr 486	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → (𝑑‘𝑋) ∈ ℕ0)
346	345	nn0cnd 12650	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → (𝑑‘𝑋) ∈ ℂ)
347	346	subid1d 11639	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → ((𝑑‘𝑋) − 0) = (𝑑‘𝑋))
348	336, 344, 347	3eqtrrd 2801	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → (𝑑‘𝑋) = ((𝑑 ∘f − 𝑢)‘𝑋))
349	348	oveq1d 7427	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → ((𝑑‘𝑋) + 1) = (((𝑑 ∘f − 𝑢)‘𝑋) + 1))
350	349	oveq1d 7427	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
351	350	mpteq2dva 5198	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) = (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
352	351	oveq2d 7428	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))
353	326, 352	oveq12d 7430	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))) = (((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
354	23	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑅 ∈ Grp)
355	106	rabex 5300	. . . . . . . . . . 11 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∈ V
356	355	difexi 5292	. . . . . . . . . 10 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∈ V
357	356	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∈ V)
358	320	fmpttd 7107	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))):({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})⟶(Base‘𝑅))
359		ovex 7445	. . . . . . . . . . . 12 ⊢ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ V
360	359, 323	fnmpti 6674	. . . . . . . . . . 11 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})
361	360	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}))
362	361, 318, 113	fndmfifsupp 9354	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) finSupp (0g‘𝑅))
363	1, 104, 6, 357, 358, 362	gsumcl 20109	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) ∈ (Base‘𝑅))
364	322	fmpttd 7107	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))):({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})⟶(Base‘𝑅))
365		ovex 7445	. . . . . . . . . . . 12 ⊢ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ V
366	365, 324	fnmpti 6674	. . . . . . . . . . 11 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})
367	366	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}))
368	367, 318, 113	fndmfifsupp 9354	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) finSupp (0g‘𝑅))
369	1, 104, 6, 357, 364, 368	gsumcl 20109	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) ∈ (Base‘𝑅))
370	106	rabex 5300	. . . . . . . . . 10 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ∈ V
371	370	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ∈ V)
372	278	sseli 3927	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
373	372, 321	sylan2 605	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
374	373	fmpttd 7107	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))):{𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}⟶(Base‘𝑅))
375		eqid 2761	. . . . . . . . . . . 12 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) = (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
376	365, 375	fnmpti 6674	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}
377	376	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})
378	221, 279	ssfid 9244	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ∈ Fin)
379	377, 378, 113	fndmfifsupp 9354	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) finSupp (0g‘𝑅))
380	1, 104, 6, 371, 374, 379	gsumcl 20109	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) ∈ (Base‘𝑅))
381	1, 2, 354, 363, 369, 380	grpassd 19136	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))))
382	283, 353, 381	3eqtrd 2800	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))))
383	219, 382	oveq12d 7430	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))))
384	103, 115, 383	3eqtr3d 2804	. . . 4 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝑑‘𝑋) + 1)(.g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))))
385		psdmul.m	. . . . . 6 ⊢ · = (.r‘𝑆)
386	8	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐹 ∈ 𝐵)
387	41	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐺 ∈ 𝐵)
388	9, 10, 34, 385, 14, 386, 387, 19	psrmulval 22232	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝐹 · 𝐺)‘(𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
389	388	oveq2d 7428	. . . 4 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹 · 𝐺)‘(𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))) = (((𝑑‘𝑋) + 1)(.g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))
390	107	difexi 5292	. . . . . . 7 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∈ V
391	390	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∈ V)
392		eldifi 4078	. . . . . . . 8 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
393	38, 123	syl 18	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → 𝑢:𝐼⟶ℕ0)
394	393	adantl 487	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑢:𝐼⟶ℕ0)
395	28	ad2antrr 739	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑋 ∈ 𝐼)
396	394, 395	ffvelcdmd 7077	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → (𝑢‘𝑋) ∈ ℕ0)
397	1, 22, 25, 396, 50	mulgnn0cld 19285	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
398	392, 397	sylan2 605	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
399	398	fmpttd 7107	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))):({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})⟶(Base‘𝑅))
400		eqid 2761	. . . . . . . . 9 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) = (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
401	359, 400	fnmpti 6674	. . . . . . . 8 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
402	401	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
403		difssd 4084	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
404	21, 403	ssfid 9244	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∈ Fin)
405	402, 404, 113	fndmfifsupp 9354	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) finSupp (0g‘𝑅))
406	1, 104, 6, 391, 399, 405	gsumcl 20109	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) ∈ (Base‘𝑅))
407	1, 2, 354, 369, 380	grpcld 19138	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))) ∈ (Base‘𝑅))
408	1, 2, 354, 406, 363, 407	grpassd 19136	. . . 4 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))))
409	384, 389, 408	3eqtr4d 2806	. . 3 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹 · 𝐺)‘(𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))) = (((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))))
410	409	mpteq2dva 5198	. 2 ⊢ (𝜑 → (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹 · 𝐺)‘(𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))) = (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ↦ (((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))))
411	9, 10, 385, 4, 8, 41	psrmulcl 22234	. . 3 ⊢ (𝜑 → (𝐹 · 𝐺) ∈ 𝐵)
412	9, 10, 14, 28, 411	psdval 22460	. 2 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘(𝐹 · 𝐺)) = (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹 · 𝐺)‘(𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))))
413		psdmul.p	. . . 4 ⊢ + = (+g‘𝑆)
414	23	grpmgmd 19152	. . . . . 6 ⊢ (𝜑 → 𝑅 ∈ Mgm)
415	9, 10, 414, 28, 8	psdcl 22462	. . . . 5 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) ∈ 𝐵)
416	9, 10, 385, 4, 415, 41	psrmulcl 22234	. . . 4 ⊢ (𝜑 → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) ∈ 𝐵)
417	9, 10, 414, 28, 41	psdcl 22462	. . . . 5 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺) ∈ 𝐵)
418	9, 10, 385, 4, 8, 417	psrmulcl 22234	. . . 4 ⊢ (𝜑 → (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)) ∈ 𝐵)
419	9, 10, 2, 413, 416, 418	psradd 22226	. . 3 ⊢ (𝜑 → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) + (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))) = (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) ∘f (+g‘𝑅)(𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))))
420	9, 1, 14, 10, 416	psrelbas 22223	. . . . 5 ⊢ (𝜑 → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
421	420	ffnd 6702	. . . 4 ⊢ (𝜑 → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) Fn {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
422	9, 1, 14, 10, 418	psrelbas 22223	. . . . 5 ⊢ (𝜑 → (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
423	422	ffnd 6702	. . . 4 ⊢ (𝜑 → (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)) Fn {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
424	106	a1i 11	. . . 4 ⊢ (𝜑 → {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∈ V)
425		inidm 4172	. . . 4 ⊢ ({ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∩ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) = {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}
426	415	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) ∈ 𝐵)
427	9, 10, 34, 385, 14, 426, 387, 7	psrmulval 22232	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺)‘𝑑) = (𝑅 Σg (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏))))))
428	355	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∈ V)
429	4	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑅 ∈ Ring)
430		elrabi 3641	. . . . . . . . 9 ⊢ (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑏 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
431	9, 1, 14, 10, 415	psrelbas 22223	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
432	431	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
433	432	ffvelcdmda 7076	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏) ∈ (Base‘𝑅))
434	430, 433	sylan2 605	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏) ∈ (Base‘𝑅))
435	42	ad2antrr 739	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐺:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
436	14, 243	psrbagconcl 22215	. . . . . . . . . . 11 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑏) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
437	436	adantll 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑏) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
438		elrabi 3641	. . . . . . . . . 10 ⊢ ((𝑑 ∘f − 𝑏) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → (𝑑 ∘f − 𝑏) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
439	437, 438	syl 18	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑏) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
440	435, 439	ffvelcdmd 7077	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝐺‘(𝑑 ∘f − 𝑏)) ∈ (Base‘𝑅))
441	1, 34, 429, 434, 440	ringcld 20464	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏))) ∈ (Base‘𝑅))
442	441	fmpttd 7107	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))):{𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}⟶(Base‘𝑅))
443		ovex 7445	. . . . . . . . 9 ⊢ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏))) ∈ V
444		eqid 2761	. . . . . . . . 9 ⊢ (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) = (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏))))
445	443, 444	fnmpti 6674	. . . . . . . 8 ⊢ (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) Fn {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}
446	445	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) Fn {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
447	446, 221, 113	fndmfifsupp 9354	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) finSupp (0g‘𝑅))
448		eqid 2761	. . . . . . 7 ⊢ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
449		df-of 7682	. . . . . . . . . 10 ⊢ ∘f + = (𝑚 ∈ V, 𝑛 ∈ V ↦ (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))))
450		vex 3455	. . . . . . . . . . 11 ⊢ 𝑢 ∈ V
451	450	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑢 ∈ V)
452		ssv 3955	. . . . . . . . . . 11 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ⊆ V
453	452	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ⊆ V)
454		ssv 3955	. . . . . . . . . . 11 ⊢ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ⊆ V
455	454	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ⊆ V)
456	449, 451, 453, 455	elimampo 7549	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↔ ∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜)))))
457	456	biimpa 482	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))))
458		elrabi 3641	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑚 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
459	14	psrbagf 22206	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑚:𝐼⟶ℕ0)
460	459	ffund 6706	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → Fun 𝑚)
461	458, 460	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → Fun 𝑚)
462	461	funfnd 6563	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑚 Fn dom 𝑚)
463	462	ad2antrl 741	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → 𝑚 Fn dom 𝑚)
464		velsn 4600	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ↔ 𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))
465		funmpt 6570	. . . . . . . . . . . . . . . 16 ⊢ Fun (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))
466		funeq 6551	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → (Fun 𝑛 ↔ Fun (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
467	465, 466	mpbiri 261	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → Fun 𝑛)
468	467	funfnd 6563	. . . . . . . . . . . . . 14 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → 𝑛 Fn dom 𝑛)
469	464, 468	sylbi 220	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} → 𝑛 Fn dom 𝑛)
470	469	ad2antll 742	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → 𝑛 Fn dom 𝑛)
471		vex 3455	. . . . . . . . . . . . . 14 ⊢ 𝑚 ∈ V
472	471	dmex 7910	. . . . . . . . . . . . 13 ⊢ dom 𝑚 ∈ V
473	472	a1i 11	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → dom 𝑚 ∈ V)
474		vex 3455	. . . . . . . . . . . . . 14 ⊢ 𝑛 ∈ V
475	474	dmex 7910	. . . . . . . . . . . . 13 ⊢ dom 𝑛 ∈ V
476	475	a1i 11	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → dom 𝑛 ∈ V)
477		eqid 2761	. . . . . . . . . . . 12 ⊢ (dom 𝑚 ∩ dom 𝑛) = (dom 𝑚 ∩ dom 𝑛)
478		eqidd 2762	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑜 ∈ dom 𝑚) → (𝑚‘𝑜) = (𝑚‘𝑜))
479		eqidd 2762	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑜 ∈ dom 𝑛) → (𝑛‘𝑜) = (𝑛‘𝑜))
480	463, 470, 473, 476, 477, 478, 479	offval 7691	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑚 ∘f + 𝑛) = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))))
481	480	eqeq2d 2772	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜)))))
482		elsni 4601	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} → 𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))
483	482	oveq2d 7428	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} → (𝑚 ∘f + 𝑛) = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
484	483	eqeq2d 2772	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} → (𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
485	484	ad2antll 742	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
486	13	ad3antrrr 743	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐼 ∈ V)
487	458, 459	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑚:𝐼⟶ℕ0)
488	487	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑚:𝐼⟶ℕ0)
489	131	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0)
490		nn0cn 12597	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑞 ∈ ℕ0 → 𝑞 ∈ ℂ)
491		nn0cn 12597	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑟 ∈ ℕ0 → 𝑟 ∈ ℂ)
492		nn0cn 12597	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑠 ∈ ℕ0 → 𝑠 ∈ ℂ)
493		addsubass 11548	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑞 ∈ ℂ ∧ 𝑟 ∈ ℂ ∧ 𝑠 ∈ ℂ) → ((𝑞 + 𝑟) − 𝑠) = (𝑞 + (𝑟 − 𝑠)))
494	490, 491, 492, 493	syl3an 1178	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑞 ∈ ℕ0 ∧ 𝑟 ∈ ℕ0 ∧ 𝑠 ∈ ℕ0) → ((𝑞 + 𝑟) − 𝑠) = (𝑞 + (𝑟 − 𝑠)))
495	494	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ (𝑞 ∈ ℕ0 ∧ 𝑟 ∈ ℕ0 ∧ 𝑠 ∈ ℕ0)) → ((𝑞 + 𝑟) − 𝑠) = (𝑞 + (𝑟 − 𝑠)))
496	486, 488, 489, 489, 495	caofass 7722	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = (𝑚 ∘f + ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
497		simpr 490	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝐼) → 𝑖 ∈ 𝐼)
498	56	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℕ0)
499	68, 76, 497, 498	fvmptd3 7009	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
500	133, 133, 13, 13, 72, 499, 499	offval 7691	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0))))
501	500	oveq2d 7428	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑚 ∘f + ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝑚 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))))
502	501	ad3antrrr 743	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝑚 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))))
503	237	subidi 11610	. . . . . . . . . . . . . . . . . . 19 ⊢ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)) = 0
504	503	mpteq2i 5201	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ 0)
505		fconstmpt 5713	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐼 × {0}) = (𝑖 ∈ 𝐼 ↦ 0)
506	504, 505	eqtr4i 2787	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0))) = (𝐼 × {0})
507	506	oveq2i 7423	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))) = (𝑚 ∘f + (𝐼 × {0}))
508		0zd 12686	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 0 ∈ ℤ)
509	490	addridd 11491	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑞 ∈ ℕ0 → (𝑞 + 0) = 𝑞)
510	509	adantl 487	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑞 ∈ ℕ0) → (𝑞 + 0) = 𝑞)
511	486, 488, 508, 510	caofid0r 7716	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝐼 × {0})) = 𝑚)
512	507, 511	eqtrid 2808	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))) = 𝑚)
513	496, 502, 512	3eqtrd 2800	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = 𝑚)
514		simpr 490	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
515	513, 514	eqeltrd 2861	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
516		oveq1 7419	. . . . . . . . . . . . . 14 ⊢ (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
517	516	eleq1d 2846	. . . . . . . . . . . . 13 ⊢ (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↔ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
518	515, 517	syl5ibrcom 250	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
519	518	adantrr 730	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
520	485, 519	sylbid 243	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + 𝑛) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
521	481, 520	sylbird 263	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
522	521	rexlimdvva 3220	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
523	457, 522	mpd 16	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
524		simpr 490	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
525	13	mptexd 7222	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ V)
526		elsng 4598	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ V → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ↔ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
527	525, 526	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ↔ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
528	68, 527	mpbiri 261	. . . . . . . . 9 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})
529	528	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})
530	449	mpofun 7536	. . . . . . . . 9 ⊢ Fun ∘f +
531	530	a1i 11	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → Fun ∘f + )
532		xpss 5667	. . . . . . . . 9 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ⊆ (V × V)
533	472	inex1 5277	. . . . . . . . . . . 12 ⊢ (dom 𝑚 ∩ dom 𝑛) ∈ V
534	533	mptex 7221	. . . . . . . . . . 11 ⊢ (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ∈ V
535	534	rgen2w 3082	. . . . . . . . . 10 ⊢ ∀𝑚 ∈ V ∀𝑛 ∈ V (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ∈ V
536	449	dmmpoga 8075	. . . . . . . . . 10 ⊢ (∀𝑚 ∈ V ∀𝑛 ∈ V (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ∈ V → dom ∘f + = (V × V))
537	535, 536	mp1i 14	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → dom ∘f + = (V × V))
538	532, 537	sseqtrrid 3974	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ⊆ dom ∘f + )
539	524, 529, 531, 538	elovimad 7462	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})))
540	13	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝐼 ∈ V)
541		elrabi 3641	. . . . . . . . . . . . 13 ⊢ (𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑣 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
542	14	psrbagf 22206	. . . . . . . . . . . . 13 ⊢ (𝑣 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑣:𝐼⟶ℕ0)
543	541, 542	syl 18	. . . . . . . . . . . 12 ⊢ (𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑣:𝐼⟶ℕ0)
544	543	ad2antll 742	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝑣:𝐼⟶ℕ0)
545	131	a1i 11	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0)
546	494	adantl 487	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ (𝑞 ∈ ℕ0 ∧ 𝑟 ∈ ℕ0 ∧ 𝑠 ∈ ℕ0)) → ((𝑞 + 𝑟) − 𝑠) = (𝑞 + (𝑟 − 𝑠)))
547	540, 544, 545, 545, 546	caofass 7722	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → ((𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = (𝑣 ∘f + ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
548	133	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
549	78	adantl 487	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
550	548, 548, 540, 540, 72, 549, 549	offval 7691	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0))))
551	550	oveq2d 7428	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑣 ∘f + ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝑣 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))))
552	506	oveq2i 7423	. . . . . . . . . . 11 ⊢ (𝑣 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))) = (𝑣 ∘f + (𝐼 × {0}))
553		0zd 12686	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 0 ∈ ℤ)
554		nn0cn 12597	. . . . . . . . . . . . . 14 ⊢ (𝑝 ∈ ℕ0 → 𝑝 ∈ ℂ)
555	554	addridd 11491	. . . . . . . . . . . . 13 ⊢ (𝑝 ∈ ℕ0 → (𝑝 + 0) = 𝑝)
556	555	adantl 487	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑝 ∈ ℕ0) → (𝑝 + 0) = 𝑝)
557	540, 544, 553, 556	caofid0r 7716	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑣 ∘f + (𝐼 × {0})) = 𝑣)
558	552, 557	eqtrid 2808	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑣 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))) = 𝑣)
559	547, 551, 558	3eqtrrd 2801	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝑣 = ((𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
560		oveq1 7419	. . . . . . . . . 10 ⊢ (𝑢 = (𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = ((𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
561	560	eqeq2d 2772	. . . . . . . . 9 ⊢ (𝑢 = (𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑣 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ 𝑣 = ((𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
562	559, 561	syl5ibrcom 250	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑢 = (𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → 𝑣 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
563	16	ad3antrrr 743	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
564	14	psrbagaddcl 22212	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑚 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
565	458, 563, 564	syl2an2 699	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
566	14	psrbagf 22206	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
567	565, 566	syl 18	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
568	567	adantrr 730	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
569		feq1 6679	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢:𝐼⟶ℕ0 ↔ (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0))
570	568, 569	syl5ibrcom 250	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → 𝑢:𝐼⟶ℕ0))
571	485, 570	sylbid 243	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + 𝑛) → 𝑢:𝐼⟶ℕ0))
572	481, 571	sylbird 263	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) → 𝑢:𝐼⟶ℕ0))
573	572	rexlimdvva 3220	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) → 𝑢:𝐼⟶ℕ0))
574	457, 573	mpd 16	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢:𝐼⟶ℕ0)
575	574	adantrr 730	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝑢:𝐼⟶ℕ0)
576	575	ffvelcdmda 7076	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℕ0)
577	576	nn0cnd 12650	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℂ)
578	237	a1i 11	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℂ)
579	577, 578	npcand 11654	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑖 ∈ 𝐼) → (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0)) = (𝑢‘𝑖))
580	579	mpteq2dva 5198	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑖 ∈ 𝐼 ↦ (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (𝑢‘𝑖)))
581	575	ffnd 6702	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝑢 Fn 𝐼)
582	581, 548, 540, 540, 72	offn 7695	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
583		eqidd 2762	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
584	581, 548, 540, 540, 72, 583, 549	ofval 7693	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑖 ∈ 𝐼) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)))
585	582, 548, 540, 540, 72, 584, 549	offval 7691	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0))))
586	575	feqmptd 6945	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝑢 = (𝑖 ∈ 𝐼 ↦ (𝑢‘𝑖)))
587	580, 585, 586	3eqtr4rd 2807	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝑢 = ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
588		oveq1 7419	. . . . . . . . . 10 ⊢ (𝑣 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
589	588	eqeq2d 2772	. . . . . . . . 9 ⊢ (𝑣 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 = (𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ 𝑢 = ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
590	587, 589	syl5ibrcom 250	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑣 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → 𝑢 = (𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
591	562, 590	impbid 215	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑢 = (𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ 𝑣 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
592	448, 523, 539, 591	f1o2d 7667	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))):( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))–1-1-onto→{𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
593	1, 104, 6, 428, 442, 447, 592	gsumf1o 20110	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏))))) = (𝑅 Σg ((𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) ∘ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))))
594	555	adantl 487	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑝 ∈ ℕ0) → (𝑝 + 0) = 𝑝)
595	486, 488, 508, 594	caofid0r 7716	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝐼 × {0})) = 𝑚)
596	507, 595	eqtrid 2808	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))) = 𝑚)
597	496, 502, 596	3eqtrd 2800	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = 𝑚)
598	597, 514	eqeltrd 2861	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
599	598, 517	syl5ibrcom 250	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
600	599	adantrr 730	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
601	485, 600	sylbid 243	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + 𝑛) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
602	481, 601	sylbird 263	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
603	602	rexlimdvva 3220	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}))
604	457, 603	mpd 16	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
605		eqidd 2762	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
606		eqidd 2762	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) = (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))))
607		fveq2 6877	. . . . . . . . . 10 ⊢ (𝑏 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏) = ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
608		oveq2 7420	. . . . . . . . . . 11 ⊢ (𝑏 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑑 ∘f − 𝑏) = (𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
609	608	fveq2d 6881	. . . . . . . . . 10 ⊢ (𝑏 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝐺‘(𝑑 ∘f − 𝑏)) = (𝐺‘(𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))))
610	607, 609	oveq12d 7430	. . . . . . . . 9 ⊢ (𝑏 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏))) = (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))(.r‘𝑅)(𝐺‘(𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))))
611	604, 605, 606, 610	fmptco 7122	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) ∘ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))) = (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))(.r‘𝑅)(𝐺‘(𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))))))
612	28	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑋 ∈ 𝐼)
613	8	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝐹 ∈ 𝐵)
614		elrabi 3641	. . . . . . . . . . . . . 14 ⊢ ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
615	604, 614	syl 18	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
616	9, 10, 14, 612, 613, 615	psdcoef 22461	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = ((((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) + 1)(.g‘𝑅)(𝐹‘((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))))
617		nn0sscn 12592	. . . . . . . . . . . . . . . . 17 ⊢ ℕ0 ⊆ ℂ
618	617	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ℕ0 ⊆ ℂ)
619	574, 618	fssd 6719	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢:𝐼⟶ℂ)
620	619, 612	ffvelcdmd 7077	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢‘𝑋) ∈ ℂ)
621		1cnd 11283	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 1 ∈ ℂ)
622	574	ffnd 6702	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢 Fn 𝐼)
623	131	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0)
624	623	ffnd 6702	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
625	13	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝐼 ∈ V)
626		eqidd 2762	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑋 ∈ 𝐼) → (𝑢‘𝑋) = (𝑢‘𝑋))
627		iftrue 4488	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 𝑋 → if(𝑦 = 𝑋, 1, 0) = 1)
628		1ex 11284	. . . . . . . . . . . . . . . . . 18 ⊢ 1 ∈ V
629	627, 68, 628	fvmpt 6985	. . . . . . . . . . . . . . . . 17 ⊢ (𝑋 ∈ 𝐼 → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑋) = 1)
630	629	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑋 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑋) = 1)
631	622, 624, 625, 625, 72, 626, 630	ofval 7693	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑋 ∈ 𝐼) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = ((𝑢‘𝑋) − 1))
632	612, 631	mpdan 700	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = ((𝑢‘𝑋) − 1))
633	620, 621, 632	mvrrsubd 11710	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) + 1) = (𝑢‘𝑋))
634	622, 624, 625, 625, 72	offn 7695	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
635		eqidd 2762	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
636	78	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
637	622, 624, 625, 625, 72, 635, 636	ofval 7693	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)))
638	574	ffvelcdmda 7076	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℕ0)
639	638	nn0cnd 12650	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℂ)
640	237	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℂ)
641	639, 640	npcand 11654	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0)) = (𝑢‘𝑖))
642	625, 634, 624, 622, 637, 636, 641	offveq 7708	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = 𝑢)
643	642	fveq2d 6881	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝐹‘((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝐹‘𝑢))
644	633, 643	oveq12d 7430	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) + 1)(.g‘𝑅)(𝐹‘((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))) = ((𝑢‘𝑋)(.g‘𝑅)(𝐹‘𝑢)))
645	616, 644	eqtrd 2796	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = ((𝑢‘𝑋)(.g‘𝑅)(𝐹‘𝑢)))
646	26	ad2antlr 740	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑑:𝐼⟶ℕ0)
647	646	ffvelcdmda 7076	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
648	647	nn0cnd 12650	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℂ)
649	648, 639, 640	subsub3d 11680	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → ((𝑑‘𝑖) − ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0))) = (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖)))
650	649	mpteq2dva 5198	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑖 ∈ 𝐼 ↦ ((𝑑‘𝑖) − ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)))) = (𝑖 ∈ 𝐼 ↦ (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖))))
651	65	adantr 486	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑑 Fn 𝐼)
652		eqidd 2762	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
653	651, 634, 625, 625, 72, 652, 637	offval 7691	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝑖 ∈ 𝐼 ↦ ((𝑑‘𝑖) − ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)))))
654	651, 624, 625, 625, 72	offn 7695	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
655	651, 624, 625, 625, 72, 652, 636	ofval 7693	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
656	654, 622, 625, 625, 72, 655, 635	offval 7691	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) = (𝑖 ∈ 𝐼 ↦ (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖))))
657	650, 653, 656	3eqtr4d 2806	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))
658	657	fveq2d 6881	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝐺‘(𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))) = (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))
659	645, 658	oveq12d 7430	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))(.r‘𝑅)(𝐺‘(𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))) = (((𝑢‘𝑋)(.g‘𝑅)(𝐹‘𝑢))(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))
660	4	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑅 ∈ Ring)
661	574, 612	ffvelcdmd 7077	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢‘𝑋) ∈ ℕ0)
662	661	nn0zd 12699	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢‘𝑋) ∈ ℤ)
663	36	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝐹:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
664		simpllr 788	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
665	16	ad3antrrr 743	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
666		simprl 783	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
667		eqid 2761	. . . . . . . . . . . . . . . . . . . 20 ⊢ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} = {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}
668	14, 243, 667	psrbagleadd1 22216	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
669	664, 665, 666, 668	syl3anc 1398	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
670		eleq1 2849	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↔ (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}))
671	669, 670	syl5ibrcom 250	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → 𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}))
672	485, 671	sylbid 243	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑚 ∘f + 𝑛) → 𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}))
673	481, 672	sylbird 263	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → (𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) → 𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}))
674	673	rexlimdvva 3220	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) → 𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}))
675	457, 674	mpd 16	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
676		elrabi 3641	. . . . . . . . . . . . 13 ⊢ (𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
677	675, 676	syl 18	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
678	663, 677	ffvelcdmd 7077	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝐹‘𝑢) ∈ (Base‘𝑅))
679	42	ad2antrr 739	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝐺:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
680	19	adantr 486	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
681	14, 667	psrbagconcl 22215	. . . . . . . . . . . . . 14 ⊢ (((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
682	680, 675, 681	syl2anc 596	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
683		elrabi 3641	. . . . . . . . . . . . 13 ⊢ (((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
684	682, 683	syl 18	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
685	679, 684	ffvelcdmd 7077	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)) ∈ (Base‘𝑅))
686	1, 22, 34	mulgass2 20520	. . . . . . . . . . 11 ⊢ ((𝑅 ∈ Ring ∧ ((𝑢‘𝑋) ∈ ℤ ∧ (𝐹‘𝑢) ∈ (Base‘𝑅) ∧ (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)) ∈ (Base‘𝑅))) → (((𝑢‘𝑋)(.g‘𝑅)(𝐹‘𝑢))(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) = ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
687	660, 662, 678, 685, 686	syl13anc 1399	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (((𝑢‘𝑋)(.g‘𝑅)(𝐹‘𝑢))(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) = ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
688	659, 687	eqtrd 2796	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))(.r‘𝑅)(𝐺‘(𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))) = ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
689	688	mpteq2dva 5198	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))(.r‘𝑅)(𝐺‘(𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))))) = (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
690	611, 689	eqtrd 2796	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) ∘ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))) = (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
691	690	oveq2d 7428	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg ((𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) ∘ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))) = (𝑅 Σg (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))
692		snex 5397	. . . . . . . . . 10 ⊢ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ∈ V
693	355, 692	xpex 7756	. . . . . . . . 9 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ∈ V
694	693	funimaex 6619	. . . . . . . 8 ⊢ (Fun ∘f + → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∈ V)
695	530, 694	mp1i 14	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∈ V)
696	24	ad2antrr 739	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑅 ∈ Mnd)
697	1, 34, 660, 678, 685	ringcld 20464	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) ∈ (Base‘𝑅))
698	1, 22, 696, 661, 697	mulgnn0cld 19285	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
699		eqid 2761	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) = (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
700	359, 699	fnmpti 6674	. . . . . . . . . 10 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}
701	700	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) Fn {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
702	701, 21, 113	fndmfifsupp 9354	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) finSupp (0g‘𝑅))
703	462	ad2antlr 740	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → 𝑚 Fn dom 𝑚)
704	469	adantl 487	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → 𝑛 Fn dom 𝑛)
705	472	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → dom 𝑚 ∈ V)
706	475	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → dom 𝑛 ∈ V)
707		eqidd 2762	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ∧ 𝑜 ∈ dom 𝑚) → (𝑚‘𝑜) = (𝑚‘𝑜))
708		eqidd 2762	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ∧ 𝑜 ∈ dom 𝑛) → (𝑛‘𝑜) = (𝑛‘𝑜))
709	703, 704, 705, 706, 477, 707, 708	offval 7691	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → (𝑚 ∘f + 𝑛) = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))))
710	709	eqeq2d 2772	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → (𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜)))))
711	710	rexbidva 3185	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑚 ∘f + 𝑛) ↔ ∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜)))))
712	16	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
713		oveq2 7420	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → (𝑚 ∘f + 𝑛) = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
714	713	eqeq2d 2772	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → (𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
715	714	rexsng 4637	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
716	712, 715	syl 18	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
717	711, 716	bitr3d 284	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
718	717	rexbidva 3185	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ↔ ∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
719		breq1 5106	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
720		breq1 5106	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑘 ∘r ≤ 𝑑 ↔ (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑))
721		fveq1 6876	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑘‘𝑋) = ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋))
722	721	eqeq1d 2763	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → ((𝑘‘𝑋) = 0 ↔ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0))
723	720, 722	anbi12d 644	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → ((𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) ↔ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ∧ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0)))
724	723	notbid 321	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) ↔ ¬ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ∧ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0)))
725	719, 724	anbi12d 644	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → ((𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)) ↔ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ∧ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0))))
726	458, 712, 564	syl2an2 699	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
727		simplr 781	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
728		simpr 490	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
729	14, 243, 44	psrbagleadd1 22216	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
730	727, 712, 728, 729	syl3anc 1398	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
731	719	elrab 3645	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↔ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
732	731	simprbi 503	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
733	730, 732	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
734	28	ad2antrr 739	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑋 ∈ 𝐼)
735	487	adantl 487	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑚:𝐼⟶ℕ0)
736	735	ffnd 6702	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑚 Fn 𝐼)
737	133	ad2antrr 739	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
738	13	ad2antrr 739	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐼 ∈ V)
739		eqidd 2762	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → (𝑚‘𝑋) = (𝑚‘𝑋))
740	629	adantl 487	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑋) = 1)
741	736, 737, 738, 738, 72, 739, 740	ofval 7693	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = ((𝑚‘𝑋) + 1))
742	734, 741	mpdan 700	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = ((𝑚‘𝑋) + 1))
743	735, 734	ffvelcdmd 7077	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚‘𝑋) ∈ ℕ0)
744		nn0p1nn 12626	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑚‘𝑋) ∈ ℕ0 → ((𝑚‘𝑋) + 1) ∈ ℕ)
745	743, 744	syl 18	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚‘𝑋) + 1) ∈ ℕ)
746	742, 745	eqeltrd 2861	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) ∈ ℕ)
747	746	nnne0d 12369	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) ≠ 0)
748	747	neneqd 2961	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ¬ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0)
749	748	intnand 494	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ¬ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ∧ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0))
750	733, 749	jca 521	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ∧ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0)))
751	725, 726, 750	elrabd 3647	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))})
752		eleq1 2849	. . . . . . . . . . . . . 14 ⊢ (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} ↔ (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}))
753	751, 752	syl5ibrcom 250	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}))
754		breq1 5106	. . . . . . . . . . . . . 14 ⊢ (𝑘 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑘 ∘r ≤ 𝑑 ↔ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑))
755		elrabi 3641	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
756	755	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
757	131	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0)
758	755, 123	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → 𝑢:𝐼⟶ℕ0)
759	758	adantl 487	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢:𝐼⟶ℕ0)
760	28	ad2antrr 739	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑋 ∈ 𝐼)
761	759, 760	ffvelcdmd 7077	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢‘𝑋) ∈ ℕ0)
762	339	notbid 321	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41 ⊢ (𝑘 = 𝑢 → (¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) ↔ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0)))
763	118, 762	anbi12d 644	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 ⊢ (𝑘 = 𝑢 → ((𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)) ↔ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))))
764	763	elrab 3645	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} ↔ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))))
765	764	simprbi 503	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0)))
766	765	simpld 500	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → 𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
767	766	adantl 487	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
768	767	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
769	755, 124	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → 𝑢 Fn 𝐼)
770	769	adantl 487	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 Fn 𝐼)
771	770	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑢 Fn 𝐼)
772	19	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
773	88	ffnd 6702	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
774	772, 773	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
775	774	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
776	13	ad3antrrr 743	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝐼 ∈ V)
777		eqidd 2762	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
778		eqidd 2762	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖))
779	771, 775, 776, 776, 72, 777, 778	ofrfval 7692	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖)))
780	768, 779	mpbid 235	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖))
781	780	r19.21bi 3255	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ≤ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖))
782	781	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → (𝑢‘𝑖) ≤ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖))
783	65	ad3antrrr 743	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) → 𝑑 Fn 𝐼)
784	69	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
785	13	ad4antr 745	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) → 𝐼 ∈ V)
786		eqidd 2762	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
787	78	adantl 487	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
788	783, 784, 785, 785, 72, 786, 787	ofval 7693	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
789	788	an32s 665	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
790	158	adantl 487	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → if(𝑖 = 𝑋, 1, 0) = 0)
791	790	oveq2d 7428	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) = ((𝑑‘𝑖) + 0))
792	27	ad2antrr 739	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑑:𝐼⟶ℕ0)
793	792	ffvelcdmda 7076	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
794	793	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → (𝑑‘𝑖) ∈ ℕ0)
795	794	nn0cnd 12650	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → (𝑑‘𝑖) ∈ ℂ)
796	795	addridd 11491	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑑‘𝑖) + 0) = (𝑑‘𝑖))
797	789, 791, 796	3eqtrd 2800	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = (𝑑‘𝑖))
798	782, 797	breqtrd 5131	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → (𝑢‘𝑖) ≤ (𝑑‘𝑖))
799		simpr 490	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑢‘𝑋) = 0)
800	27	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑑:𝐼⟶ℕ0)
801	800, 760	ffvelcdmd 7077	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑑‘𝑋) ∈ ℕ0)
802	801	nn0ge0d 12651	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 0 ≤ (𝑑‘𝑋))
803	802	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 0 ≤ (𝑑‘𝑋))
804	799, 803	eqbrtrd 5127	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑢‘𝑋) ≤ (𝑑‘𝑋))
805	804	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑋) ≤ (𝑑‘𝑋))
806	175, 798, 805	pm2.61ne 3041	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ≤ (𝑑‘𝑖))
807	806	ralrimiva 3155	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖))
808	65	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑑 Fn 𝐼)
809	808	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑑 Fn 𝐼)
810		eqidd 2762	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
811	771, 809, 776, 776, 72, 777, 810	ofrfval 7692	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑢 ∘r ≤ 𝑑 ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
812	807, 811	mpbird 260	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑢 ∘r ≤ 𝑑)
813	812	ex 418	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑢‘𝑋) = 0 → 𝑢 ∘r ≤ 𝑑))
814	765	simprd 501	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))
815	814	adantl 487	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))
816		imnan 405	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝑢 ∘r ≤ 𝑑 → ¬ (𝑢‘𝑋) = 0) ↔ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))
817	815, 816	sylibr 237	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘r ≤ 𝑑 → ¬ (𝑢‘𝑋) = 0))
818	817	con2d 135	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑢‘𝑋) = 0 → ¬ 𝑢 ∘r ≤ 𝑑))
819	813, 818	pm2.65d 199	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ¬ (𝑢‘𝑋) = 0)
820	819	neqned 2963	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢‘𝑋) ≠ 0)
821	761, 820, 191	sylanbrc 595	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢‘𝑋) ∈ ℕ)
822	821	nnge1d 12367	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 1 ≤ (𝑢‘𝑋))
823	822	adantr 486	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → 1 ≤ (𝑢‘𝑋))
824	173	breq2d 5115	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 = 𝑋 → (1 ≤ (𝑢‘𝑖) ↔ 1 ≤ (𝑢‘𝑋)))
825	823, 824	syl5ibrcom 250	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑖 = 𝑋 → 1 ≤ (𝑢‘𝑖)))
826	825	imp 412	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 = 𝑋) → 1 ≤ (𝑢‘𝑖))
827	759	ffvelcdmda 7076	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℕ0)
828	827	nn0ge0d 12651	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → 0 ≤ (𝑢‘𝑖))
829	828	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 = 𝑋) → 0 ≤ (𝑢‘𝑖))
830	826, 829	ifpimpda 1097	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → if-(𝑖 = 𝑋, 1 ≤ (𝑢‘𝑖), 0 ≤ (𝑢‘𝑖)))
831		brif1 7509	. . . . . . . . . . . . . . . . . . 19 ⊢ (if(𝑖 = 𝑋, 1, 0) ≤ (𝑢‘𝑖) ↔ if-(𝑖 = 𝑋, 1 ≤ (𝑢‘𝑖), 0 ≤ (𝑢‘𝑖)))
832	830, 831	sylibr 237	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ≤ (𝑢‘𝑖))
833	832	ralrimiva 3155	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ∀𝑖 ∈ 𝐼 if(𝑖 = 𝑋, 1, 0) ≤ (𝑢‘𝑖))
834	69	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
835	13	ad2antrr 739	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝐼 ∈ V)
836	78	adantl 487	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
837		eqidd 2762	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
838	834, 770, 835, 835, 72, 836, 837	ofrfval 7692	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘r ≤ 𝑢 ↔ ∀𝑖 ∈ 𝐼 if(𝑖 = 𝑋, 1, 0) ≤ (𝑢‘𝑖)))
839	833, 838	mpbird 260	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘r ≤ 𝑢)
840	14	psrbagcon 22213	. . . . . . . . . . . . . . . 16 ⊢ ((𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0 ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘r ≤ 𝑢) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑢))
841	756, 757, 839, 840	syl3anc 1398	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑢))
842	841	simpld 500	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
843		eqidd 2762	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
844	808, 834, 835, 835, 72, 843, 836	ofval 7693	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
845	770, 774, 835, 835, 72, 837, 844	ofrfval 7692	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
846	767, 845	mpbid 235	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
847	846	r19.21bi 3255	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
848	827	nn0red 12649	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℝ)
849	60	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℝ)
850	800	ffvelcdmda 7076	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
851	850	nn0red 12649	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℝ)
852	848, 849, 851	lesubaddd 11894	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) ≤ (𝑑‘𝑖) ↔ (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
853	847, 852	mpbird 260	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) ≤ (𝑑‘𝑖))
854	853	ralrimiva 3155	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ∀𝑖 ∈ 𝐼 ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) ≤ (𝑑‘𝑖))
855	770, 834, 835, 835, 72	offn 7695	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
856	770, 834, 835, 835, 72, 837, 836	ofval 7693	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)))
857	855, 808, 835, 835, 72, 856, 843	ofrfval 7692	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ↔ ∀𝑖 ∈ 𝐼 ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) ≤ (𝑑‘𝑖)))
858	854, 857	mpbird 260	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑)
859	754, 842, 858	elrabd 3647	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
860	827	nn0cnd 12650	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℂ)
861	237	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℂ)
862	860, 861	npcand 11654	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0)) = (𝑢‘𝑖))
863	862	mpteq2dva 5198	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑖 ∈ 𝐼 ↦ (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (𝑢‘𝑖)))
864	855, 834, 835, 835, 72, 856, 836	offval 7691	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0))))
865	759	feqmptd 6945	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 = (𝑖 ∈ 𝐼 ↦ (𝑢‘𝑖)))
866	863, 864, 865	3eqtr4rd 2807	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 = ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
867		oveq1 7419	. . . . . . . . . . . . . 14 ⊢ (𝑚 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
868	867	eqeq2d 2772	. . . . . . . . . . . . 13 ⊢ (𝑚 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ 𝑢 = ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
869	753, 859, 866, 868	rspceb2dv 3581	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}))
870	456, 718, 869	3bitrd 308	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↔ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}))
871	870	eqrdv 2759	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))})
872		difrab 4264	. . . . . . . . . 10 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}
873	871, 872	eqtr4di 2814	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) = ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}))
874		difssd 4084	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
875	873, 874	eqsstrd 3965	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
876	702, 875, 113	fmptssfisupp 9370	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) finSupp (0g‘𝑅))
877		difss 4083	. . . . . . . . . 10 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}
878		disjdif 4426	. . . . . . . . . 10 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∩ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) = ∅
879		ssdisj 4413	. . . . . . . . . 10 ⊢ ((({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∩ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) = ∅) → (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∩ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) = ∅)
880	877, 878, 879	mp2an 705	. . . . . . . . 9 ⊢ (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∩ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) = ∅
881	880	ineqcomi 4157	. . . . . . . 8 ⊢ (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∩ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) = ∅
882	881	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∩ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) = ∅)
883	279, 99	psdmullem 22466	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∪ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) = ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}))
884	873, 883	eqtr4d 2799	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) = (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∪ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})))
885	1, 104, 2, 6, 695, 698, 876, 882, 884	gsumsplit2 20123	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
886	691, 885	eqtrd 2796	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg ((𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))) ∘ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
887	427, 593, 886	3eqtrd 2800	. . . 4 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺)‘𝑑) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
888	417	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺) ∈ 𝐵)
889	9, 10, 34, 385, 14, 386, 888, 7	psrmulval 22232	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))‘𝑑) = (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ ((𝐹‘𝑢)(.r‘𝑅)((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢))))))
890	41	ad2antrr 739	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐺 ∈ 𝐵)
891	9, 10, 14, 285, 890, 247	psdcoef 22461	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢)) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))))
892	267	fveq2d 6881	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝐺‘((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))
893	892	oveq2d 7428	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))
894	891, 893	eqtrd 2796	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢)) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))
895	894	oveq2d 7428	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝐹‘𝑢)(.r‘𝑅)((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢))) = ((𝐹‘𝑢)(.r‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
896	309	nn0zd 12699	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℤ)
897	1, 22, 34	mulgass3 20563	. . . . . . . . 9 ⊢ ((𝑅 ∈ Ring ∧ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℤ ∧ (𝐹‘𝑢) ∈ (Base‘𝑅) ∧ (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)) ∈ (Base‘𝑅))) → ((𝐹‘𝑢)(.r‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
898	224, 896, 228, 271, 897	syl13anc 1399	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝐹‘𝑢)(.r‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
899	895, 898	eqtrd 2796	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝐹‘𝑢)(.r‘𝑅)((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢))) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
900	899	mpteq2dva 5198	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ ((𝐹‘𝑢)(.r‘𝑅)((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢)))) = (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
901	900	oveq2d 7428	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ ((𝐹‘𝑢)(.r‘𝑅)((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢))))) = (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))
902	1, 2, 6, 221, 321, 275, 282	gsummptfidmsplit 20124	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
903	889, 901, 902	3eqtrd 2800	. . . 4 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))‘𝑑) = ((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))
904	421, 423, 424, 424, 425, 887, 903	offval 7691	. . 3 ⊢ (𝜑 → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) ∘f (+g‘𝑅)(𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))) = (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ↦ (((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))))
905	419, 904	eqtrd 2796	. 2 ⊢ (𝜑 → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) + (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))) = (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ↦ (((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))))(+g‘𝑅)((𝑅 Σg (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))(+g‘𝑅)(𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))))))
906	410, 412, 905	3eqtr4d 2806	1 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘(𝐹 · 𝐺)) = (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) + (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861  if-wif 1078   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145   ≠ wne 2956  ∀wral 3077  ∃wrex 3087  {crab 3413  Vcvv 3451   ∖ cdif 3896   ∪ cun 3897   ∩ cin 3898   ⊆ wss 3899  ∅c0 4279  ifcif 4482  {csn 4584   class class class wbr 5103   ↦ cmpt 5186   × cxp 5649  ^◡ccnv 5650  dom cdm 5651   “ cima 5654   ∘ ccom 5655  Fun wfun 6525   Fn wfn 6526  ⟶wf 6527  ‘cfv 6531  (class class class)co 7412   ∘_f cof 7680   ∘_r cofr 7681   ↑_m cmap 8831  Fincfn 8957  ℂcc 11179  ℝcr 11180  0cc0 11181  1c1 11182   + caddc 11184   < clt 11324   ≤ cle 11325   − cmin 11522  ℕcn 12316  ℕ₀cn0 12587  ℤcz 12674  ..^cfzo 13768  Basecbs 17367  +_gcplusg 17408  ._rcmulr 17409  0_gc0g 17590   Σ_g cgsu 17591  Mndcmnd 18903  Grpcgrp 19124  ._gcmg 19257  CMndccmn 19974  Ringcrg 20439  CRingccrg 20440   mPwSer cmps 22192   mPSDer cpsd 22435

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7740  ax-cnex 11237  ax-resscn 11238  ax-1cn 11239  ax-icn 11240  ax-addcl 11241  ax-addrcl 11242  ax-mulcl 11243  ax-mulrcl 11244  ax-mulcom 11245  ax-addass 11246  ax-mulass 11247  ax-distr 11248  ax-i2m1 11249  ax-1ne0 11250  ax-1rid 11251  ax-rnegex 11252  ax-rrecex 11253  ax-cnre 11254  ax-pre-lttri 11255  ax-pre-lttrn 11256  ax-pre-ltadd 11257  ax-pre-mulgt0 11258

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-ifp 1079  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-iin 4954  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6297  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6487  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 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-of 7682  df-ofr 7683  df-om 7867  df-1st 7990  df-2nd 7991  df-supp 8162  df-tpos 8227  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8460  df-2o 8461  df-er 8701  df-map 8833  df-pm 8834  df-ixp 8910  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-fsupp 9338  df-oi 9488  df-card 10001  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11524  df-neg 11525  df-nn 12317  df-2 12386  df-3 12387  df-4 12388  df-5 12389  df-6 12390  df-7 12391  df-8 12392  df-9 12393  df-n0 12588  df-z 12675  df-uz 12947  df-fz 13621  df-fzo 13769  df-seq 14125  df-hash 14455  df-struct 17305  df-sets 17322  df-slot 17340  df-ndx 17352  df-base 17368  df-ress 17389  df-plusg 17421  df-mulr 17422  df-sca 17424  df-vsca 17425  df-tset 17427  df-0g 17592  df-gsum 17593  df-mre 17736  df-mrc 17737  df-acs 17739  df-mgm 18796  df-sgrp 18888  df-mnd 18904  df-mhm 18958  df-submnd 18959  df-grp 19127  df-minusg 19128  df-mulg 19258  df-ghm 19408  df-cntz 19511  df-cmn 19976  df-abl 19977  df-mgp 20341  df-rng 20355  df-ur 20388  df-ring 20441  df-cring 20442  df-oppr 20547  df-psr 22197  df-psd 22457

This theorem is used by:  psd1  22468  psdpw  22471