prodfrec - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > prodfrec		Structured version Visualization version GIF version

Theorem prodfrec 15535

Description: The reciprocal of an infinite product. (Contributed by Scott Fenton, 15-Jan-2018.)

**Hypotheses**
Ref	Expression
prodfn0.1	⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘𝑀))
prodfn0.2	⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘𝑘) ∈ ℂ)
prodfn0.3	⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘𝑘) ≠ 0)
prodfrec.4	⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐺‘𝑘) = (1 / (𝐹‘𝑘)))

**Assertion**
Ref	Expression
prodfrec	⊢ (𝜑 → (seq𝑀( · , 𝐺)‘𝑁) = (1 / (seq𝑀( · , 𝐹)‘𝑁)))

Distinct variable groups: 𝑘,𝐹 𝜑,𝑘 𝑘,𝑀 𝑘,𝑁 𝑘,𝐺

Proof of Theorem prodfrec Dummy variables 𝑚 𝑛 𝑥 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		prodfn0.1	. . 3 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘𝑀))
2		eluzfz2 13193	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑁 ∈ (𝑀...𝑁))
3	1, 2	syl 17	. 2 ⊢ (𝜑 → 𝑁 ∈ (𝑀...𝑁))
4		fveq2 6756	. . . . 5 ⊢ (𝑚 = 𝑀 → (seq𝑀( · , 𝐺)‘𝑚) = (seq𝑀( · , 𝐺)‘𝑀))
5		fveq2 6756	. . . . . 6 ⊢ (𝑚 = 𝑀 → (seq𝑀( · , 𝐹)‘𝑚) = (seq𝑀( · , 𝐹)‘𝑀))
6	5	oveq2d 7271	. . . . 5 ⊢ (𝑚 = 𝑀 → (1 / (seq𝑀( · , 𝐹)‘𝑚)) = (1 / (seq𝑀( · , 𝐹)‘𝑀)))
7	4, 6	eqeq12d 2754	. . . 4 ⊢ (𝑚 = 𝑀 → ((seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚)) ↔ (seq𝑀( · , 𝐺)‘𝑀) = (1 / (seq𝑀( · , 𝐹)‘𝑀))))
8	7	imbi2d 340	. . 3 ⊢ (𝑚 = 𝑀 → ((𝜑 → (seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚))) ↔ (𝜑 → (seq𝑀( · , 𝐺)‘𝑀) = (1 / (seq𝑀( · , 𝐹)‘𝑀)))))
9		fveq2 6756	. . . . 5 ⊢ (𝑚 = 𝑛 → (seq𝑀( · , 𝐺)‘𝑚) = (seq𝑀( · , 𝐺)‘𝑛))
10		fveq2 6756	. . . . . 6 ⊢ (𝑚 = 𝑛 → (seq𝑀( · , 𝐹)‘𝑚) = (seq𝑀( · , 𝐹)‘𝑛))
11	10	oveq2d 7271	. . . . 5 ⊢ (𝑚 = 𝑛 → (1 / (seq𝑀( · , 𝐹)‘𝑚)) = (1 / (seq𝑀( · , 𝐹)‘𝑛)))
12	9, 11	eqeq12d 2754	. . . 4 ⊢ (𝑚 = 𝑛 → ((seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚)) ↔ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))))
13	12	imbi2d 340	. . 3 ⊢ (𝑚 = 𝑛 → ((𝜑 → (seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚))) ↔ (𝜑 → (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛)))))
14		fveq2 6756	. . . . 5 ⊢ (𝑚 = (𝑛 + 1) → (seq𝑀( · , 𝐺)‘𝑚) = (seq𝑀( · , 𝐺)‘(𝑛 + 1)))
15		fveq2 6756	. . . . . 6 ⊢ (𝑚 = (𝑛 + 1) → (seq𝑀( · , 𝐹)‘𝑚) = (seq𝑀( · , 𝐹)‘(𝑛 + 1)))
16	15	oveq2d 7271	. . . . 5 ⊢ (𝑚 = (𝑛 + 1) → (1 / (seq𝑀( · , 𝐹)‘𝑚)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))))
17	14, 16	eqeq12d 2754	. . . 4 ⊢ (𝑚 = (𝑛 + 1) → ((seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚)) ↔ (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1)))))
18	17	imbi2d 340	. . 3 ⊢ (𝑚 = (𝑛 + 1) → ((𝜑 → (seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚))) ↔ (𝜑 → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))))))
19		fveq2 6756	. . . . 5 ⊢ (𝑚 = 𝑁 → (seq𝑀( · , 𝐺)‘𝑚) = (seq𝑀( · , 𝐺)‘𝑁))
20		fveq2 6756	. . . . . 6 ⊢ (𝑚 = 𝑁 → (seq𝑀( · , 𝐹)‘𝑚) = (seq𝑀( · , 𝐹)‘𝑁))
21	20	oveq2d 7271	. . . . 5 ⊢ (𝑚 = 𝑁 → (1 / (seq𝑀( · , 𝐹)‘𝑚)) = (1 / (seq𝑀( · , 𝐹)‘𝑁)))
22	19, 21	eqeq12d 2754	. . . 4 ⊢ (𝑚 = 𝑁 → ((seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚)) ↔ (seq𝑀( · , 𝐺)‘𝑁) = (1 / (seq𝑀( · , 𝐹)‘𝑁))))
23	22	imbi2d 340	. . 3 ⊢ (𝑚 = 𝑁 → ((𝜑 → (seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚))) ↔ (𝜑 → (seq𝑀( · , 𝐺)‘𝑁) = (1 / (seq𝑀( · , 𝐹)‘𝑁)))))
24		eluzfz1 13192	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑀 ∈ (𝑀...𝑁))
25	1, 24	syl 17	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ (𝑀...𝑁))
26		fveq2 6756	. . . . . . . . 9 ⊢ (𝑘 = 𝑀 → (𝐺‘𝑘) = (𝐺‘𝑀))
27		fveq2 6756	. . . . . . . . . 10 ⊢ (𝑘 = 𝑀 → (𝐹‘𝑘) = (𝐹‘𝑀))
28	27	oveq2d 7271	. . . . . . . . 9 ⊢ (𝑘 = 𝑀 → (1 / (𝐹‘𝑘)) = (1 / (𝐹‘𝑀)))
29	26, 28	eqeq12d 2754	. . . . . . . 8 ⊢ (𝑘 = 𝑀 → ((𝐺‘𝑘) = (1 / (𝐹‘𝑘)) ↔ (𝐺‘𝑀) = (1 / (𝐹‘𝑀))))
30	29	imbi2d 340	. . . . . . 7 ⊢ (𝑘 = 𝑀 → ((𝜑 → (𝐺‘𝑘) = (1 / (𝐹‘𝑘))) ↔ (𝜑 → (𝐺‘𝑀) = (1 / (𝐹‘𝑀)))))
31		prodfrec.4	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐺‘𝑘) = (1 / (𝐹‘𝑘)))
32	31	expcom 413	. . . . . . 7 ⊢ (𝑘 ∈ (𝑀...𝑁) → (𝜑 → (𝐺‘𝑘) = (1 / (𝐹‘𝑘))))
33	30, 32	vtoclga 3503	. . . . . 6 ⊢ (𝑀 ∈ (𝑀...𝑁) → (𝜑 → (𝐺‘𝑀) = (1 / (𝐹‘𝑀))))
34	25, 33	mpcom 38	. . . . 5 ⊢ (𝜑 → (𝐺‘𝑀) = (1 / (𝐹‘𝑀)))
35		eluzel2 12516	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑀 ∈ ℤ)
36	1, 35	syl 17	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ ℤ)
37		seq1 13662	. . . . . 6 ⊢ (𝑀 ∈ ℤ → (seq𝑀( · , 𝐺)‘𝑀) = (𝐺‘𝑀))
38	36, 37	syl 17	. . . . 5 ⊢ (𝜑 → (seq𝑀( · , 𝐺)‘𝑀) = (𝐺‘𝑀))
39		seq1 13662	. . . . . . 7 ⊢ (𝑀 ∈ ℤ → (seq𝑀( · , 𝐹)‘𝑀) = (𝐹‘𝑀))
40	36, 39	syl 17	. . . . . 6 ⊢ (𝜑 → (seq𝑀( · , 𝐹)‘𝑀) = (𝐹‘𝑀))
41	40	oveq2d 7271	. . . . 5 ⊢ (𝜑 → (1 / (seq𝑀( · , 𝐹)‘𝑀)) = (1 / (𝐹‘𝑀)))
42	34, 38, 41	3eqtr4d 2788	. . . 4 ⊢ (𝜑 → (seq𝑀( · , 𝐺)‘𝑀) = (1 / (seq𝑀( · , 𝐹)‘𝑀)))
43	42	a1i 11	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → (𝜑 → (seq𝑀( · , 𝐺)‘𝑀) = (1 / (seq𝑀( · , 𝐹)‘𝑀))))
44		oveq1 7262	. . . . . . . . 9 ⊢ ((seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛)) → ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))) = ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))))
45	44	3ad2ant3 1133	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))) = ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))))
46		fzofzp1 13412	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝑛 + 1) ∈ (𝑀...𝑁))
47		fveq2 6756	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑛 + 1) → (𝐺‘𝑘) = (𝐺‘(𝑛 + 1)))
48		fveq2 6756	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = (𝑛 + 1) → (𝐹‘𝑘) = (𝐹‘(𝑛 + 1)))
49	48	oveq2d 7271	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑛 + 1) → (1 / (𝐹‘𝑘)) = (1 / (𝐹‘(𝑛 + 1))))
50	47, 49	eqeq12d 2754	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = (𝑛 + 1) → ((𝐺‘𝑘) = (1 / (𝐹‘𝑘)) ↔ (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1)))))
51	50	imbi2d 340	. . . . . . . . . . . . . 14 ⊢ (𝑘 = (𝑛 + 1) → ((𝜑 → (𝐺‘𝑘) = (1 / (𝐹‘𝑘))) ↔ (𝜑 → (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1))))))
52	51, 32	vtoclga 3503	. . . . . . . . . . . . 13 ⊢ ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝜑 → (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1)))))
53	46, 52	syl 17	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝜑 → (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1)))))
54	53	impcom 407	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1))))
55	54	oveq2d 7271	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))) = ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (1 / (𝐹‘(𝑛 + 1)))))
56		1cnd 10901	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → 1 ∈ ℂ)
57		elfzouz 13320	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ (𝑀..^𝑁) → 𝑛 ∈ (ℤ_≥‘𝑀))
58	57	adantl 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → 𝑛 ∈ (ℤ_≥‘𝑀))
59		elfzouz2 13330	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ (𝑀..^𝑁) → 𝑁 ∈ (ℤ_≥‘𝑛))
60		fzss2 13225	. . . . . . . . . . . . . . . . 17 ⊢ (𝑁 ∈ (ℤ_≥‘𝑛) → (𝑀...𝑛) ⊆ (𝑀...𝑁))
61	59, 60	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝑀...𝑛) ⊆ (𝑀...𝑁))
62	61	sselda 3917	. . . . . . . . . . . . . . 15 ⊢ ((𝑛 ∈ (𝑀..^𝑁) ∧ 𝑘 ∈ (𝑀...𝑛)) → 𝑘 ∈ (𝑀...𝑁))
63		prodfn0.2	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘𝑘) ∈ ℂ)
64	62, 63	sylan2 592	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑛 ∈ (𝑀..^𝑁) ∧ 𝑘 ∈ (𝑀...𝑛))) → (𝐹‘𝑘) ∈ ℂ)
65	64	anassrs 467	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) ∧ 𝑘 ∈ (𝑀...𝑛)) → (𝐹‘𝑘) ∈ ℂ)
66		mulcl 10886	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (𝑘 · 𝑥) ∈ ℂ)
67	66	adantl 481	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ)) → (𝑘 · 𝑥) ∈ ℂ)
68	58, 65, 67	seqcl 13671	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (seq𝑀( · , 𝐹)‘𝑛) ∈ ℂ)
69	48	eleq1d 2823	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑛 + 1) → ((𝐹‘𝑘) ∈ ℂ ↔ (𝐹‘(𝑛 + 1)) ∈ ℂ))
70	69	imbi2d 340	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = (𝑛 + 1) → ((𝜑 → (𝐹‘𝑘) ∈ ℂ) ↔ (𝜑 → (𝐹‘(𝑛 + 1)) ∈ ℂ)))
71	63	expcom 413	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ (𝑀...𝑁) → (𝜑 → (𝐹‘𝑘) ∈ ℂ))
72	70, 71	vtoclga 3503	. . . . . . . . . . . . . 14 ⊢ ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝜑 → (𝐹‘(𝑛 + 1)) ∈ ℂ))
73	46, 72	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝜑 → (𝐹‘(𝑛 + 1)) ∈ ℂ))
74	73	impcom 407	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (𝐹‘(𝑛 + 1)) ∈ ℂ)
75		prodfn0.3	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘𝑘) ≠ 0)
76	62, 75	sylan2 592	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑛 ∈ (𝑀..^𝑁) ∧ 𝑘 ∈ (𝑀...𝑛))) → (𝐹‘𝑘) ≠ 0)
77	76	anassrs 467	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) ∧ 𝑘 ∈ (𝑀...𝑛)) → (𝐹‘𝑘) ≠ 0)
78	58, 65, 77	prodfn0 15534	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (seq𝑀( · , 𝐹)‘𝑛) ≠ 0)
79	48	neeq1d 3002	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑛 + 1) → ((𝐹‘𝑘) ≠ 0 ↔ (𝐹‘(𝑛 + 1)) ≠ 0))
80	79	imbi2d 340	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = (𝑛 + 1) → ((𝜑 → (𝐹‘𝑘) ≠ 0) ↔ (𝜑 → (𝐹‘(𝑛 + 1)) ≠ 0)))
81	75	expcom 413	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ (𝑀...𝑁) → (𝜑 → (𝐹‘𝑘) ≠ 0))
82	80, 81	vtoclga 3503	. . . . . . . . . . . . . 14 ⊢ ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝜑 → (𝐹‘(𝑛 + 1)) ≠ 0))
83	46, 82	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝜑 → (𝐹‘(𝑛 + 1)) ≠ 0))
84	83	impcom 407	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (𝐹‘(𝑛 + 1)) ≠ 0)
85	56, 68, 56, 74, 78, 84	divmuldivd 11722	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (1 / (𝐹‘(𝑛 + 1)))) = ((1 · 1) / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
86		1t1e1 12065	. . . . . . . . . . . 12 ⊢ (1 · 1) = 1
87	86	oveq1i 7265	. . . . . . . . . . 11 ⊢ ((1 · 1) / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1))))
88	85, 87	eqtrdi 2795	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (1 / (𝐹‘(𝑛 + 1)))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
89	55, 88	eqtrd 2778	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
90	89	3adant3 1130	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
91	45, 90	eqtrd 2778	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
92		seqp1 13664	. . . . . . . . 9 ⊢ (𝑛 ∈ (ℤ_≥‘𝑀) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))))
93	57, 92	syl 17	. . . . . . . 8 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))))
94	93	3ad2ant2 1132	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))))
95		seqp1 13664	. . . . . . . . . 10 ⊢ (𝑛 ∈ (ℤ_≥‘𝑀) → (seq𝑀( · , 𝐹)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1))))
96	57, 95	syl 17	. . . . . . . . 9 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (seq𝑀( · , 𝐹)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1))))
97	96	oveq2d 7271	. . . . . . . 8 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
98	97	3ad2ant2 1132	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
99	91, 94, 98	3eqtr4d 2788	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))))
100	99	3exp 1117	. . . . 5 ⊢ (𝜑 → (𝑛 ∈ (𝑀..^𝑁) → ((seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛)) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))))))
101	100	com12 32	. . . 4 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝜑 → ((seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛)) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))))))
102	101	a2d 29	. . 3 ⊢ (𝑛 ∈ (𝑀..^𝑁) → ((𝜑 → (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → (𝜑 → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))))))
103	8, 13, 18, 23, 43, 102	fzind2 13433	. 2 ⊢ (𝑁 ∈ (𝑀...𝑁) → (𝜑 → (seq𝑀( · , 𝐺)‘𝑁) = (1 / (seq𝑀( · , 𝐹)‘𝑁))))
104	3, 103	mpcom 38	1 ⊢ (𝜑 → (seq𝑀( · , 𝐺)‘𝑁) = (1 / (seq𝑀( · , 𝐹)‘𝑁)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 ∧ w3a 1085 = wceq 1539 ∈ wcel 2108 ≠ wne 2942 ⊆ wss 3883 ‘cfv 6418 (class class class)co 7255 ℂcc 10800 0cc0 10802 1c1 10803 + caddc 10805 · cmul 10807 / cdiv 11562 ℤcz 12249 ℤ_≥cuz 12511 ...cfz 13168 ..^cfzo 13311 seqcseq 13649

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1799 ax-4 1813 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2110 ax-9 2118 ax-10 2139 ax-11 2156 ax-12 2173 ax-ext 2709 ax-sep 5218 ax-nul 5225 ax-pow 5283 ax-pr 5347 ax-un 7566 ax-cnex 10858 ax-resscn 10859 ax-1cn 10860 ax-icn 10861 ax-addcl 10862 ax-addrcl 10863 ax-mulcl 10864 ax-mulrcl 10865 ax-mulcom 10866 ax-addass 10867 ax-mulass 10868 ax-distr 10869 ax-i2m1 10870 ax-1ne0 10871 ax-1rid 10872 ax-rnegex 10873 ax-rrecex 10874 ax-cnre 10875 ax-pre-lttri 10876 ax-pre-lttrn 10877 ax-pre-ltadd 10878 ax-pre-mulgt0 10879

This theorem depends on definitions: df-bi 206 df-an 396 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1784 df-nf 1788 df-sb 2069 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2817 df-nfc 2888 df-ne 2943 df-nel 3049 df-ral 3068 df-rex 3069 df-reu 3070 df-rmo 3071 df-rab 3072 df-v 3424 df-sbc 3712 df-csb 3829 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3902 df-nul 4254 df-if 4457 df-pw 4532 df-sn 4559 df-pr 4561 df-tp 4563 df-op 4565 df-uni 4837 df-iun 4923 df-br 5071 df-opab 5133 df-mpt 5154 df-tr 5188 df-id 5480 df-eprel 5486 df-po 5494 df-so 5495 df-fr 5535 df-we 5537 df-xp 5586 df-rel 5587 df-cnv 5588 df-co 5589 df-dm 5590 df-rn 5591 df-res 5592 df-ima 5593 df-pred 6191 df-ord 6254 df-on 6255 df-lim 6256 df-suc 6257 df-iota 6376 df-fun 6420 df-fn 6421 df-f 6422 df-f1 6423 df-fo 6424 df-f1o 6425 df-fv 6426 df-riota 7212 df-ov 7258 df-oprab 7259 df-mpo 7260 df-om 7688 df-1st 7804 df-2nd 7805 df-frecs 8068 df-wrecs 8099 df-recs 8173 df-rdg 8212 df-er 8456 df-en 8692 df-dom 8693 df-sdom 8694 df-pnf 10942 df-mnf 10943 df-xr 10944 df-ltxr 10945 df-le 10946 df-sub 11137 df-neg 11138 df-div 11563 df-nn 11904 df-n0 12164 df-z 12250 df-uz 12512 df-fz 13169 df-fzo 13312 df-seq 13650

This theorem is referenced by: prodfdiv 15536

W3C validator