Theorem seqof 14062

Description: Distribute function operation through a sequence. Note that 𝐺(𝑧) is an implicit function on 𝑧. (Contributed by Mario Carneiro, 3-Mar-2015.)

Hypotheses

Ref	Expression
seqof.1	⊢ (𝜑 → 𝐴 ∈ 𝑉)
seqof.2	⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘𝑀))
seqof.3	⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) = (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)))

Assertion

Ref	Expression
seqof	⊢ (𝜑 → (seq𝑀( ∘f + , 𝐹)‘𝑁) = (𝑧 ∈ 𝐴 ↦ (seq𝑀( + , 𝐺)‘𝑁)))

Distinct variable groups:   𝑥,𝑧,𝐴   𝑥,𝐹,𝑧   𝑥,𝐺   𝑥,𝑀,𝑧   𝑥,𝑁,𝑧   𝑥, + ,𝑧   𝜑,𝑥,𝑧

Allowed substitution hints:   𝐺(𝑧)   𝑉(𝑥,𝑧)

Proof of Theorem seqof

Dummy variables 𝑦 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		seqof.2	. . . . 5 ⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘𝑀))
2		fvex 6869	. . . . . . . . 9 ⊢ (𝐺‘𝑥) ∈ V
3	2	rgenw 3074	. . . . . . . 8 ⊢ ∀𝑧 ∈ 𝐴 (𝐺‘𝑥) ∈ V
4		eqid 2756	. . . . . . . . 9 ⊢ (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)) = (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥))
5	4	fnmpt 6650	. . . . . . . 8 ⊢ (∀𝑧 ∈ 𝐴 (𝐺‘𝑥) ∈ V → (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)) Fn 𝐴)
6	3, 5	mp1i 13	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)) Fn 𝐴)
7		seqof.3	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) = (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)))
8	7	fneq1d 6603	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹‘𝑥) Fn 𝐴 ↔ (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)) Fn 𝐴))
9	6, 8	mpbird 259	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) Fn 𝐴)
10		fvex 6869	. . . . . . 7 ⊢ (𝐹‘𝑥) ∈ V
11		fneq1 6601	. . . . . . 7 ⊢ (𝑧 = (𝐹‘𝑥) → (𝑧 Fn 𝐴 ↔ (𝐹‘𝑥) Fn 𝐴))
12	10, 11	elab 3633	. . . . . 6 ⊢ ((𝐹‘𝑥) ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ (𝐹‘𝑥) Fn 𝐴)
13	9, 12	sylibr 236	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
14		simprl 778	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → 𝑥 Fn 𝐴)
15		simprr 780	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → 𝑦 Fn 𝐴)
16		seqof.1	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
17	16	adantr 483	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → 𝐴 ∈ 𝑉)
18		inidm 4173	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐴) = 𝐴
19	14, 15, 17, 17, 18	offn 7662	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → (𝑥 ∘f + 𝑦) Fn 𝐴)
20	19	ex 415	. . . . . . 7 ⊢ (𝜑 → ((𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴) → (𝑥 ∘f + 𝑦) Fn 𝐴))
21		vex 3452	. . . . . . . . 9 ⊢ 𝑥 ∈ V
22		fneq1 6601	. . . . . . . . 9 ⊢ (𝑧 = 𝑥 → (𝑧 Fn 𝐴 ↔ 𝑥 Fn 𝐴))
23	21, 22	elab 3633	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ 𝑥 Fn 𝐴)
24		vex 3452	. . . . . . . . 9 ⊢ 𝑦 ∈ V
25		fneq1 6601	. . . . . . . . 9 ⊢ (𝑧 = 𝑦 → (𝑧 Fn 𝐴 ↔ 𝑦 Fn 𝐴))
26	24, 25	elab 3633	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ 𝑦 Fn 𝐴)
27	23, 26	anbi12i 636	. . . . . . 7 ⊢ ((𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴}) ↔ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴))
28		ovex 7418	. . . . . . . 8 ⊢ (𝑥 ∘f + 𝑦) ∈ V
29		fneq1 6601	. . . . . . . 8 ⊢ (𝑧 = (𝑥 ∘f + 𝑦) → (𝑧 Fn 𝐴 ↔ (𝑥 ∘f + 𝑦) Fn 𝐴))
30	28, 29	elab 3633	. . . . . . 7 ⊢ ((𝑥 ∘f + 𝑦) ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ (𝑥 ∘f + 𝑦) Fn 𝐴)
31	20, 27, 30	3imtr4g 298	. . . . . 6 ⊢ (𝜑 → ((𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴}) → (𝑥 ∘f + 𝑦) ∈ {𝑧 ∣ 𝑧 Fn 𝐴}))
32	31	imp 409	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴})) → (𝑥 ∘f + 𝑦) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
33	1, 13, 32	seqcl 14025	. . . 4 ⊢ (𝜑 → (seq𝑀( ∘f + , 𝐹)‘𝑁) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
34		fvex 6869	. . . . 5 ⊢ (seq𝑀( ∘f + , 𝐹)‘𝑁) ∈ V
35		fneq1 6601	. . . . 5 ⊢ (𝑧 = (seq𝑀( ∘f + , 𝐹)‘𝑁) → (𝑧 Fn 𝐴 ↔ (seq𝑀( ∘f + , 𝐹)‘𝑁) Fn 𝐴))
36	34, 35	elab 3633	. . . 4 ⊢ ((seq𝑀( ∘f + , 𝐹)‘𝑁) ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ (seq𝑀( ∘f + , 𝐹)‘𝑁) Fn 𝐴)
37	33, 36	sylib 220	. . 3 ⊢ (𝜑 → (seq𝑀( ∘f + , 𝐹)‘𝑁) Fn 𝐴)
38		dffn5 6914	. . 3 ⊢ ((seq𝑀( ∘f + , 𝐹)‘𝑁) Fn 𝐴 ↔ (seq𝑀( ∘f + , 𝐹)‘𝑁) = (𝑧 ∈ 𝐴 ↦ ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧)))
39	37, 38	sylib 220	. 2 ⊢ (𝜑 → (seq𝑀( ∘f + , 𝐹)‘𝑁) = (𝑧 ∈ 𝐴 ↦ ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧)))
40		fveq1 6855	. . . . . 6 ⊢ (𝑤 = (seq𝑀( ∘f + , 𝐹)‘𝑁) → (𝑤‘𝑧) = ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧))
41		eqid 2756	. . . . . 6 ⊢ (𝑤 ∈ V ↦ (𝑤‘𝑧)) = (𝑤 ∈ V ↦ (𝑤‘𝑧))
42		fvex 6869	. . . . . 6 ⊢ ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧) ∈ V
43	40, 41, 42	fvmpt 6964	. . . . 5 ⊢ ((seq𝑀( ∘f + , 𝐹)‘𝑁) ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(seq𝑀( ∘f + , 𝐹)‘𝑁)) = ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧))
44	34, 43	mp1i 13	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(seq𝑀( ∘f + , 𝐹)‘𝑁)) = ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧))
45	32	adantlr 723	. . . . 5 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ (𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴})) → (𝑥 ∘f + 𝑦) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
46	13	adantlr 723	. . . . 5 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
47	1	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → 𝑁 ∈ (ℤ≥‘𝑀))
48		eqidd 2757	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) ∧ 𝑧 ∈ 𝐴) → (𝑥‘𝑧) = (𝑥‘𝑧))
49		eqidd 2757	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) ∧ 𝑧 ∈ 𝐴) → (𝑦‘𝑧) = (𝑦‘𝑧))
50	14, 15, 17, 17, 18, 48, 49	ofval 7660	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) ∧ 𝑧 ∈ 𝐴) → ((𝑥 ∘f + 𝑦)‘𝑧) = ((𝑥‘𝑧) + (𝑦‘𝑧)))
51	50	an32s 660	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → ((𝑥 ∘f + 𝑦)‘𝑧) = ((𝑥‘𝑧) + (𝑦‘𝑧)))
52		fveq1 6855	. . . . . . . . 9 ⊢ (𝑤 = (𝑥 ∘f + 𝑦) → (𝑤‘𝑧) = ((𝑥 ∘f + 𝑦)‘𝑧))
53		fvex 6869	. . . . . . . . 9 ⊢ ((𝑥 ∘f + 𝑦)‘𝑧) ∈ V
54	52, 41, 53	fvmpt 6964	. . . . . . . 8 ⊢ ((𝑥 ∘f + 𝑦) ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝑥 ∘f + 𝑦)) = ((𝑥 ∘f + 𝑦)‘𝑧))
55	28, 54	ax-mp 5	. . . . . . 7 ⊢ ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝑥 ∘f + 𝑦)) = ((𝑥 ∘f + 𝑦)‘𝑧)
56		fveq1 6855	. . . . . . . . . 10 ⊢ (𝑤 = 𝑥 → (𝑤‘𝑧) = (𝑥‘𝑧))
57		fvex 6869	. . . . . . . . . 10 ⊢ (𝑥‘𝑧) ∈ V
58	56, 41, 57	fvmpt 6964	. . . . . . . . 9 ⊢ (𝑥 ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) = (𝑥‘𝑧))
59	58	elv 3453	. . . . . . . 8 ⊢ ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) = (𝑥‘𝑧)
60		fveq1 6855	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑤‘𝑧) = (𝑦‘𝑧))
61		fvex 6869	. . . . . . . . . 10 ⊢ (𝑦‘𝑧) ∈ V
62	60, 41, 61	fvmpt 6964	. . . . . . . . 9 ⊢ (𝑦 ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦) = (𝑦‘𝑧))
63	62	elv 3453	. . . . . . . 8 ⊢ ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦) = (𝑦‘𝑧)
64	59, 63	oveq12i 7397	. . . . . . 7 ⊢ (((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) + ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦)) = ((𝑥‘𝑧) + (𝑦‘𝑧))
65	51, 55, 64	3eqtr4g 2816	. . . . . 6 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝑥 ∘f + 𝑦)) = (((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) + ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦)))
66	27, 65	sylan2b 602	. . . . 5 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ (𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴})) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝑥 ∘f + 𝑦)) = (((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) + ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦)))
67		fveq1 6855	. . . . . . . 8 ⊢ (𝑤 = (𝐹‘𝑥) → (𝑤‘𝑧) = ((𝐹‘𝑥)‘𝑧))
68		fvex 6869	. . . . . . . 8 ⊢ ((𝐹‘𝑥)‘𝑧) ∈ V
69	67, 41, 68	fvmpt 6964	. . . . . . 7 ⊢ ((𝐹‘𝑥) ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝐹‘𝑥)) = ((𝐹‘𝑥)‘𝑧))
70	10, 69	ax-mp 5	. . . . . 6 ⊢ ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝐹‘𝑥)) = ((𝐹‘𝑥)‘𝑧)
71	7	adantlr 723	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) = (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)))
72	71	fveq1d 6858	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹‘𝑥)‘𝑧) = ((𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥))‘𝑧))
73		simplr 776	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑧 ∈ 𝐴)
74	4	fvmpt2 6976	. . . . . . . 8 ⊢ ((𝑧 ∈ 𝐴 ∧ (𝐺‘𝑥) ∈ V) → ((𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥))‘𝑧) = (𝐺‘𝑥))
75	73, 2, 74	sylancl 594	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥))‘𝑧) = (𝐺‘𝑥))
76	72, 75	eqtrd 2791	. . . . . 6 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹‘𝑥)‘𝑧) = (𝐺‘𝑥))
77	70, 76	eqtrid 2803	. . . . 5 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝐹‘𝑥)) = (𝐺‘𝑥))
78	45, 46, 47, 66, 77	seqhomo 14052	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(seq𝑀( ∘f + , 𝐹)‘𝑁)) = (seq𝑀( + , 𝐺)‘𝑁))
79	44, 78	eqtr3d 2793	. . 3 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧) = (seq𝑀( + , 𝐺)‘𝑁))
80	79	mpteq2dva 5187	. 2 ⊢ (𝜑 → (𝑧 ∈ 𝐴 ↦ ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧)) = (𝑧 ∈ 𝐴 ↦ (seq𝑀( + , 𝐺)‘𝑁)))
81	39, 80	eqtrd 2791	1 ⊢ (𝜑 → (seq𝑀( ∘f + , 𝐹)‘𝑁) = (𝑧 ∈ 𝐴 ↦ (seq𝑀( + , 𝐺)‘𝑁)))

