Theorem seqof 13965

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 6855	. . . . . . . . 9 ⊢ (𝐺‘𝑥) ∈ V
3	2	rgenw 3068	. . . . . . . 8 ⊢ ∀𝑧 ∈ 𝐴 (𝐺‘𝑥) ∈ V
4		eqid 2736	. . . . . . . . 9 ⊢ (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)) = (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥))
5	4	fnmpt 6641	. . . . . . . 8 ⊢ (∀𝑧 ∈ 𝐴 (𝐺‘𝑥) ∈ V → (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)) Fn 𝐴)
6	3, 5	mp1i 13	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)) Fn 𝐴)
7		seqof.3	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) = (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)))
8	7	fneq1d 6595	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹‘𝑥) Fn 𝐴 ↔ (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)) Fn 𝐴))
9	6, 8	mpbird 256	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) Fn 𝐴)
10		fvex 6855	. . . . . . 7 ⊢ (𝐹‘𝑥) ∈ V
11		fneq1 6593	. . . . . . 7 ⊢ (𝑧 = (𝐹‘𝑥) → (𝑧 Fn 𝐴 ↔ (𝐹‘𝑥) Fn 𝐴))
12	10, 11	elab 3630	. . . . . 6 ⊢ ((𝐹‘𝑥) ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ (𝐹‘𝑥) Fn 𝐴)
13	9, 12	sylibr 233	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
14		simprl 769	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → 𝑥 Fn 𝐴)
15		simprr 771	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → 𝑦 Fn 𝐴)
16		seqof.1	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
17	16	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → 𝐴 ∈ 𝑉)
18		inidm 4178	. . . . . . . . 9 ⊢ (𝐴 ∩ 𝐴) = 𝐴
19	14, 15, 17, 17, 18	offn 7630	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → (𝑥 ∘f + 𝑦) Fn 𝐴)
20	19	ex 413	. . . . . . 7 ⊢ (𝜑 → ((𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴) → (𝑥 ∘f + 𝑦) Fn 𝐴))
21		vex 3449	. . . . . . . . 9 ⊢ 𝑥 ∈ V
22		fneq1 6593	. . . . . . . . 9 ⊢ (𝑧 = 𝑥 → (𝑧 Fn 𝐴 ↔ 𝑥 Fn 𝐴))
23	21, 22	elab 3630	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ 𝑥 Fn 𝐴)
24		vex 3449	. . . . . . . . 9 ⊢ 𝑦 ∈ V
25		fneq1 6593	. . . . . . . . 9 ⊢ (𝑧 = 𝑦 → (𝑧 Fn 𝐴 ↔ 𝑦 Fn 𝐴))
26	24, 25	elab 3630	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ 𝑦 Fn 𝐴)
27	23, 26	anbi12i 627	. . . . . . 7 ⊢ ((𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴}) ↔ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴))
28		ovex 7390	. . . . . . . 8 ⊢ (𝑥 ∘f + 𝑦) ∈ V
29		fneq1 6593	. . . . . . . 8 ⊢ (𝑧 = (𝑥 ∘f + 𝑦) → (𝑧 Fn 𝐴 ↔ (𝑥 ∘f + 𝑦) Fn 𝐴))
30	28, 29	elab 3630	. . . . . . 7 ⊢ ((𝑥 ∘f + 𝑦) ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ (𝑥 ∘f + 𝑦) Fn 𝐴)
31	20, 27, 30	3imtr4g 295	. . . . . 6 ⊢ (𝜑 → ((𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴}) → (𝑥 ∘f + 𝑦) ∈ {𝑧 ∣ 𝑧 Fn 𝐴}))
32	31	imp 407	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴})) → (𝑥 ∘f + 𝑦) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
33	1, 13, 32	seqcl 13928	. . . 4 ⊢ (𝜑 → (seq𝑀( ∘f + , 𝐹)‘𝑁) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
34		fvex 6855	. . . . 5 ⊢ (seq𝑀( ∘f + , 𝐹)‘𝑁) ∈ V
35		fneq1 6593	. . . . 5 ⊢ (𝑧 = (seq𝑀( ∘f + , 𝐹)‘𝑁) → (𝑧 Fn 𝐴 ↔ (seq𝑀( ∘f + , 𝐹)‘𝑁) Fn 𝐴))
36	34, 35	elab 3630	. . . 4 ⊢ ((seq𝑀( ∘f + , 𝐹)‘𝑁) ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ↔ (seq𝑀( ∘f + , 𝐹)‘𝑁) Fn 𝐴)
37	33, 36	sylib 217	. . 3 ⊢ (𝜑 → (seq𝑀( ∘f + , 𝐹)‘𝑁) Fn 𝐴)
38		dffn5 6901	. . 3 ⊢ ((seq𝑀( ∘f + , 𝐹)‘𝑁) Fn 𝐴 ↔ (seq𝑀( ∘f + , 𝐹)‘𝑁) = (𝑧 ∈ 𝐴 ↦ ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧)))
39	37, 38	sylib 217	. 2 ⊢ (𝜑 → (seq𝑀( ∘f + , 𝐹)‘𝑁) = (𝑧 ∈ 𝐴 ↦ ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧)))
40		fveq1 6841	. . . . . 6 ⊢ (𝑤 = (seq𝑀( ∘f + , 𝐹)‘𝑁) → (𝑤‘𝑧) = ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧))
41		eqid 2736	. . . . . 6 ⊢ (𝑤 ∈ V ↦ (𝑤‘𝑧)) = (𝑤 ∈ V ↦ (𝑤‘𝑧))
42		fvex 6855	. . . . . 6 ⊢ ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧) ∈ V
43	40, 41, 42	fvmpt 6948	. . . . 5 ⊢ ((seq𝑀( ∘f + , 𝐹)‘𝑁) ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(seq𝑀( ∘f + , 𝐹)‘𝑁)) = ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧))
44	34, 43	mp1i 13	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(seq𝑀( ∘f + , 𝐹)‘𝑁)) = ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧))
45	32	adantlr 713	. . . . 5 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ (𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴})) → (𝑥 ∘f + 𝑦) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
46	13	adantlr 713	. . . . 5 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) ∈ {𝑧 ∣ 𝑧 Fn 𝐴})
47	1	adantr 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → 𝑁 ∈ (ℤ≥‘𝑀))
48		eqidd 2737	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) ∧ 𝑧 ∈ 𝐴) → (𝑥‘𝑧) = (𝑥‘𝑧))
49		eqidd 2737	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) ∧ 𝑧 ∈ 𝐴) → (𝑦‘𝑧) = (𝑦‘𝑧))
50	14, 15, 17, 17, 18, 48, 49	ofval 7628	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) ∧ 𝑧 ∈ 𝐴) → ((𝑥 ∘f + 𝑦)‘𝑧) = ((𝑥‘𝑧) + (𝑦‘𝑧)))
51	50	an32s 650	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → ((𝑥 ∘f + 𝑦)‘𝑧) = ((𝑥‘𝑧) + (𝑦‘𝑧)))
52		fveq1 6841	. . . . . . . . 9 ⊢ (𝑤 = (𝑥 ∘f + 𝑦) → (𝑤‘𝑧) = ((𝑥 ∘f + 𝑦)‘𝑧))
53		fvex 6855	. . . . . . . . 9 ⊢ ((𝑥 ∘f + 𝑦)‘𝑧) ∈ V
54	52, 41, 53	fvmpt 6948	. . . . . . . 8 ⊢ ((𝑥 ∘f + 𝑦) ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝑥 ∘f + 𝑦)) = ((𝑥 ∘f + 𝑦)‘𝑧))
55	28, 54	ax-mp 5	. . . . . . 7 ⊢ ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝑥 ∘f + 𝑦)) = ((𝑥 ∘f + 𝑦)‘𝑧)
56		fveq1 6841	. . . . . . . . . 10 ⊢ (𝑤 = 𝑥 → (𝑤‘𝑧) = (𝑥‘𝑧))
57		fvex 6855	. . . . . . . . . 10 ⊢ (𝑥‘𝑧) ∈ V
58	56, 41, 57	fvmpt 6948	. . . . . . . . 9 ⊢ (𝑥 ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) = (𝑥‘𝑧))
59	58	elv 3451	. . . . . . . 8 ⊢ ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) = (𝑥‘𝑧)
60		fveq1 6841	. . . . . . . . . 10 ⊢ (𝑤 = 𝑦 → (𝑤‘𝑧) = (𝑦‘𝑧))
61		fvex 6855	. . . . . . . . . 10 ⊢ (𝑦‘𝑧) ∈ V
62	60, 41, 61	fvmpt 6948	. . . . . . . . 9 ⊢ (𝑦 ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦) = (𝑦‘𝑧))
63	62	elv 3451	. . . . . . . 8 ⊢ ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦) = (𝑦‘𝑧)
64	59, 63	oveq12i 7369	. . . . . . 7 ⊢ (((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) + ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦)) = ((𝑥‘𝑧) + (𝑦‘𝑧))
65	51, 55, 64	3eqtr4g 2801	. . . . . 6 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ (𝑥 Fn 𝐴 ∧ 𝑦 Fn 𝐴)) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝑥 ∘f + 𝑦)) = (((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) + ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦)))
66	27, 65	sylan2b 594	. . . . 5 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ (𝑥 ∈ {𝑧 ∣ 𝑧 Fn 𝐴} ∧ 𝑦 ∈ {𝑧 ∣ 𝑧 Fn 𝐴})) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝑥 ∘f + 𝑦)) = (((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑥) + ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘𝑦)))
67		fveq1 6841	. . . . . . . 8 ⊢ (𝑤 = (𝐹‘𝑥) → (𝑤‘𝑧) = ((𝐹‘𝑥)‘𝑧))
68		fvex 6855	. . . . . . . 8 ⊢ ((𝐹‘𝑥)‘𝑧) ∈ V
69	67, 41, 68	fvmpt 6948	. . . . . . 7 ⊢ ((𝐹‘𝑥) ∈ V → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝐹‘𝑥)) = ((𝐹‘𝑥)‘𝑧))
70	10, 69	ax-mp 5	. . . . . 6 ⊢ ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝐹‘𝑥)) = ((𝐹‘𝑥)‘𝑧)
71	7	adantlr 713	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → (𝐹‘𝑥) = (𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥)))
72	71	fveq1d 6844	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹‘𝑥)‘𝑧) = ((𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥))‘𝑧))
73		simplr 767	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → 𝑧 ∈ 𝐴)
74	4	fvmpt2 6959	. . . . . . . 8 ⊢ ((𝑧 ∈ 𝐴 ∧ (𝐺‘𝑥) ∈ V) → ((𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥))‘𝑧) = (𝐺‘𝑥))
75	73, 2, 74	sylancl 586	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝑧 ∈ 𝐴 ↦ (𝐺‘𝑥))‘𝑧) = (𝐺‘𝑥))
76	72, 75	eqtrd 2776	. . . . . 6 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝐹‘𝑥)‘𝑧) = (𝐺‘𝑥))
77	70, 76	eqtrid 2788	. . . . 5 ⊢ (((𝜑 ∧ 𝑧 ∈ 𝐴) ∧ 𝑥 ∈ (𝑀...𝑁)) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(𝐹‘𝑥)) = (𝐺‘𝑥))
78	45, 46, 47, 66, 77	seqhomo 13955	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → ((𝑤 ∈ V ↦ (𝑤‘𝑧))‘(seq𝑀( ∘f + , 𝐹)‘𝑁)) = (seq𝑀( + , 𝐺)‘𝑁))
79	44, 78	eqtr3d 2778	. . 3 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝐴) → ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧) = (seq𝑀( + , 𝐺)‘𝑁))
80	79	mpteq2dva 5205	. 2 ⊢ (𝜑 → (𝑧 ∈ 𝐴 ↦ ((seq𝑀( ∘f + , 𝐹)‘𝑁)‘𝑧)) = (𝑧 ∈ 𝐴 ↦ (seq𝑀( + , 𝐺)‘𝑁)))
81	39, 80	eqtrd 2776	1 ⊢ (𝜑 → (seq𝑀( ∘f + , 𝐹)‘𝑁) = (𝑧 ∈ 𝐴 ↦ (seq𝑀( + , 𝐺)‘𝑁)))

