Theorem psdmul 22211

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 20275	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ Ring)
5	4	ringcmnd 20313	. . . . . . 7 ⊢ (𝜑 → 𝑅 ∈ CMnd)
6	5	adantr 484	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑅 ∈ CMnd)
7		simpr 488	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
8		psdmul.f	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐹 ∈ 𝐵)
9		psdmul.s	. . . . . . . . . . . 12 ⊢ 𝑆 = (𝐼 mPwSer 𝑅)
10		psdmul.b	. . . . . . . . . . . 12 ⊢ 𝐵 = (Base‘𝑆)
11		reldmpsr 21946	. . . . . . . . . . . 12 ⊢ Rel dom mPwSer
12	9, 10, 11	strov2rcl 17236	. . . . . . . . . . 11 ⊢ (𝐹 ∈ 𝐵 → 𝐼 ∈ V)
13	8, 12	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝐼 ∈ V)
14		eqid 2761	. . . . . . . . . . 11 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} = {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}
15	14	psrbagsn 22096	. . . . . . . . . 10 ⊢ (𝐼 ∈ V → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
16	13, 15	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
17	16	adantr 484	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
18	14	psrbagaddcl 21956	. . . . . . . 8 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
19	7, 17, 18	syl2anc 593	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
20	14	psrbaglefi 21958	. . . . . . 7 ⊢ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∈ Fin)
21	19, 20	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∈ Fin)
22		eqid 2761	. . . . . . 7 ⊢ (.g‘𝑅) = (.g‘𝑅)
23	3	crnggrpd 20276	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ∈ Grp)
24	23	grpmndd 18971	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ Mnd)
25	24	ad2antrr 736	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑅 ∈ Mnd)
26	14	psrbagf 21950	. . . . . . . . . . 11 ⊢ (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑑:𝐼⟶ℕ0)
27	26	adantl 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑:𝐼⟶ℕ0)
28		psdmul.x	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ 𝐼)
29	28	adantr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑋 ∈ 𝐼)
30	27, 29	ffvelcdmd 7062	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑‘𝑋) ∈ ℕ0)
31		peano2nn0 12518	. . . . . . . . 9 ⊢ ((𝑑‘𝑋) ∈ ℕ0 → ((𝑑‘𝑋) + 1) ∈ ℕ0)
32	30, 31	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑑‘𝑋) + 1) ∈ ℕ0)
33	32	adantr 484	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝑑‘𝑋) + 1) ∈ ℕ0)
34		eqid 2761	. . . . . . . 8 ⊢ (.r‘𝑅) = (.r‘𝑅)
35	4	ad2antrr 736	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑅 ∈ Ring)
36	9, 1, 14, 10, 8	psrelbas 21967	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
37	36	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝐹:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
38		elrabi 3646	. . . . . . . . . 10 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
39	38	adantl 485	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
40	37, 39	ffvelcdmd 7062	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → (𝐹‘𝑢) ∈ (Base‘𝑅))
41		psdmul.g	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺 ∈ 𝐵)
42	9, 1, 14, 10, 41	psrelbas 21967	. . . . . . . . . 10 ⊢ (𝜑 → 𝐺:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
43	42	ad2antrr 736	. . . . . . . . 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 21959	. . . . . . . . . . 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 589	. . . . . . . . . 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 3646	. . . . . . . . . 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 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
49	43, 48	ffvelcdmd 7062	. . . . . . . 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 20289	. . . . . . 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 19120	. . . . . 6 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
52		disjdifr 4426	. . . . . . 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 12494	. . . . . . . . . . . . . . . 16 ⊢ 1 ∈ ℕ0
55		0nn0 12493	. . . . . . . . . . . . . . . 16 ⊢ 0 ∈ ℕ0
56	54, 55	ifcli 4527	. . . . . . . . . . . . . . 15 ⊢ if(𝑖 = 𝑋, 1, 0) ∈ ℕ0
57	56	nn0ge0i 12505	. . . . . . . . . . . . . 14 ⊢ 0 ≤ if(𝑖 = 𝑋, 1, 0)
58	27	ffvelcdmda 7061	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
59	58	nn0red 12540	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℝ)
60	56	nn0rei 12489	. . . . . . . . . . . . . . . 16 ⊢ if(𝑖 = 𝑋, 1, 0) ∈ ℝ
61	60	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℝ)
62	59, 61	addge01d 11772	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (0 ≤ if(𝑖 = 𝑋, 1, 0) ↔ (𝑑‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
63	57, 62	mpbii 235	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
64	63	ralrimiva 3153	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ∀𝑖 ∈ 𝐼 (𝑑‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
65	27	ffnd 6688	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 Fn 𝐼)
66	54, 55	ifcli 4527	. . . . . . . . . . . . . . . . 17 ⊢ if(𝑦 = 𝑋, 1, 0) ∈ ℕ0
67	66	elexi 3475	. . . . . . . . . . . . . . . 16 ⊢ if(𝑦 = 𝑋, 1, 0) ∈ V
68		eqid 2761	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))
69	67, 68	fnmpti 6660	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼
70	69	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
71	13	adantr 484	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐼 ∈ V)
72		inidm 4178	. . . . . . . . . . . . . 14 ⊢ (𝐼 ∩ 𝐼) = 𝐼
73	65, 70, 71, 71, 72	offn 7669	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
74		eqidd 2762	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
75		eqeq1 2765	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑖 → (𝑦 = 𝑋 ↔ 𝑖 = 𝑋))
76	75	ifbid 4503	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 𝑖 → if(𝑦 = 𝑋, 1, 0) = if(𝑖 = 𝑋, 1, 0))
77	56	elexi 3475	. . . . . . . . . . . . . . . 16 ⊢ if(𝑖 = 𝑋, 1, 0) ∈ V
78	76, 68, 77	fvmpt 6971	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ 𝐼 → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
79	78	adantl 485	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
80	65, 70, 71, 71, 72, 74, 79	ofval 7667	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
81	65, 73, 71, 71, 72, 74, 80	ofrfval 7666	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ ∀𝑖 ∈ 𝐼 (𝑑‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
82	64, 81	mpbird 259	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
83	82	adantr 484	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
84	13	ad2antrr 736	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐼 ∈ V)
85	14	psrbagf 21950	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑘:𝐼⟶ℕ0)
86	85	adantl 485	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑘:𝐼⟶ℕ0)
87	27	adantr 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑:𝐼⟶ℕ0)
88	14	psrbagf 21950	. . . . . . . . . . . . 13 ⊢ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
89	19, 88	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
90	89	adantr 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
91		nn0re 12487	. . . . . . . . . . . . 13 ⊢ (𝑞 ∈ ℕ0 → 𝑞 ∈ ℝ)
92		nn0re 12487	. . . . . . . . . . . . 13 ⊢ (𝑟 ∈ ℕ0 → 𝑟 ∈ ℝ)
93		nn0re 12487	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℕ0 → 𝑠 ∈ ℝ)
94		letr 11274	. . . . . . . . . . . . 13 ⊢ ((𝑞 ∈ ℝ ∧ 𝑟 ∈ ℝ ∧ 𝑠 ∈ ℝ) → ((𝑞 ≤ 𝑟 ∧ 𝑟 ≤ 𝑠) → 𝑞 ≤ 𝑠))
95	91, 92, 93, 94	syl3an 1172	. . . . . . . . . . . 12 ⊢ ((𝑞 ∈ ℕ0 ∧ 𝑟 ∈ ℕ0 ∧ 𝑠 ∈ ℕ0) → ((𝑞 ≤ 𝑟 ∧ 𝑟 ≤ 𝑠) → 𝑞 ≤ 𝑠))
96	95	adantl 485	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑞 ∈ ℕ0 ∧ 𝑟 ∈ ℕ0 ∧ 𝑠 ∈ ℕ0)) → ((𝑞 ≤ 𝑟 ∧ 𝑟 ≤ 𝑠) → 𝑞 ≤ 𝑠))
97	84, 86, 87, 90, 96	caoftrn 7697	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑘 ∘r ≤ 𝑑 ∧ 𝑑 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) → 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
98	83, 97	mpan2d 704	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑘 ∘r ≤ 𝑑 → 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
99	98	ss2rabdv 4028	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
100		undifr 4436	. . . . . . . 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 220	. . . . . . 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 19953	. . . . 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 7425	. . . . . . . . 9 ⊢ (ℕ0 ↑m 𝐼) ∈ V
106	105	rabex 5294	. . . . . . . 8 ⊢ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∈ V
107	106	rabex 5294	. . . . . . 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 7425	. . . . . . . . 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 6660	. . . . . . . 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 6878	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (0g‘𝑅) ∈ V)
114	112, 21, 113	fndmfifsupp 9321	. . . . . 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 19965	. . . . 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 4270	. . . . . . . . . . 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 5102	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑢 → (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ 𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
119		breq1 5102	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑢 → (𝑘 ∘r ≤ 𝑑 ↔ 𝑢 ∘r ≤ 𝑑))
120	119	notbid 320	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑢 → (¬ 𝑘 ∘r ≤ 𝑑 ↔ ¬ 𝑢 ∘r ≤ 𝑑))
121	118, 120	anbi12d 641	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑢 → ((𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑘 ∘r ≤ 𝑑) ↔ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑)))
122	121	elrab 3650	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑘 ∘r ≤ 𝑑)} ↔ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑)))
123	14	psrbagf 21950	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑢:𝐼⟶ℕ0)
124	123	ffnd 6688	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑢 Fn 𝐼)
125	124	adantl 485	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑢 Fn 𝐼)
126	73	adantr 484	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
127	13	ad2antrr 736	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐼 ∈ V)
128		eqidd 2762	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
129	65	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑 Fn 𝐼)
130	66	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 ∈ 𝐼 → if(𝑦 = 𝑋, 1, 0) ∈ ℕ0)
131	68, 130	fmpti 7089	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0
132	131	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0)
133	132	ffnd 6688	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
134	133	ad2antrr 736	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
135		eqidd 2762	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
136	78	adantl 485	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
137	129, 134, 127, 127, 72, 135, 136	ofval 7667	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
138	125, 126, 127, 127, 72, 128, 137	ofrfval 7666	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
139	125, 129, 127, 127, 72, 128, 135	ofrfval 7666	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∘r ≤ 𝑑 ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
140	139	notbid 320	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (¬ 𝑢 ∘r ≤ 𝑑 ↔ ¬ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
141		rexnal 3113	. . . . . . . . . . . . . . 15 ⊢ (∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) ↔ ¬ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖))
142	140, 141	bitr4di 291	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (¬ 𝑢 ∘r ≤ 𝑑 ↔ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
143	138, 142	anbi12d 641	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑) ↔ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
144	30	ad2antrr 736	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑑‘𝑋) ∈ ℕ0)
145	123	adantl 485	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑢:𝐼⟶ℕ0)
146	28	adantr 484	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑋 ∈ 𝐼)
147	145, 146	ffvelcdmd 7062	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢‘𝑋) ∈ ℕ0)
148	147	adantlr 725	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢‘𝑋) ∈ ℕ0)
149	148	adantr 484	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑢‘𝑋) ∈ ℕ0)
150		nn0nlt0 12504	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑑‘𝑋) ∈ ℕ0 → ¬ (𝑑‘𝑋) < 0)
151	144, 150	syl 17	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ¬ (𝑑‘𝑋) < 0)
152	27	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑑:𝐼⟶ℕ0)
153	152	ffvelcdmda 7061	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
154	153	nn0cnd 12541	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℂ)
155	154	addridd 11380	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑑‘𝑖) + 0) = (𝑑‘𝑖))
156	155	breq2d 5111	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + 0) ↔ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
157	156	biimpd 231	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + 0) → (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
158		ifnefalse 4491	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (𝑖 ≠ 𝑋 → if(𝑖 = 𝑋, 1, 0) = 0)
159	158	oveq2d 7408	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (𝑖 ≠ 𝑋 → ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) = ((𝑑‘𝑖) + 0))
160	159	breq2d 5111	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (𝑖 ≠ 𝑋 → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ↔ (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + 0)))
161	160	imbi1d 343	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑖 ≠ 𝑋 → (((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑖) ≤ (𝑑‘𝑖)) ↔ ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + 0) → (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
162	157, 161	syl5ibrcom 249	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → (𝑖 ≠ 𝑋 → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
163	162	imp 410	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
164	163	impancom 455	. . . . . . . . . . . . . . . . . . . . . . . . . . 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 559	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) ∧ (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))) → (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
167	166	ex 416	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑖 ∈ 𝐼) → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))))
168	167	ralimdva 3173	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → ∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))))
169	168	anim1d 620	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) → (∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
170	169	imp 410	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
171		rexim 3102	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → ∃𝑖 ∈ 𝐼 (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))))
172	171	imp 410	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) → ∃𝑖 ∈ 𝐼 (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
173		fveq2 6863	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑖 = 𝑋 → (𝑢‘𝑖) = (𝑢‘𝑋))
174		fveq2 6863	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑖 = 𝑋 → (𝑑‘𝑖) = (𝑑‘𝑋))
175	173, 174	breq12d 5112	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑖 = 𝑋 → ((𝑢‘𝑖) ≤ (𝑑‘𝑖) ↔ (𝑢‘𝑋) ≤ (𝑑‘𝑋)))
176	175	notbid 320	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑖 = 𝑋 → (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) ↔ ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋)))
177	176	ceqsrexbv 3615	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (∃𝑖 ∈ 𝐼 (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) ↔ (𝑋 ∈ 𝐼 ∧ ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋)))
178	177	simprbi 501	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (∃𝑖 ∈ 𝐼 (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) → ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋))
179	172, 178	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖)) → ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋))
180	30	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑‘𝑋) ∈ ℕ0)
181	180	nn0red 12540	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑‘𝑋) ∈ ℝ)
182	148	nn0red 12540	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢‘𝑋) ∈ ℝ)
183	181, 182	ltnled 11327	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑑‘𝑋) < (𝑢‘𝑋) ↔ ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋)))
184	183	biimpar 481	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ ¬ (𝑢‘𝑋) ≤ (𝑑‘𝑋)) → (𝑑‘𝑋) < (𝑢‘𝑋))
185	179, 184	sylan2 602	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖) → (𝑖 = 𝑋 ∧ ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑑‘𝑋) < (𝑢‘𝑋))
186	170, 185	syldan 600	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑑‘𝑋) < (𝑢‘𝑋))
187		breq2 5103	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑢‘𝑋) = 0 → ((𝑑‘𝑋) < (𝑢‘𝑋) ↔ (𝑑‘𝑋) < 0))
188	186, 187	syl5ibcom 247	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ((𝑢‘𝑋) = 0 → (𝑑‘𝑋) < 0))
189	151, 188	mtod 200	. . . . . . . . . . . . . . . . . 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 12492	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑢‘𝑋) ∈ ℕ ↔ ((𝑢‘𝑋) ∈ ℕ0 ∧ (𝑢‘𝑋) ≠ 0))
192	149, 190, 191	sylanbrc 592	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑢‘𝑋) ∈ ℕ)
193		elfzo0 13703	. . . . . . . . . . . . . . . 16 ⊢ ((𝑑‘𝑋) ∈ (0..^(𝑢‘𝑋)) ↔ ((𝑑‘𝑋) ∈ ℕ0 ∧ (𝑢‘𝑋) ∈ ℕ ∧ (𝑑‘𝑋) < (𝑢‘𝑋)))
194	144, 192, 186, 193	syl3anbrc 1356	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑑‘𝑋) ∈ (0..^(𝑢‘𝑋)))
195		fzostep1 13789	. . . . . . . . . . . . . . 15 ⊢ ((𝑑‘𝑋) ∈ (0..^(𝑢‘𝑋)) → (((𝑑‘𝑋) + 1) ∈ (0..^(𝑢‘𝑋)) ∨ ((𝑑‘𝑋) + 1) = (𝑢‘𝑋)))
196	194, 195	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (((𝑑‘𝑋) + 1) ∈ (0..^(𝑢‘𝑋)) ∨ ((𝑑‘𝑋) + 1) = (𝑢‘𝑋)))
197	149	nn0red 12540	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑢‘𝑋) ∈ ℝ)
198	32	ad2antrr 736	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ((𝑑‘𝑋) + 1) ∈ ℕ0)
199	198	nn0red 12540	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ((𝑑‘𝑋) + 1) ∈ ℝ)
200	28	ad2antrr 736	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑋 ∈ 𝐼)
201		iftrue 4485	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑖 = 𝑋 → if(𝑖 = 𝑋, 1, 0) = 1)
202	174, 201	oveq12d 7410	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 = 𝑋 → ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) = ((𝑑‘𝑋) + 1))
203	173, 202	breq12d 5112	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑖 = 𝑋 → ((𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ↔ (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1)))
204	203	rspcv 3577	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑋 ∈ 𝐼 → (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1)))
205	200, 204	syl 17	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) → (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1)))
206	205	imp 410	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))) → (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1))
207	206	adantrr 727	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → (𝑢‘𝑋) ≤ ((𝑑‘𝑋) + 1))
208	197, 199, 207	lensymd 11331	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ¬ ((𝑑‘𝑋) + 1) < (𝑢‘𝑋))
209	208	intn3an3d 1501	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ¬ (((𝑑‘𝑋) + 1) ∈ ℕ0 ∧ (𝑢‘𝑋) ∈ ℕ ∧ ((𝑑‘𝑋) + 1) < (𝑢‘𝑋)))
210		elfzo0 13703	. . . . . . . . . . . . . . 15 ⊢ (((𝑑‘𝑋) + 1) ∈ (0..^(𝑢‘𝑋)) ↔ (((𝑑‘𝑋) + 1) ∈ ℕ0 ∧ (𝑢‘𝑋) ∈ ℕ ∧ ((𝑑‘𝑋) + 1) < (𝑢‘𝑋)))
211	209, 210	sylnibr 331	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ¬ ((𝑑‘𝑋) + 1) ∈ (0..^(𝑢‘𝑋)))
212	196, 211	orcnd 889	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) ∧ ∃𝑖 ∈ 𝐼 ¬ (𝑢‘𝑖) ≤ (𝑑‘𝑖))) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
213	143, 212	sylbida 601	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑)) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
214	213	anasss 470	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑢 ∘r ≤ 𝑑))) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
215	122, 214	sylan2b 603	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ 𝑘 ∘r ≤ 𝑑)}) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
216	117, 215	sylan2b 603	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → ((𝑑‘𝑋) + 1) = (𝑢‘𝑋))
217	216	oveq1d 7407	. . . . . . . 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 5192	. . . . . . 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 7408	. . . . . 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 21958	. . . . . . . . 9 ⊢ (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∈ Fin)
221	220	adantl 485	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∈ Fin)
222	24	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑅 ∈ Mnd)
223	32	adantr 484	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑‘𝑋) + 1) ∈ ℕ0)
224	4	ad2antrr 736	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑅 ∈ Ring)
225		elrabi 3646	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
226	36	adantr 484	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐹:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
227	226	ffvelcdmda 7061	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝐹‘𝑢) ∈ (Base‘𝑅))
228	225, 227	sylan2 602	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝐹‘𝑢) ∈ (Base‘𝑅))
229	42	ad2antrr 736	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐺:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
230	27	adantr 484	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑑:𝐼⟶ℕ0)
231	230	ffvelcdmda 7061	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
232	231	nn0cnd 12541	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℂ)
233	225, 123	syl 17	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑢:𝐼⟶ℕ0)
234	233	adantl 485	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑢:𝐼⟶ℕ0)
235	234	ffvelcdmda 7061	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℕ0)
236	235	nn0cnd 12541	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℂ)
237	56	nn0cni 12490	. . . . . . . . . . . . . . . . 17 ⊢ if(𝑖 = 𝑋, 1, 0) ∈ ℂ
238	237	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℂ)
239	232, 236, 238	subadd23d 11561	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → (((𝑑‘𝑖) − (𝑢‘𝑖)) + if(𝑖 = 𝑋, 1, 0)) = ((𝑑‘𝑖) + (if(𝑖 = 𝑋, 1, 0) − (𝑢‘𝑖))))
240	232, 238, 236	addsubassd 11559	. . . . . . . . . . . . . . 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 5192	. . . . . . . . . . . . 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 21959	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑢) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
245		elrabi 3646	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑑 ∘f − 𝑢) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → (𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
246	244, 245	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
247	246	adantll 724	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
248	14	psrbagf 21950	. . . . . . . . . . . . . . . 16 ⊢ ((𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (𝑑 ∘f − 𝑢):𝐼⟶ℕ0)
249	247, 248	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑢):𝐼⟶ℕ0)
250	249	ffnd 6688	. . . . . . . . . . . . . 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 736	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐼 ∈ V)
253	230	ffnd 6688	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑑 Fn 𝐼)
254	234	ffnd 6688	. . . . . . . . . . . . . . 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 7667	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f − 𝑢)‘𝑖) = ((𝑑‘𝑖) − (𝑢‘𝑖)))
258	78	adantl 485	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
259	250, 251, 252, 252, 72, 257, 258	offval 7665	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (((𝑑‘𝑖) − (𝑢‘𝑖)) + if(𝑖 = 𝑋, 1, 0))))
260		simplr 778	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
261	16	ad2antrr 736	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
262	260, 261, 18	syl2anc 593	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
263	262, 88	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
264	263	ffnd 6688	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
265	253, 251, 252, 252, 72, 255, 258	ofval 7667	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
266	264, 254, 252, 252, 72, 265, 256	offval 7665	. . . . . . . . . . . . 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 21956	. . . . . . . . . . . . 13 ⊢ (((𝑑 ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
269	247, 261, 268	syl2anc 593	. . . . . . . . . . . 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 7062	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)) ∈ (Base‘𝑅))
272	1, 34, 224, 228, 271	ringcld 20289	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) ∈ (Base‘𝑅))
273	1, 22, 222, 223, 272	mulgnn0cld 19120	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
274		disjdifr 4426	. . . . . . . . 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 486	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) → 𝑘 ∘r ≤ 𝑑)
277	276	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → ((𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) → 𝑘 ∘r ≤ 𝑑))
278	277	ss2rabi 4029	. . . . . . . . . . 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 4436	. . . . . . . . . 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 220	. . . . . . . . 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 19953	. . . . . . 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 4084	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
285	28	ad2antrr 736	. . . . . . . . . . . . . . . . . . 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 7667	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
289	285, 288	mpdan 697	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
290	284, 289	sylan2 602	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
291	290	oveq2d 7408	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑢‘𝑋) + ((𝑑 ∘f − 𝑢)‘𝑋)) = ((𝑢‘𝑋) + ((𝑑‘𝑋) − (𝑢‘𝑋))))
292	234, 285	ffvelcdmd 7062	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑢‘𝑋) ∈ ℕ0)
293	284, 292	sylan2 602	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (𝑢‘𝑋) ∈ ℕ0)
294	293	nn0cnd 12541	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (𝑢‘𝑋) ∈ ℂ)
295	30	nn0cnd 12541	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑑‘𝑋) ∈ ℂ)
296	295	adantr 484	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (𝑑‘𝑋) ∈ ℂ)
297	294, 296	pncan3d 11542	. . . . . . . . . . . . . . . 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 7407	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (((𝑢‘𝑋) + ((𝑑 ∘f − 𝑢)‘𝑋)) + 1) = ((𝑑‘𝑋) + 1))
300	249, 285	ffvelcdmd 7062	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑑 ∘f − 𝑢)‘𝑋) ∈ ℕ0)
301	284, 300	sylan2 602	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑑 ∘f − 𝑢)‘𝑋) ∈ ℕ0)
302	301	nn0cnd 12541	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → ((𝑑 ∘f − 𝑢)‘𝑋) ∈ ℂ)
303		1cnd 11172	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → 1 ∈ ℂ)
304	294, 302, 303	addassd 11201	. . . . . . . . . . . . . 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 7407	. . . . . . . . . . . 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 736	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → 𝑅 ∈ Mnd)
308		peano2nn0 12518	. . . . . . . . . . . . . . 15 ⊢ (((𝑑 ∘f − 𝑢)‘𝑋) ∈ ℕ0 → (((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℕ0)
309	300, 308	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℕ0)
310	284, 309	sylan2 602	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) → (((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℕ0)
311	284, 272	sylan2 602	. . . . . . . . . . . . 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 19129	. . . . . . . . . . . . 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 1390	. . . . . . . . . . . 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 5192	. . . . . . . . . 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 7408	. . . . . . . . 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 4090	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
318	221, 317	ssfid 9209	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∈ Fin)
319	1, 22, 222, 292, 272	mulgnn0cld 19120	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
320	284, 319	sylan2 602	. . . . . . . . . 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 19120	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
322	284, 321	sylan2 602	. . . . . . . . . 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 19948	. . . . . . . . 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 736	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → 𝑋 ∈ 𝐼)
328	65	adantr 484	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → 𝑑 Fn 𝐼)
329		elrabi 3646	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
330	329, 124	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → 𝑢 Fn 𝐼)
331	330	adantl 485	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → 𝑢 Fn 𝐼)
332	13	ad2antrr 736	. . . . . . . . . . . . . . 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 7667	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∧ 𝑋 ∈ 𝐼) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
336	327, 335	mpdan 697	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → ((𝑑 ∘f − 𝑢)‘𝑋) = ((𝑑‘𝑋) − (𝑢‘𝑋)))
337		fveq1 6862	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = 𝑢 → (𝑘‘𝑋) = (𝑢‘𝑋))
338	337	eqeq1d 2763	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑢 → ((𝑘‘𝑋) = 0 ↔ (𝑢‘𝑋) = 0))
339	119, 338	anbi12d 641	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑢 → ((𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) ↔ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0)))
340	339	elrab 3650	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ↔ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0)))
341	340	simprbi 501	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))
342	341	simprd 499	. . . . . . . . . . . . . . 15 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → (𝑢‘𝑋) = 0)
343	342	adantl 485	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → (𝑢‘𝑋) = 0)
344	343	oveq2d 7408	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → ((𝑑‘𝑋) − (𝑢‘𝑋)) = ((𝑑‘𝑋) − 0))
345	30	adantr 484	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → (𝑑‘𝑋) ∈ ℕ0)
346	345	nn0cnd 12541	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → (𝑑‘𝑋) ∈ ℂ)
347	346	subid1d 11528	. . . . . . . . . . . . 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 7407	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → ((𝑑‘𝑋) + 1) = (((𝑑 ∘f − 𝑢)‘𝑋) + 1))
350	349	oveq1d 7407	. . . . . . . . . 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 5192	. . . . . . . . 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 7408	. . . . . . . 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 7410	. . . . . . 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 484	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑅 ∈ Grp)
355	106	rabex 5294	. . . . . . . . . . 11 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∈ V
356	355	difexi 5285	. . . . . . . . . 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 7092	. . . . . . . . 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 7425	. . . . . . . . . . . 12 ⊢ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ V
360	359, 323	fnmpti 6660	. . . . . . . . . . 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 9321	. . . . . . . . 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 19938	. . . . . . . 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 7092	. . . . . . . . 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 7425	. . . . . . . . . . . 12 ⊢ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ V
366	365, 324	fnmpti 6660	. . . . . . . . . . 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 9321	. . . . . . . . 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 19938	. . . . . . . 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 5294	. . . . . . . . . 10 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ∈ V
371	370	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ∈ V)
372	278	sseli 3932	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} → 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
373	372, 321	sylan2 602	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) → ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
374	373	fmpttd 7092	. . . . . . . . 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 6660	. . . . . . . . . . 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 9209	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)} ∈ Fin)
379	377, 378, 113	fndmfifsupp 9321	. . . . . . . . 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 19938	. . . . . . . 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 18970	. . . . . . 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 7410	. . . . 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 484	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐹 ∈ 𝐵)
387	41	adantr 484	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝐺 ∈ 𝐵)
388	9, 10, 34, 385, 14, 386, 387, 19	psrmulval 21976	. . . . 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 7408	. . . 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 5285	. . . . . . 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 4084	. . . . . . . 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 17	. . . . . . . . . . 11 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → 𝑢:𝐼⟶ℕ0)
394	393	adantl 485	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑢:𝐼⟶ℕ0)
395	28	ad2antrr 736	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → 𝑋 ∈ 𝐼)
396	394, 395	ffvelcdmd 7062	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → (𝑢‘𝑋) ∈ ℕ0)
397	1, 22, 25, 396, 50	mulgnn0cld 19120	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}) → ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
398	392, 397	sylan2 602	. . . . . . 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 7092	. . . . . 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 6660	. . . . . . . 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 4090	. . . . . . . 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 9209	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∈ Fin)
405	402, 404, 113	fndmfifsupp 9321	. . . . . 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 19938	. . . . 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 18972	. . . . 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 18970	. . . 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 5192	. 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 21978	. . 3 ⊢ (𝜑 → (𝐹 · 𝐺) ∈ 𝐵)
412	9, 10, 14, 28, 411	psdval 22204	. 2 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘(𝐹 · 𝐺)) = (𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ↦ (((𝑑‘𝑋) + 1)(.g‘𝑅)((𝐹 · 𝐺)‘(𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))))
413		psdmul.p	. . . 4 ⊢ + = (+g‘𝑆)
414	23	grpmgmd 18986	. . . . . 6 ⊢ (𝜑 → 𝑅 ∈ Mgm)
415	9, 10, 414, 28, 8	psdcl 22206	. . . . 5 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) ∈ 𝐵)
416	9, 10, 385, 4, 415, 41	psrmulcl 21978	. . . 4 ⊢ (𝜑 → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) ∈ 𝐵)
417	9, 10, 414, 28, 41	psdcl 22206	. . . . 5 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺) ∈ 𝐵)
418	9, 10, 385, 4, 8, 417	psrmulcl 21978	. . . 4 ⊢ (𝜑 → (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)) ∈ 𝐵)
419	9, 10, 2, 413, 416, 418	psradd 21970	. . 3 ⊢ (𝜑 → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) + (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))) = (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) ∘f (+g‘𝑅)(𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))))
420	9, 1, 14, 10, 416	psrelbas 21967	. . . . 5 ⊢ (𝜑 → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
421	420	ffnd 6688	. . . 4 ⊢ (𝜑 → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) Fn {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
422	9, 1, 14, 10, 418	psrelbas 21967	. . . . 5 ⊢ (𝜑 → (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
423	422	ffnd 6688	. . . 4 ⊢ (𝜑 → (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)) Fn {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
424	106	a1i 11	. . . 4 ⊢ (𝜑 → {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∈ V)
425		inidm 4178	. . . 4 ⊢ ({ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∩ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) = {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}
426	415	adantr 484	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) ∈ 𝐵)
427	9, 10, 34, 385, 14, 426, 387, 7	psrmulval 21976	. . . . 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 736	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑅 ∈ Ring)
430		elrabi 3646	. . . . . . . . 9 ⊢ (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑏 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
431	9, 1, 14, 10, 415	psrelbas 21967	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
432	431	adantr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹):{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
433	432	ffvelcdmda 7061	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏) ∈ (Base‘𝑅))
434	430, 433	sylan2 602	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏) ∈ (Base‘𝑅))
435	42	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐺:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
436	14, 243	psrbagconcl 21959	. . . . . . . . . . 11 ⊢ ((𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑏) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
437	436	adantll 724	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑏) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
438		elrabi 3646	. . . . . . . . . 10 ⊢ ((𝑑 ∘f − 𝑏) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → (𝑑 ∘f − 𝑏) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
439	437, 438	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑑 ∘f − 𝑏) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
440	435, 439	ffvelcdmd 7062	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝐺‘(𝑑 ∘f − 𝑏)) ∈ (Base‘𝑅))
441	1, 34, 429, 434, 440	ringcld 20289	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏))) ∈ (Base‘𝑅))
442	441	fmpttd 7092	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑏 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏)(.r‘𝑅)(𝐺‘(𝑑 ∘f − 𝑏)))):{𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}⟶(Base‘𝑅))
443		ovex 7425	. . . . . . . . 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 6660	. . . . . . . 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 9321	. . . . . 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 7656	. . . . . . . . . 10 ⊢ ∘f + = (𝑚 ∈ V, 𝑛 ∈ V ↦ (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))))
450		vex 3457	. . . . . . . . . . 11 ⊢ 𝑢 ∈ V
451	450	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → 𝑢 ∈ V)
452		ssv 3960	. . . . . . . . . . 11 ⊢ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ⊆ V
453	452	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ⊆ V)
454		ssv 3960	. . . . . . . . . . 11 ⊢ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ⊆ V
455	454	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ⊆ V)
456	449, 451, 453, 455	elimampo 7529	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↔ ∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜)))))
457	456	biimpa 480	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))))
458		elrabi 3646	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑚 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
459	14	psrbagf 21950	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑚:𝐼⟶ℕ0)
460	459	ffund 6692	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → Fun 𝑚)
461	458, 460	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → Fun 𝑚)
462	461	funfnd 6548	. . . . . . . . . . . . 13 ⊢ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑚 Fn dom 𝑚)
463	462	ad2antrl 738	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → 𝑚 Fn dom 𝑚)
464		velsn 4597	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ↔ 𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))
465		funmpt 6555	. . . . . . . . . . . . . . . 16 ⊢ Fun (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))
466		funeq 6537	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → (Fun 𝑛 ↔ Fun (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
467	465, 466	mpbiri 260	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → Fun 𝑛)
468	467	funfnd 6548	. . . . . . . . . . . . . 14 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → 𝑛 Fn dom 𝑛)
469	464, 468	sylbi 219	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} → 𝑛 Fn dom 𝑛)
470	469	ad2antll 739	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → 𝑛 Fn dom 𝑛)
471		vex 3457	. . . . . . . . . . . . . 14 ⊢ 𝑚 ∈ V
472	471	dmex 7886	. . . . . . . . . . . . 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 3457	. . . . . . . . . . . . . 14 ⊢ 𝑛 ∈ V
475	474	dmex 7886	. . . . . . . . . . . . 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 7665	. . . . . . . . . . 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 4598	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} → 𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))
483	482	oveq2d 7408	. . . . . . . . . . . . 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 739	. . . . . . . . . . 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 740	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐼 ∈ V)
487	458, 459	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑚:𝐼⟶ℕ0)
488	487	adantl 485	. . . . . . . . . . . . . . . 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 12488	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑞 ∈ ℕ0 → 𝑞 ∈ ℂ)
491		nn0cn 12488	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑟 ∈ ℕ0 → 𝑟 ∈ ℂ)
492		nn0cn 12488	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑠 ∈ ℕ0 → 𝑠 ∈ ℂ)
493		addsubass 11437	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑞 ∈ ℂ ∧ 𝑟 ∈ ℂ ∧ 𝑠 ∈ ℂ) → ((𝑞 + 𝑟) − 𝑠) = (𝑞 + (𝑟 − 𝑠)))
494	490, 491, 492, 493	syl3an 1172	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑞 ∈ ℕ0 ∧ 𝑟 ∈ ℕ0 ∧ 𝑠 ∈ ℕ0) → ((𝑞 + 𝑟) − 𝑠) = (𝑞 + (𝑟 − 𝑠)))
495	494	adantl 485	. . . . . . . . . . . . . . . 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 7696	. . . . . . . . . . . . . . 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 488	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝐼) → 𝑖 ∈ 𝐼)
498	56	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℕ0)
499	68, 76, 497, 498	fvmptd3 6995	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
500	133, 133, 13, 13, 72, 499, 499	offval 7665	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0))))
501	500	oveq2d 7408	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑚 ∘f + ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝑚 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))))
502	501	ad3antrrr 740	. . . . . . . . . . . . . . 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 11499	. . . . . . . . . . . . . . . . . . 19 ⊢ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)) = 0
504	503	mpteq2i 5195	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ 0)
505		fconstmpt 5707	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐼 × {0}) = (𝑖 ∈ 𝐼 ↦ 0)
506	504, 505	eqtr4i 2787	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0))) = (𝐼 × {0})
507	506	oveq2i 7403	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))) = (𝑚 ∘f + (𝐼 × {0}))
508		0zd 12577	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 0 ∈ ℤ)
509	490	addridd 11380	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑞 ∈ ℕ0 → (𝑞 + 0) = 𝑞)
510	509	adantl 485	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑞 ∈ ℕ0) → (𝑞 + 0) = 𝑞)
511	486, 488, 508, 510	caofid0r 7690	. . . . . . . . . . . . . . . 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 488	. . . . . . . . . . . . . 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 7399	. . . . . . . . . . . . . 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 249	. . . . . . . . . . . 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 727	. . . . . . . . . . 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 242	. . . . . . . . . 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 262	. . . . . . . . 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 3218	. . . . . . . 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 15	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
524		simpr 488	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
525	13	mptexd 7204	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ V)
526		elsng 4595	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ V → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ↔ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
527	525, 526	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ↔ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
528	68, 527	mpbiri 260	. . . . . . . . 9 ⊢ (𝜑 → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})
529	528	ad2antrr 736	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})
530	449	mpofun 7516	. . . . . . . . 9 ⊢ Fun ∘f +
531	530	a1i 11	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → Fun ∘f + )
532		xpss 5661	. . . . . . . . 9 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ⊆ (V × V)
533	472	inex1 5272	. . . . . . . . . . . 12 ⊢ (dom 𝑚 ∩ dom 𝑛) ∈ V
534	533	mptex 7203	. . . . . . . . . . 11 ⊢ (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ∈ V
535	534	rgen2w 3080	. . . . . . . . . 10 ⊢ ∀𝑚 ∈ V ∀𝑛 ∈ V (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ∈ V
536	449	dmmpoga 8050	. . . . . . . . . 10 ⊢ (∀𝑚 ∈ V ∀𝑛 ∈ V (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ∈ V → dom ∘f + = (V × V))
537	535, 536	mp1i 13	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → dom ∘f + = (V × V))
538	532, 537	sseqtrrid 3979	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ⊆ dom ∘f + )
539	524, 529, 531, 538	elovimad 7442	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑣 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})))
540	13	ad2antrr 736	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝐼 ∈ V)
541		elrabi 3646	. . . . . . . . . . . . 13 ⊢ (𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑣 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
542	14	psrbagf 21950	. . . . . . . . . . . . 13 ⊢ (𝑣 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → 𝑣:𝐼⟶ℕ0)
543	541, 542	syl 17	. . . . . . . . . . . 12 ⊢ (𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → 𝑣:𝐼⟶ℕ0)
544	543	ad2antll 739	. . . . . . . . . . 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 485	. . . . . . . . . . 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 7696	. . . . . . . . . 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 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
549	78	adantl 485	. . . . . . . . . . . 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 7665	. . . . . . . . . . 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 7408	. . . . . . . . . 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 7403	. . . . . . . . . . 11 ⊢ (𝑣 ∘f + (𝑖 ∈ 𝐼 ↦ (if(𝑖 = 𝑋, 1, 0) − if(𝑖 = 𝑋, 1, 0)))) = (𝑣 ∘f + (𝐼 × {0}))
553		0zd 12577	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 0 ∈ ℤ)
554		nn0cn 12488	. . . . . . . . . . . . . 14 ⊢ (𝑝 ∈ ℕ0 → 𝑝 ∈ ℂ)
555	554	addridd 11380	. . . . . . . . . . . . 13 ⊢ (𝑝 ∈ ℕ0 → (𝑝 + 0) = 𝑝)
556	555	adantl 485	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑝 ∈ ℕ0) → (𝑝 + 0) = 𝑝)
557	540, 544, 553, 556	caofid0r 7690	. . . . . . . . . . 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 7399	. . . . . . . . . 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 249	. . . . . . . 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 740	. . . . . . . . . . . . . . . . . . . . . . 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 21956	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑚 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
565	458, 563, 564	syl2an2 696	. . . . . . . . . . . . . . . . . . . . . 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 21950	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
567	565, 566	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0)
568	567	adantrr 727	. . . . . . . . . . . . . . . . . . . 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 6665	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢:𝐼⟶ℕ0 ↔ (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))):𝐼⟶ℕ0))
570	568, 569	syl5ibrcom 249	. . . . . . . . . . . . . . . . . . 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 242	. . . . . . . . . . . . . . . . . 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 262	. . . . . . . . . . . . . . . . 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 3218	. . . . . . . . . . . . . . . 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 15	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢:𝐼⟶ℕ0)
575	574	adantrr 727	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝑢:𝐼⟶ℕ0)
576	575	ffvelcdmda 7061	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℕ0)
577	576	nn0cnd 12541	. . . . . . . . . . . 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 11543	. . . . . . . . . . 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 5192	. . . . . . . . . 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 6688	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∧ 𝑣 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) → 𝑢 Fn 𝐼)
582	581, 548, 540, 540, 72	offn 7669	. . . . . . . . . . 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 7667	. . . . . . . . . . 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 7665	. . . . . . . . . 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 6931	. . . . . . . . . 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 7399	. . . . . . . . . 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 249	. . . . . . . 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 214	. . . . . . 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 7646	. . . . . 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 19939	. . . . 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 485	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑝 ∈ ℕ0) → (𝑝 + 0) = 𝑝)
595	486, 488, 508, 594	caofid0r 7690	. . . . . . . . . . . . . . . . . 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 249	. . . . . . . . . . . . . 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 727	. . . . . . . . . . . . 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 242	. . . . . . . . . . . 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 262	. . . . . . . . . . 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 3218	. . . . . . . . . 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 15	. . . . . . . . 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 6863	. . . . . . . . . 10 ⊢ (𝑏 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘𝑏) = ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
608		oveq2 7400	. . . . . . . . . . 11 ⊢ (𝑏 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑑 ∘f − 𝑏) = (𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
609	608	fveq2d 6867	. . . . . . . . . 10 ⊢ (𝑏 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝐺‘(𝑑 ∘f − 𝑏)) = (𝐺‘(𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))))
610	607, 609	oveq12d 7410	. . . . . . . . 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 7107	. . . . . . . 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 736	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑋 ∈ 𝐼)
613	8	ad2antrr 736	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝐹 ∈ 𝐵)
614		elrabi 3646	. . . . . . . . . . . . . 14 ⊢ ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
615	604, 614	syl 17	. . . . . . . . . . . . 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 22205	. . . . . . . . . . . 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	574	ffnd 6688	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢 Fn 𝐼)
618	131	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0)
619	618	ffnd 6688	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
620	13	ad2antrr 736	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝐼 ∈ V)
621		eqidd 2762	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑋 ∈ 𝐼) → (𝑢‘𝑋) = (𝑢‘𝑋))
622		iftrue 4485	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑋 → if(𝑦 = 𝑋, 1, 0) = 1)
623		1ex 11173	. . . . . . . . . . . . . . . . . . 19 ⊢ 1 ∈ V
624	622, 68, 623	fvmpt 6971	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑋 ∈ 𝐼 → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑋) = 1)
625	624	adantl 485	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑋 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑋) = 1)
626	617, 619, 620, 620, 72, 621, 625	ofval 7667	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑋 ∈ 𝐼) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = ((𝑢‘𝑋) − 1))
627	612, 626	mpdan 697	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = ((𝑢‘𝑋) − 1))
628	627	oveq1d 7407	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) + 1) = (((𝑢‘𝑋) − 1) + 1))
629		nn0sscn 12483	. . . . . . . . . . . . . . . . . 18 ⊢ ℕ0 ⊆ ℂ
630	629	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ℕ0 ⊆ ℂ)
631	574, 630	fssd 6705	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢:𝐼⟶ℂ)
632	631, 612	ffvelcdmd 7062	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢‘𝑋) ∈ ℂ)
633		1cnd 11172	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 1 ∈ ℂ)
634	632, 633	npcand 11543	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (((𝑢‘𝑋) − 1) + 1) = (𝑢‘𝑋))
635	628, 634	eqtrd 2796	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) + 1) = (𝑢‘𝑋))
636	617, 619, 620, 620, 72	offn 7669	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
637		eqidd 2762	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
638	78	adantl 485	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
639	617, 619, 620, 620, 72, 637, 638	ofval 7667	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)))
640	574	ffvelcdmda 7061	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℕ0)
641	640	nn0cnd 12541	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℂ)
642	237	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℂ)
643	641, 642	npcand 11543	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0)) = (𝑢‘𝑖))
644	620, 636, 619, 617, 639, 638, 643	offveq 7682	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = 𝑢)
645	644	fveq2d 6867	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝐹‘((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝐹‘𝑢))
646	635, 645	oveq12d 7410	. . . . . . . . . . . 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‘𝑅)(𝐹‘𝑢)))
647	616, 646	eqtrd 2796	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹)‘(𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = ((𝑢‘𝑋)(.g‘𝑅)(𝐹‘𝑢)))
648	26	ad2antlr 737	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑑:𝐼⟶ℕ0)
649	648	ffvelcdmda 7061	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
650	649	nn0cnd 12541	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℂ)
651	650, 641, 642	subsub3d 11569	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → ((𝑑‘𝑖) − ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0))) = (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖)))
652	651	mpteq2dva 5192	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑖 ∈ 𝐼 ↦ ((𝑑‘𝑖) − ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)))) = (𝑖 ∈ 𝐼 ↦ (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖))))
653	65	adantr 484	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑑 Fn 𝐼)
654		eqidd 2762	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
655	653, 636, 620, 620, 72, 654, 639	offval 7665	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝑖 ∈ 𝐼 ↦ ((𝑑‘𝑖) − ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)))))
656	653, 619, 620, 620, 72	offn 7669	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
657	653, 619, 620, 620, 72, 654, 638	ofval 7667	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
658	656, 617, 620, 620, 72, 657, 637	offval 7665	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) = (𝑖 ∈ 𝐼 ↦ (((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) − (𝑢‘𝑖))))
659	652, 655, 658	3eqtr4d 2806	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))
660	659	fveq2d 6867	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝐺‘(𝑑 ∘f − (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))) = (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))
661	647, 660	oveq12d 7410	. . . . . . . . . 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 − 𝑢))))
662	4	ad2antrr 736	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑅 ∈ Ring)
663	574, 612	ffvelcdmd 7062	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢‘𝑋) ∈ ℕ0)
664	663	nn0zd 12590	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑢‘𝑋) ∈ ℤ)
665	36	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝐹:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
666		simpllr 785	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
667	16	ad3antrrr 740	. . . . . . . . . . . . . . . . . . 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})
668		simprl 780	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) ∧ (𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) → 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
669		eqid 2761	. . . . . . . . . . . . . . . . . . . 20 ⊢ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} = {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))}
670	14, 243, 669	psrbagleadd1 21960	. . . . . . . . . . . . . . . . . . 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)))})
671	666, 667, 668, 670	syl3anc 1389	. . . . . . . . . . . . . . . . . 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)))})
672		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)))}))
673	671, 672	syl5ibrcom 249	. . . . . . . . . . . . . . . . 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)))}))
674	485, 673	sylbid 242	. . . . . . . . . . . . . . . 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)))}))
675	481, 674	sylbird 262	. . . . . . . . . . . . . . 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)))}))
676	675	rexlimdvva 3218	. . . . . . . . . . . . . 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)))}))
677	457, 676	mpd 15	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
678		elrabi 3646	. . . . . . . . . . . . 13 ⊢ (𝑢 ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
679	677, 678	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
680	665, 679	ffvelcdmd 7062	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝐹‘𝑢) ∈ (Base‘𝑅))
681	42	ad2antrr 736	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝐺:{ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}⟶(Base‘𝑅))
682	19	adantr 484	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
683	14, 669	psrbagconcl 21959	. . . . . . . . . . . . . 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)))})
684	682, 677, 683	syl2anc 593	. . . . . . . . . . . . 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)))})
685		elrabi 3646	. . . . . . . . . . . . 13 ⊢ (((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {𝑙 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑙 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
686	684, 685	syl 17	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
687	681, 686	ffvelcdmd 7062	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)) ∈ (Base‘𝑅))
688	1, 22, 34	mulgass2 20338	. . . . . . . . . . 11 ⊢ ((𝑅 ∈ Ring ∧ ((𝑢‘𝑋) ∈ ℤ ∧ (𝐹‘𝑢) ∈ (Base‘𝑅) ∧ (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)) ∈ (Base‘𝑅))) → (((𝑢‘𝑋)(.g‘𝑅)(𝐹‘𝑢))(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) = ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
689	662, 664, 680, 687, 688	syl13anc 1390	. . . . . . . . . 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 − 𝑢)))))
690	661, 689	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 − 𝑢)))))
691	690	mpteq2dva 5192	. . . . . . . 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 − 𝑢))))))
692	611, 691	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 − 𝑢))))))
693	692	oveq2d 7408	. . . . . 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 − 𝑢)))))))
694		snex 5395	. . . . . . . . . 10 ⊢ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))} ∈ V
695	355, 694	xpex 7732	. . . . . . . . 9 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ∈ V
696	695	funimaex 6605	. . . . . . . 8 ⊢ (Fun ∘f + → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∈ V)
697	530, 696	mp1i 13	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ∈ V)
698	24	ad2antrr 736	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → 𝑅 ∈ Mnd)
699	1, 34, 662, 680, 687	ringcld 20289	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))) ∈ (Base‘𝑅))
700	1, 22, 698, 663, 699	mulgnn0cld 19120	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}))) → ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))) ∈ (Base‘𝑅))
701		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 − 𝑢)))))
702	359, 701	fnmpti 6660	. . . . . . . . . 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)))}
703	702	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)))})
704	703, 21, 113	fndmfifsupp 9321	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) finSupp (0g‘𝑅))
705	462	ad2antlr 737	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → 𝑚 Fn dom 𝑚)
706	469	adantl 485	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → 𝑛 Fn dom 𝑛)
707	472	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → dom 𝑚 ∈ V)
708	475	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → dom 𝑛 ∈ V)
709		eqidd 2762	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ∧ 𝑜 ∈ dom 𝑚) → (𝑚‘𝑜) = (𝑚‘𝑜))
710		eqidd 2762	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) ∧ 𝑜 ∈ dom 𝑛) → (𝑛‘𝑜) = (𝑛‘𝑜))
711	705, 706, 707, 708, 477, 709, 710	offval 7665	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → (𝑚 ∘f + 𝑛) = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))))
712	711	eqeq2d 2772	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}) → (𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜)))))
713	712	rexbidva 3183	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑚 ∘f + 𝑛) ↔ ∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜)))))
714	16	ad2antrr 736	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
715		oveq2 7400	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → (𝑚 ∘f + 𝑛) = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
716	715	eqeq2d 2772	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) → (𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
717	716	rexsng 4634	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
718	714, 717	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑚 ∘f + 𝑛) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
719	713, 718	bitr3d 283	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ↔ 𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
720	719	rexbidva 3183	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}∃𝑛 ∈ {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))}𝑢 = (𝑜 ∈ (dom 𝑚 ∩ dom 𝑛) ↦ ((𝑚‘𝑜) + (𝑛‘𝑜))) ↔ ∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
721		breq1 5102	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
722		breq1 5102	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑘 ∘r ≤ 𝑑 ↔ (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑))
723		fveq1 6862	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑘‘𝑋) = ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋))
724	723	eqeq1d 2763	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → ((𝑘‘𝑋) = 0 ↔ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0))
725	722, 724	anbi12d 641	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → ((𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) ↔ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ∧ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0)))
726	725	notbid 320	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) ↔ ¬ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ∧ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0)))
727	721, 726	anbi12d 641	. . . . . . . . . . . . . . 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))))
728	458, 714, 564	syl2an2 696	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
729		simplr 778	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
730		simpr 488	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
731	14, 243, 44	psrbagleadd1 21960	. . . . . . . . . . . . . . . . . 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)))})
732	729, 714, 730, 731	syl3anc 1389	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
733	721	elrab 3650	. . . . . . . . . . . . . . . . . 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)))))
734	733	simprbi 501	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
735	732, 734	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
736	28	ad2antrr 736	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑋 ∈ 𝐼)
737	487	adantl 485	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑚:𝐼⟶ℕ0)
738	737	ffnd 6688	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝑚 Fn 𝐼)
739	133	ad2antrr 736	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
740	13	ad2antrr 736	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐼 ∈ V)
741		eqidd 2762	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → (𝑚‘𝑋) = (𝑚‘𝑋))
742	624	adantl 485	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑋) = 1)
743	738, 739, 740, 740, 72, 741, 742	ofval 7667	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∧ 𝑋 ∈ 𝐼) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = ((𝑚‘𝑋) + 1))
744	736, 743	mpdan 697	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = ((𝑚‘𝑋) + 1))
745	737, 736	ffvelcdmd 7062	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚‘𝑋) ∈ ℕ0)
746		nn0p1nn 12517	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑚‘𝑋) ∈ ℕ0 → ((𝑚‘𝑋) + 1) ∈ ℕ)
747	745, 746	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚‘𝑋) + 1) ∈ ℕ)
748	744, 747	eqeltrd 2861	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) ∈ ℕ)
749	748	nnne0d 12260	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) ≠ 0)
750	749	neneqd 2961	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ¬ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0)
751	750	intnand 492	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ¬ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ∧ ((𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑋) = 0))
752	735, 751	jca 519	. . . . . . . . . . . . . . 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)))
753	727, 728, 752	elrabd 3652	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))})
754		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))}))
755	753, 754	syl5ibrcom 249	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}))
756		breq1 5102	. . . . . . . . . . . . . 14 ⊢ (𝑘 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑘 ∘r ≤ 𝑑 ↔ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑))
757		elrabi 3646	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
758	757	adantl 485	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
759	131	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0)
760	757, 123	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → 𝑢:𝐼⟶ℕ0)
761	760	adantl 485	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢:𝐼⟶ℕ0)
762	28	ad2antrr 736	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑋 ∈ 𝐼)
763	761, 762	ffvelcdmd 7062	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢‘𝑋) ∈ ℕ0)
764	339	notbid 320	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 41 ⊢ (𝑘 = 𝑢 → (¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0) ↔ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0)))
765	118, 764	anbi12d 641	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 ⊢ (𝑘 = 𝑢 → ((𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)) ↔ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))))
766	765	elrab 3650	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} ↔ (𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))))
767	766	simprbi 501	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0)))
768	767	simpld 498	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → 𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
769	768	adantl 485	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
770	769	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
771	757, 124	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → 𝑢 Fn 𝐼)
772	771	adantl 485	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 Fn 𝐼)
773	772	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑢 Fn 𝐼)
774	19	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
775	88	ffnd 6688	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 ⊢ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
776	774, 775	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
777	776	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
778	13	ad3antrrr 740	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝐼 ∈ V)
779		eqidd 2762	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
780		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)))‘𝑖))
781	773, 777, 778, 778, 72, 779, 780	ofrfval 7666	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖)))
782	770, 781	mpbid 234	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖))
783	782	r19.21bi 3253	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ≤ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖))
784	783	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → (𝑢‘𝑖) ≤ ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖))
785	65	ad3antrrr 740	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) → 𝑑 Fn 𝐼)
786	69	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
787	13	ad4antr 742	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) → 𝐼 ∈ V)
788		eqidd 2762	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
789	78	adantl 485	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
790	785, 786, 787, 787, 72, 788, 789	ofval 7667	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ≠ 𝑋) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
791	790	an32s 662	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
792	158	adantl 485	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → if(𝑖 = 𝑋, 1, 0) = 0)
793	792	oveq2d 7408	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)) = ((𝑑‘𝑖) + 0))
794	27	ad2antrr 736	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑑:𝐼⟶ℕ0)
795	794	ffvelcdmda 7061	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
796	795	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → (𝑑‘𝑖) ∈ ℕ0)
797	796	nn0cnd 12541	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → (𝑑‘𝑖) ∈ ℂ)
798	797	addridd 11380	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑑‘𝑖) + 0) = (𝑑‘𝑖))
799	791, 793, 798	3eqtrd 2800	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = (𝑑‘𝑖))
800	784, 799	breqtrd 5125	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 ≠ 𝑋) → (𝑢‘𝑖) ≤ (𝑑‘𝑖))
801		simpr 488	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑢‘𝑋) = 0)
802	27	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑑:𝐼⟶ℕ0)
803	802, 762	ffvelcdmd 7062	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑑‘𝑋) ∈ ℕ0)
804	803	nn0ge0d 12542	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 0 ≤ (𝑑‘𝑋))
805	804	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 0 ≤ (𝑑‘𝑋))
806	801, 805	eqbrtrd 5121	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑢‘𝑋) ≤ (𝑑‘𝑋))
807	806	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑋) ≤ (𝑑‘𝑋))
808	175, 800, 807	pm2.61ne 3041	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ≤ (𝑑‘𝑖))
809	808	ralrimiva 3153	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖))
810	65	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑑 Fn 𝐼)
811	810	adantr 484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑑 Fn 𝐼)
812		eqidd 2762	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
813	773, 811, 778, 778, 72, 779, 812	ofrfval 7666	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → (𝑢 ∘r ≤ 𝑑 ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ (𝑑‘𝑖)))
814	809, 813	mpbird 259	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ (𝑢‘𝑋) = 0) → 𝑢 ∘r ≤ 𝑑)
815	814	ex 416	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑢‘𝑋) = 0 → 𝑢 ∘r ≤ 𝑑))
816	767	simprd 499	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))} → ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))
817	816	adantl 485	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))
818		imnan 403	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝑢 ∘r ≤ 𝑑 → ¬ (𝑢‘𝑋) = 0) ↔ ¬ (𝑢 ∘r ≤ 𝑑 ∧ (𝑢‘𝑋) = 0))
819	817, 818	sylibr 236	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘r ≤ 𝑑 → ¬ (𝑢‘𝑋) = 0))
820	819	con2d 134	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑢‘𝑋) = 0 → ¬ 𝑢 ∘r ≤ 𝑑))
821	815, 820	pm2.65d 198	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ¬ (𝑢‘𝑋) = 0)
822	821	neqned 2963	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢‘𝑋) ≠ 0)
823	763, 822, 191	sylanbrc 592	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢‘𝑋) ∈ ℕ)
824	823	nnge1d 12258	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 1 ≤ (𝑢‘𝑋))
825	824	adantr 484	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → 1 ≤ (𝑢‘𝑋))
826	173	breq2d 5111	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 = 𝑋 → (1 ≤ (𝑢‘𝑖) ↔ 1 ≤ (𝑢‘𝑋)))
827	825, 826	syl5ibrcom 249	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑖 = 𝑋 → 1 ≤ (𝑢‘𝑖)))
828	827	imp 410	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) ∧ 𝑖 = 𝑋) → 1 ≤ (𝑢‘𝑖))
829	761	ffvelcdmda 7061	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℕ0)
830	829	nn0ge0d 12542	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → 0 ≤ (𝑢‘𝑖))
831	830	adantr 484	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) ∧ ¬ 𝑖 = 𝑋) → 0 ≤ (𝑢‘𝑖))
832	828, 831	ifpimpda 1091	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → if-(𝑖 = 𝑋, 1 ≤ (𝑢‘𝑖), 0 ≤ (𝑢‘𝑖)))
833		brif1 7489	. . . . . . . . . . . . . . . . . . 19 ⊢ (if(𝑖 = 𝑋, 1, 0) ≤ (𝑢‘𝑖) ↔ if-(𝑖 = 𝑋, 1 ≤ (𝑢‘𝑖), 0 ≤ (𝑢‘𝑖)))
834	832, 833	sylibr 236	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ≤ (𝑢‘𝑖))
835	834	ralrimiva 3153	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ∀𝑖 ∈ 𝐼 if(𝑖 = 𝑋, 1, 0) ≤ (𝑢‘𝑖))
836	69	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) Fn 𝐼)
837	13	ad2antrr 736	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝐼 ∈ V)
838	78	adantl 485	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))‘𝑖) = if(𝑖 = 𝑋, 1, 0))
839		eqidd 2762	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) = (𝑢‘𝑖))
840	836, 772, 837, 837, 72, 838, 839	ofrfval 7666	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘r ≤ 𝑢 ↔ ∀𝑖 ∈ 𝐼 if(𝑖 = 𝑋, 1, 0) ≤ (𝑢‘𝑖)))
841	835, 840	mpbird 259	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘r ≤ 𝑢)
842	14	psrbagcon 21957	. . . . . . . . . . . . . . . 16 ⊢ ((𝑢 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)):𝐼⟶ℕ0 ∧ (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)) ∘r ≤ 𝑢) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∧ (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑢))
843	758, 759, 841, 842	syl3anc 1389	. . . . . . . . . . . . . . 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 ≤ 𝑢))
844	843	simpld 498	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin})
845		eqidd 2762	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) = (𝑑‘𝑖))
846	810, 836, 837, 837, 72, 845, 838	ofval 7667	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → ((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
847	772, 776, 837, 837, 72, 839, 846	ofrfval 7666	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
848	769, 847	mpbid 234	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ∀𝑖 ∈ 𝐼 (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
849	848	r19.21bi 3253	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0)))
850	829	nn0red 12540	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℝ)
851	60	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℝ)
852	802	ffvelcdmda 7061	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℕ0)
853	852	nn0red 12540	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑑‘𝑖) ∈ ℝ)
854	850, 851, 853	lesubaddd 11781	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) ≤ (𝑑‘𝑖) ↔ (𝑢‘𝑖) ≤ ((𝑑‘𝑖) + if(𝑖 = 𝑋, 1, 0))))
855	849, 854	mpbird 259	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) ≤ (𝑑‘𝑖))
856	855	ralrimiva 3153	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ∀𝑖 ∈ 𝐼 ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) ≤ (𝑑‘𝑖))
857	772, 836, 837, 837, 72	offn 7669	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) Fn 𝐼)
858	772, 836, 837, 837, 72, 839, 838	ofval 7667	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))‘𝑖) = ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)))
859	857, 810, 837, 837, 72, 858, 845	ofrfval 7666	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑 ↔ ∀𝑖 ∈ 𝐼 ((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) ≤ (𝑑‘𝑖)))
860	856, 859	mpbird 259	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘r ≤ 𝑑)
861	756, 844, 860	elrabd 3652	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})
862	829	nn0cnd 12541	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (𝑢‘𝑖) ∈ ℂ)
863	237	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → if(𝑖 = 𝑋, 1, 0) ∈ ℂ)
864	862, 863	npcand 11543	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) ∧ 𝑖 ∈ 𝐼) → (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0)) = (𝑢‘𝑖))
865	864	mpteq2dva 5192	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → (𝑖 ∈ 𝐼 ↦ (((𝑢‘𝑖) − if(𝑖 = 𝑋, 1, 0)) + if(𝑖 = 𝑋, 1, 0))) = (𝑖 ∈ 𝐼 ↦ (𝑢‘𝑖)))
866	857, 836, 837, 837, 72, 858, 838	offval 7665	. . . . . . . . . . . . . 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))))
867	761	feqmptd 6931	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 = (𝑖 ∈ 𝐼 ↦ (𝑢‘𝑖)))
868	865, 866, 867	3eqtr4rd 2807	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}) → 𝑢 = ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
869		oveq1 7399	. . . . . . . . . . . . . 14 ⊢ (𝑚 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) = ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))
870	869	eqeq2d 2772	. . . . . . . . . . . . 13 ⊢ (𝑚 = (𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) → (𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ 𝑢 = ((𝑢 ∘f − (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))))
871	755, 861, 868, 870	rspceb2dv 3585	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (∃𝑚 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}𝑢 = (𝑚 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ↔ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}))
872	456, 720, 871	3bitrd 307	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↔ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}))
873	872	eqrdv 2759	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))})
874		difrab 4270	. . . . . . . . . 10 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) = {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∧ ¬ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0))}
875	873, 874	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)}))
876		difssd 4090	. . . . . . . . 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)))})
877	875, 876	eqsstrd 3970	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))})
878	704, 877, 113	fmptssfisupp 9337	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ ( ∘f + “ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} × {(𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))})) ↦ ((𝑢‘𝑋)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))) finSupp (0g‘𝑅))
879		difss 4089	. . . . . . . . . 10 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ⊆ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}
880		disjdif 4425	. . . . . . . . . 10 ⊢ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∩ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) = ∅
881		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 ≤ 𝑑})) = ∅)
882	879, 880, 881	mp2an 702	. . . . . . . . 9 ⊢ (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)}) ∩ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑})) = ∅
883	882	ineqcomi 4163	. . . . . . . 8 ⊢ (({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ (𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) ∩ ({𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ∖ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ (𝑘 ∘r ≤ 𝑑 ∧ (𝑘‘𝑋) = 0)})) = ∅
884	883	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)})) = ∅)
885	279, 99	psdmullem 22210	. . . . . . . 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)}))
886	875, 885	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)})))
887	1, 104, 2, 6, 697, 700, 878, 884, 886	gsumsplit2 19952	. . . . . 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 − 𝑢))))))))
888	693, 887	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 − 𝑢))))))))
889	427, 593, 888	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 − 𝑢))))))))
890	417	adantr 484	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺) ∈ 𝐵)
891	9, 10, 34, 385, 14, 386, 890, 7	psrmulval 21976	. . . . 5 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → ((𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))‘𝑑) = (𝑅 Σg (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ ((𝐹‘𝑢)(.r‘𝑅)((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢))))))
892	41	ad2antrr 736	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → 𝐺 ∈ 𝐵)
893	9, 10, 14, 285, 892, 247	psdcoef 22205	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢)) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))))
894	267	fveq2d 6867	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (𝐺‘((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0)))) = (𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))
895	894	oveq2d 7408	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f − 𝑢) ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))))) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))
896	893, 895	eqtrd 2796	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢)) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))
897	896	oveq2d 7408	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝐹‘𝑢)(.r‘𝑅)((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢))) = ((𝐹‘𝑢)(.r‘𝑅)((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
898	309	nn0zd 12590	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → (((𝑑 ∘f − 𝑢)‘𝑋) + 1) ∈ ℤ)
899	1, 22, 34	mulgass3 20381	. . . . . . . . 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 − 𝑢)))))
900	224, 898, 228, 271, 899	syl13anc 1390	. . . . . . . 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 − 𝑢)))))
901	897, 900	eqtrd 2796	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) ∧ 𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑}) → ((𝐹‘𝑢)(.r‘𝑅)((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢))) = ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢)))))
902	901	mpteq2dva 5192	. . . . . 6 ⊢ ((𝜑 ∧ 𝑑 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin}) → (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ ((𝐹‘𝑢)(.r‘𝑅)((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺)‘(𝑑 ∘f − 𝑢)))) = (𝑢 ∈ {𝑘 ∈ {ℎ ∈ (ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} ∣ 𝑘 ∘r ≤ 𝑑} ↦ ((((𝑑 ∘f − 𝑢)‘𝑋) + 1)(.g‘𝑅)((𝐹‘𝑢)(.r‘𝑅)(𝐺‘((𝑑 ∘f + (𝑦 ∈ 𝐼 ↦ if(𝑦 = 𝑋, 1, 0))) ∘f − 𝑢))))))
903	902	oveq2d 7408	. . . . 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 − 𝑢)))))))
904	1, 2, 6, 221, 321, 275, 282	gsummptfidmsplit 19953	. . . . 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 − 𝑢))))))))
905	891, 903, 904	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 − 𝑢))))))))
906	421, 423, 424, 424, 425, 889, 905	offval 7665	. . 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 − 𝑢))))))))))
907	419, 906	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 − 𝑢))))))))))
908	410, 412, 907	3eqtr4d 2806	1 ⊢ (𝜑 → (((𝐼 mPSDer 𝑅)‘𝑋)‘(𝐹 · 𝐺)) = (((((𝐼 mPSDer 𝑅)‘𝑋)‘𝐹) · 𝐺) + (𝐹 · (((𝐼 mPSDer 𝑅)‘𝑋)‘𝐺))))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 399   ∨ wo 858  if-wif 1073   ∧ w3a 1097   = wceq 1559   ∈ wcel 2141   ≠ wne 2956  ∀wral 3075  ∃wrex 3085  {crab 3413  Vcvv 3453   ∖ cdif 3901   ∪ cun 3902   ∩ cin 3903   ⊆ wss 3904  ∅c0 4285  ifcif 4479  {csn 4581   class class class wbr 5099   ↦ cmpt 5180   × cxp 5643  ^◡ccnv 5644  dom cdm 5645   “ cima 5648   ∘ ccom 5649  Fun wfun 6511   Fn wfn 6512  ⟶wf 6513  ‘cfv 6517  (class class class)co 7392   ∘_f cof 7654   ∘_r cofr 7655   ↑_m cmap 8803  Fincfn 8923  ℂcc 11068  ℝcr 11069  0cc0 11070  1c1 11071   + caddc 11073   < clt 11213   ≤ cle 11214   − cmin 11411  ℕcn 12207  ℕ₀cn0 12478  ℤcz 12565  ..^cfzo 13656  Basecbs 17228  +_gcplusg 17269  ._rcmulr 17270  0_gc0g 17451   Σ_g cgsu 17452  Mndcmnd 18751  Grpcgrp 18958  ._gcmg 19092  CMndccmn 19803  Ringcrg 20262  CRingccrg 20263   mPwSer cmps 21936   mPSDer cpsd 22179

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5226  ax-sep 5245  ax-nul 5255  ax-pow 5321  ax-pr 5389  ax-un 7714  ax-cnex 11126  ax-resscn 11127  ax-1cn 11128  ax-icn 11129  ax-addcl 11130  ax-addrcl 11131  ax-mulcl 11132  ax-mulrcl 11133  ax-mulcom 11134  ax-addass 11135  ax-mulass 11136  ax-distr 11137  ax-i2m1 11138  ax-1ne0 11139  ax-1rid 11140  ax-rnegex 11141  ax-rrecex 11142  ax-cnre 11143  ax-pre-lttri 11144  ax-pre-lttrn 11145  ax-pre-ltadd 11146  ax-pre-mulgt0 11147

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-ifp 1074  df-3or 1098  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3061  df-ral 3076  df-rex 3086  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4582  df-pr 4584  df-tp 4586  df-op 4588  df-uni 4865  df-int 4905  df-iun 4950  df-iin 4951  df-br 5100  df-opab 5162  df-mpt 5181  df-tr 5207  df-id 5540  df-eprel 5545  df-po 5553  df-so 5554  df-fr 5598  df-se 5599  df-we 5600  df-xp 5651  df-rel 5652  df-cnv 5653  df-co 5654  df-dm 5655  df-rn 5656  df-res 5657  df-ima 5658  df-pred 6284  df-ord 6345  df-on 6346  df-lim 6347  df-suc 6348  df-iota 6473  df-fun 6519  df-fn 6520  df-f 6521  df-f1 6522  df-fo 6523  df-f1o 6524  df-fv 6525  df-isom 6526  df-riota 7349  df-ov 7395  df-oprab 7396  df-mpo 7397  df-of 7656  df-ofr 7657  df-om 7843  df-1st 7966  df-2nd 7967  df-supp 8136  df-tpos 8201  df-frecs 8257  df-wrecs 8288  df-recs 8337  df-rdg 8376  df-1o 8432  df-2o 8433  df-er 8673  df-map 8805  df-pm 8806  df-ixp 8876  df-en 8924  df-dom 8925  df-sdom 8926  df-fin 8927  df-fsupp 9305  df-oi 9455  df-card 9894  df-pnf 11215  df-mnf 11216  df-xr 11217  df-ltxr 11218  df-le 11219  df-sub 11413  df-neg 11414  df-nn 12208  df-2 12277  df-3 12278  df-4 12279  df-5 12280  df-6 12281  df-7 12282  df-8 12283  df-9 12284  df-n0 12479  df-z 12566  df-uz 12837  df-fz 13510  df-fzo 13657  df-seq 14012  df-hash 14341  df-struct 17166  df-sets 17183  df-slot 17201  df-ndx 17213  df-base 17229  df-ress 17250  df-plusg 17282  df-mulr 17283  df-sca 17285  df-vsca 17286  df-tset 17288  df-0g 17453  df-gsum 17454  df-mre 17597  df-mrc 17598  df-acs 17600  df-mgm 18657  df-sgrp 18736  df-mnd 18752  df-mhm 18800  df-submnd 18801  df-grp 18961  df-minusg 18962  df-mulg 19093  df-ghm 19237  df-cntz 19340  df-cmn 19805  df-abl 19806  df-mgp 20170  df-rng 20182  df-ur 20211  df-ring 20264  df-cring 20265  df-oppr 20365  df-psr 21941  df-psd 22201

This theorem is referenced by:  psd1  22212  psdpw  22215