Syntax hints:   → wi 4   ∧ wa 398   = wceq 1554   ∈ wcel 2136  {cab 2734  ∀wral 3070  Vcvv 3448   ↦ cmpt 5175   Fn wfn 6505  ‘cfv 6510  (class class class)co 7385   ∘_f cof 7647  ℤ_≥cuz 12829  ...cfz 13502  seqcseq 14004

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1809  ax-4 1823  ax-5 1924  ax-6 1981  ax-7 2022  ax-8 2138  ax-9 2146  ax-10 2169  ax-11 2185  ax-12 2206  ax-ext 2728  ax-rep 5221  ax-sep 5240  ax-nul 5250  ax-pow 5316  ax-pr 5384  ax-un 7707  ax-cnex 11119  ax-resscn 11120  ax-1cn 11121  ax-icn 11122  ax-addcl 11123  ax-addrcl 11124  ax-mulcl 11125  ax-mulrcl 11126  ax-mulcom 11127  ax-addass 11128  ax-mulass 11129  ax-distr 11130  ax-i2m1 11131  ax-1ne0 11132  ax-1rid 11133  ax-rnegex 11134  ax-rrecex 11135  ax-cnre 11136  ax-pre-lttri 11137  ax-pre-lttrn 11138  ax-pre-ltadd 11139  ax-pre-mulgt0 11140

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3or 1096  df-3an 1097  df-tru 1557  df-fal 1567  df-ex 1794  df-nf 1798  df-sb 2085  df-mo 2560  df-eu 2590  df-clab 2735  df-cleq 2748  df-clel 2831  df-nfc 2905  df-ne 2952  df-nel 3056  df-ral 3071  df-rex 3081  df-reu 3362  df-rab 3409  df-v 3450  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4281  df-if 4475  df-pw 4551  df-sn 4577  df-pr 4579  df-op 4583  df-uni 4860  df-iun 4945  df-br 5095  df-opab 5157  df-mpt 5176  df-tr 5202  df-id 5535  df-eprel 5540  df-po 5548  df-so 5549  df-fr 5593  df-we 5595  df-xp 5646  df-rel 5647  df-cnv 5648  df-co 5649  df-dm 5650  df-rn 5651  df-res 5652  df-ima 5653  df-pred 6277  df-ord 6338  df-on 6339  df-lim 6340  df-suc 6341  df-iota 6466  df-fun 6512  df-fn 6513  df-f 6514  df-f1 6515  df-fo 6516  df-f1o 6517  df-fv 6518  df-riota 7342  df-ov 7388  df-oprab 7389  df-mpo 7390  df-of 7649  df-om 7836  df-1st 7959  df-2nd 7960  df-frecs 8250  df-wrecs 8281  df-recs 8330  df-rdg 8369  df-er 8666  df-en 8917  df-dom 8918  df-sdom 8919  df-pnf 11208  df-mnf 11209  df-xr 11210  df-ltxr 11211  df-le 11212  df-sub 11406  df-neg 11407  df-nn 12201  df-n0 12472  df-z 12559  df-uz 12830  df-fz 13503  df-seq 14005

This theorem is referenced by:  seqof2  14063  mtest  26437  pserulm  26455  knoppcnlem7  36885