Syntax hints:   → wi 4   ∧ wa 396   = wceq 1541   ∈ wcel 2106  {cab 2713  ∀wral 3064  Vcvv 3445   ↦ cmpt 5188   Fn wfn 6491  ‘cfv 6496  (class class class)co 7357   ∘_f cof 7615  ℤ_≥cuz 12763  ...cfz 13424  seqcseq 13906

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5242  ax-sep 5256  ax-nul 5263  ax-pow 5320  ax-pr 5384  ax-un 7672  ax-cnex 11107  ax-resscn 11108  ax-1cn 11109  ax-icn 11110  ax-addcl 11111  ax-addrcl 11112  ax-mulcl 11113  ax-mulrcl 11114  ax-mulcom 11115  ax-addass 11116  ax-mulass 11117  ax-distr 11118  ax-i2m1 11119  ax-1ne0 11120  ax-1rid 11121  ax-rnegex 11122  ax-rrecex 11123  ax-cnre 11124  ax-pre-lttri 11125  ax-pre-lttrn 11126  ax-pre-ltadd 11127  ax-pre-mulgt0 11128

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3065  df-rex 3074  df-reu 3354  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-pss 3929  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-op 4593  df-uni 4866  df-iun 4956  df-br 5106  df-opab 5168  df-mpt 5189  df-tr 5223  df-id 5531  df-eprel 5537  df-po 5545  df-so 5546  df-fr 5588  df-we 5590  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-pred 6253  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-riota 7313  df-ov 7360  df-oprab 7361  df-mpo 7362  df-of 7617  df-om 7803  df-1st 7921  df-2nd 7922  df-frecs 8212  df-wrecs 8243  df-recs 8317  df-rdg 8356  df-er 8648  df-en 8884  df-dom 8885  df-sdom 8886  df-pnf 11191  df-mnf 11192  df-xr 11193  df-ltxr 11194  df-le 11195  df-sub 11387  df-neg 11388  df-nn 12154  df-n0 12414  df-z 12500  df-uz 12764  df-fz 13425  df-seq 13907

This theorem is referenced by:  seqof2  13966  mtest  25763  pserulm  25781  knoppcnlem7  34962