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 15915

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 13530	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑁 ∈ (𝑀...𝑁))
3	1, 2	syl 17	. 2 ⊢ (𝜑 → 𝑁 ∈ (𝑀...𝑁))
4		fveq2 6861	. . . . 5 ⊢ (𝑚 = 𝑀 → (seq𝑀( · , 𝐺)‘𝑚) = (seq𝑀( · , 𝐺)‘𝑀))
5		fveq2 6861	. . . . . 6 ⊢ (𝑚 = 𝑀 → (seq𝑀( · , 𝐹)‘𝑚) = (seq𝑀( · , 𝐹)‘𝑀))
6	5	oveq2d 7406	. . . . 5 ⊢ (𝑚 = 𝑀 → (1 / (seq𝑀( · , 𝐹)‘𝑚)) = (1 / (seq𝑀( · , 𝐹)‘𝑀)))
7	4, 6	eqeq12d 2777	. . . 4 ⊢ (𝑚 = 𝑀 → ((seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚)) ↔ (seq𝑀( · , 𝐺)‘𝑀) = (1 / (seq𝑀( · , 𝐹)‘𝑀))))
8	7	imbi2d 342	. . 3 ⊢ (𝑚 = 𝑀 → ((𝜑 → (seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚))) ↔ (𝜑 → (seq𝑀( · , 𝐺)‘𝑀) = (1 / (seq𝑀( · , 𝐹)‘𝑀)))))
9		fveq2 6861	. . . . 5 ⊢ (𝑚 = 𝑛 → (seq𝑀( · , 𝐺)‘𝑚) = (seq𝑀( · , 𝐺)‘𝑛))
10		fveq2 6861	. . . . . 6 ⊢ (𝑚 = 𝑛 → (seq𝑀( · , 𝐹)‘𝑚) = (seq𝑀( · , 𝐹)‘𝑛))
11	10	oveq2d 7406	. . . . 5 ⊢ (𝑚 = 𝑛 → (1 / (seq𝑀( · , 𝐹)‘𝑚)) = (1 / (seq𝑀( · , 𝐹)‘𝑛)))
12	9, 11	eqeq12d 2777	. . . 4 ⊢ (𝑚 = 𝑛 → ((seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚)) ↔ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))))
13	12	imbi2d 342	. . 3 ⊢ (𝑚 = 𝑛 → ((𝜑 → (seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚))) ↔ (𝜑 → (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛)))))
14		fveq2 6861	. . . . 5 ⊢ (𝑚 = (𝑛 + 1) → (seq𝑀( · , 𝐺)‘𝑚) = (seq𝑀( · , 𝐺)‘(𝑛 + 1)))
15		fveq2 6861	. . . . . 6 ⊢ (𝑚 = (𝑛 + 1) → (seq𝑀( · , 𝐹)‘𝑚) = (seq𝑀( · , 𝐹)‘(𝑛 + 1)))
16	15	oveq2d 7406	. . . . 5 ⊢ (𝑚 = (𝑛 + 1) → (1 / (seq𝑀( · , 𝐹)‘𝑚)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))))
17	14, 16	eqeq12d 2777	. . . 4 ⊢ (𝑚 = (𝑛 + 1) → ((seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚)) ↔ (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1)))))
18	17	imbi2d 342	. . 3 ⊢ (𝑚 = (𝑛 + 1) → ((𝜑 → (seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚))) ↔ (𝜑 → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))))))
19		fveq2 6861	. . . . 5 ⊢ (𝑚 = 𝑁 → (seq𝑀( · , 𝐺)‘𝑚) = (seq𝑀( · , 𝐺)‘𝑁))
20		fveq2 6861	. . . . . 6 ⊢ (𝑚 = 𝑁 → (seq𝑀( · , 𝐹)‘𝑚) = (seq𝑀( · , 𝐹)‘𝑁))
21	20	oveq2d 7406	. . . . 5 ⊢ (𝑚 = 𝑁 → (1 / (seq𝑀( · , 𝐹)‘𝑚)) = (1 / (seq𝑀( · , 𝐹)‘𝑁)))
22	19, 21	eqeq12d 2777	. . . 4 ⊢ (𝑚 = 𝑁 → ((seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚)) ↔ (seq𝑀( · , 𝐺)‘𝑁) = (1 / (seq𝑀( · , 𝐹)‘𝑁))))
23	22	imbi2d 342	. . 3 ⊢ (𝑚 = 𝑁 → ((𝜑 → (seq𝑀( · , 𝐺)‘𝑚) = (1 / (seq𝑀( · , 𝐹)‘𝑚))) ↔ (𝜑 → (seq𝑀( · , 𝐺)‘𝑁) = (1 / (seq𝑀( · , 𝐹)‘𝑁)))))
24		eluzfz1 13529	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑀 ∈ (𝑀...𝑁))
25	1, 24	syl 17	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ (𝑀...𝑁))
26		fveq2 6861	. . . . . . . . 9 ⊢ (𝑘 = 𝑀 → (𝐺‘𝑘) = (𝐺‘𝑀))
27		fveq2 6861	. . . . . . . . . 10 ⊢ (𝑘 = 𝑀 → (𝐹‘𝑘) = (𝐹‘𝑀))
28	27	oveq2d 7406	. . . . . . . . 9 ⊢ (𝑘 = 𝑀 → (1 / (𝐹‘𝑘)) = (1 / (𝐹‘𝑀)))
29	26, 28	eqeq12d 2777	. . . . . . . 8 ⊢ (𝑘 = 𝑀 → ((𝐺‘𝑘) = (1 / (𝐹‘𝑘)) ↔ (𝐺‘𝑀) = (1 / (𝐹‘𝑀))))
30	29	imbi2d 342	. . . . . . 7 ⊢ (𝑘 = 𝑀 → ((𝜑 → (𝐺‘𝑘) = (1 / (𝐹‘𝑘))) ↔ (𝜑 → (𝐺‘𝑀) = (1 / (𝐹‘𝑀)))))
31		prodfrec.4	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐺‘𝑘) = (1 / (𝐹‘𝑘)))
32	31	expcom 417	. . . . . . 7 ⊢ (𝑘 ∈ (𝑀...𝑁) → (𝜑 → (𝐺‘𝑘) = (1 / (𝐹‘𝑘))))
33	30, 32	vtoclga 3540	. . . . . 6 ⊢ (𝑀 ∈ (𝑀...𝑁) → (𝜑 → (𝐺‘𝑀) = (1 / (𝐹‘𝑀))))
34	25, 33	mpcom 38	. . . . 5 ⊢ (𝜑 → (𝐺‘𝑀) = (1 / (𝐹‘𝑀)))
35		eluzel2 12837	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → 𝑀 ∈ ℤ)
36	1, 35	syl 17	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ ℤ)
37		seq1 14020	. . . . . 6 ⊢ (𝑀 ∈ ℤ → (seq𝑀( · , 𝐺)‘𝑀) = (𝐺‘𝑀))
38	36, 37	syl 17	. . . . 5 ⊢ (𝜑 → (seq𝑀( · , 𝐺)‘𝑀) = (𝐺‘𝑀))
39		seq1 14020	. . . . . . 7 ⊢ (𝑀 ∈ ℤ → (seq𝑀( · , 𝐹)‘𝑀) = (𝐹‘𝑀))
40	36, 39	syl 17	. . . . . 6 ⊢ (𝜑 → (seq𝑀( · , 𝐹)‘𝑀) = (𝐹‘𝑀))
41	40	oveq2d 7406	. . . . 5 ⊢ (𝜑 → (1 / (seq𝑀( · , 𝐹)‘𝑀)) = (1 / (𝐹‘𝑀)))
42	34, 38, 41	3eqtr4d 2806	. . . 4 ⊢ (𝜑 → (seq𝑀( · , 𝐺)‘𝑀) = (1 / (seq𝑀( · , 𝐹)‘𝑀)))
43	42	a1i 11	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘𝑀) → (𝜑 → (seq𝑀( · , 𝐺)‘𝑀) = (1 / (seq𝑀( · , 𝐹)‘𝑀))))
44		oveq1 7397	. . . . . . . . 9 ⊢ ((seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛)) → ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))) = ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))))
45	44	3ad2ant3 1147	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))) = ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))))
46		fzofzp1 13763	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝑛 + 1) ∈ (𝑀...𝑁))
47		fveq2 6861	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑛 + 1) → (𝐺‘𝑘) = (𝐺‘(𝑛 + 1)))
48		fveq2 6861	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = (𝑛 + 1) → (𝐹‘𝑘) = (𝐹‘(𝑛 + 1)))
49	48	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑛 + 1) → (1 / (𝐹‘𝑘)) = (1 / (𝐹‘(𝑛 + 1))))
50	47, 49	eqeq12d 2777	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = (𝑛 + 1) → ((𝐺‘𝑘) = (1 / (𝐹‘𝑘)) ↔ (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1)))))
51	50	imbi2d 342	. . . . . . . . . . . . . 14 ⊢ (𝑘 = (𝑛 + 1) → ((𝜑 → (𝐺‘𝑘) = (1 / (𝐹‘𝑘))) ↔ (𝜑 → (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1))))))
52	51, 32	vtoclga 3540	. . . . . . . . . . . . 13 ⊢ ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝜑 → (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1)))))
53	46, 52	syl 17	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝜑 → (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1)))))
54	53	impcom 411	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (𝐺‘(𝑛 + 1)) = (1 / (𝐹‘(𝑛 + 1))))
55	54	oveq2d 7406	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))) = ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (1 / (𝐹‘(𝑛 + 1)))))
56		1cnd 11168	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → 1 ∈ ℂ)
57		elfzouz 13662	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ (𝑀..^𝑁) → 𝑛 ∈ (ℤ_≥‘𝑀))
58	57	adantl 485	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → 𝑛 ∈ (ℤ_≥‘𝑀))
59		elfzouz2 13673	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ (𝑀..^𝑁) → 𝑁 ∈ (ℤ_≥‘𝑛))
60		fzss2 13562	. . . . . . . . . . . . . . . . 17 ⊢ (𝑁 ∈ (ℤ_≥‘𝑛) → (𝑀...𝑛) ⊆ (𝑀...𝑁))
61	59, 60	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝑀...𝑛) ⊆ (𝑀...𝑁))
62	61	sselda 3934	. . . . . . . . . . . . . . 15 ⊢ ((𝑛 ∈ (𝑀..^𝑁) ∧ 𝑘 ∈ (𝑀...𝑛)) → 𝑘 ∈ (𝑀...𝑁))
63		prodfn0.2	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘𝑘) ∈ ℂ)
64	62, 63	sylan2 602	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑛 ∈ (𝑀..^𝑁) ∧ 𝑘 ∈ (𝑀...𝑛))) → (𝐹‘𝑘) ∈ ℂ)
65	64	anassrs 471	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) ∧ 𝑘 ∈ (𝑀...𝑛)) → (𝐹‘𝑘) ∈ ℂ)
66		mulcl 11150	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (𝑘 · 𝑥) ∈ ℂ)
67	66	adantl 485	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) ∧ (𝑘 ∈ ℂ ∧ 𝑥 ∈ ℂ)) → (𝑘 · 𝑥) ∈ ℂ)
68	58, 65, 67	seqcl 14028	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (seq𝑀( · , 𝐹)‘𝑛) ∈ ℂ)
69	48	eleq1d 2846	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑛 + 1) → ((𝐹‘𝑘) ∈ ℂ ↔ (𝐹‘(𝑛 + 1)) ∈ ℂ))
70	69	imbi2d 342	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = (𝑛 + 1) → ((𝜑 → (𝐹‘𝑘) ∈ ℂ) ↔ (𝜑 → (𝐹‘(𝑛 + 1)) ∈ ℂ)))
71	63	expcom 417	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ (𝑀...𝑁) → (𝜑 → (𝐹‘𝑘) ∈ ℂ))
72	70, 71	vtoclga 3540	. . . . . . . . . . . . . 14 ⊢ ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝜑 → (𝐹‘(𝑛 + 1)) ∈ ℂ))
73	46, 72	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝜑 → (𝐹‘(𝑛 + 1)) ∈ ℂ))
74	73	impcom 411	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (𝐹‘(𝑛 + 1)) ∈ ℂ)
75		prodfn0.3	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...𝑁)) → (𝐹‘𝑘) ≠ 0)
76	62, 75	sylan2 602	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑛 ∈ (𝑀..^𝑁) ∧ 𝑘 ∈ (𝑀...𝑛))) → (𝐹‘𝑘) ≠ 0)
77	76	anassrs 471	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) ∧ 𝑘 ∈ (𝑀...𝑛)) → (𝐹‘𝑘) ≠ 0)
78	58, 65, 77	prodfn0 15914	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (seq𝑀( · , 𝐹)‘𝑛) ≠ 0)
79	48	neeq1d 3015	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = (𝑛 + 1) → ((𝐹‘𝑘) ≠ 0 ↔ (𝐹‘(𝑛 + 1)) ≠ 0))
80	79	imbi2d 342	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = (𝑛 + 1) → ((𝜑 → (𝐹‘𝑘) ≠ 0) ↔ (𝜑 → (𝐹‘(𝑛 + 1)) ≠ 0)))
81	75	expcom 417	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ (𝑀...𝑁) → (𝜑 → (𝐹‘𝑘) ≠ 0))
82	80, 81	vtoclga 3540	. . . . . . . . . . . . . 14 ⊢ ((𝑛 + 1) ∈ (𝑀...𝑁) → (𝜑 → (𝐹‘(𝑛 + 1)) ≠ 0))
83	46, 82	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (𝜑 → (𝐹‘(𝑛 + 1)) ≠ 0))
84	83	impcom 411	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → (𝐹‘(𝑛 + 1)) ≠ 0)
85	56, 68, 56, 74, 78, 84	divmuldivd 12001	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (1 / (𝐹‘(𝑛 + 1)))) = ((1 · 1) / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
86		1t1e1 12372	. . . . . . . . . . . 12 ⊢ (1 · 1) = 1
87	86	oveq1i 7400	. . . . . . . . . . 11 ⊢ ((1 · 1) / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1))))
88	85, 87	eqtrdi 2812	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (1 / (𝐹‘(𝑛 + 1)))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
89	55, 88	eqtrd 2796	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁)) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
90	89	3adant3 1144	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → ((1 / (seq𝑀( · , 𝐹)‘𝑛)) · (𝐺‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
91	45, 90	eqtrd 2796	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
92		seqp1 14022	. . . . . . . . 9 ⊢ (𝑛 ∈ (ℤ_≥‘𝑀) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))))
93	57, 92	syl 17	. . . . . . . 8 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))))
94	93	3ad2ant2 1146	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐺)‘𝑛) · (𝐺‘(𝑛 + 1))))
95		seqp1 14022	. . . . . . . . . 10 ⊢ (𝑛 ∈ (ℤ_≥‘𝑀) → (seq𝑀( · , 𝐹)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1))))
96	57, 95	syl 17	. . . . . . . . 9 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (seq𝑀( · , 𝐹)‘(𝑛 + 1)) = ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1))))
97	96	oveq2d 7406	. . . . . . . 8 ⊢ (𝑛 ∈ (𝑀..^𝑁) → (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
98	97	3ad2ant2 1146	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))) = (1 / ((seq𝑀( · , 𝐹)‘𝑛) · (𝐹‘(𝑛 + 1)))))
99	91, 94, 98	3eqtr4d 2806	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (𝑀..^𝑁) ∧ (seq𝑀( · , 𝐺)‘𝑛) = (1 / (seq𝑀( · , 𝐹)‘𝑛))) → (seq𝑀( · , 𝐺)‘(𝑛 + 1)) = (1 / (seq𝑀( · , 𝐹)‘(𝑛 + 1))))
100	99	3exp 1131	. . . . 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 13787	. 2 ⊢ (𝑁 ∈ (𝑀...𝑁) → (𝜑 → (seq𝑀( · , 𝐺)‘𝑁) = (1 / (seq𝑀( · , 𝐹)‘𝑁))))
104	3, 103	mpcom 38	1 ⊢ (𝜑 → (seq𝑀( · , 𝐺)‘𝑁) = (1 / (seq𝑀( · , 𝐹)‘𝑁)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 399 ∧ w3a 1097 = wceq 1559 ∈ wcel 2141 ≠ wne 2956 ⊆ wss 3902 ‘cfv 6515 (class class class)co 7390 ℂcc 11064 0cc0 11066 1c1 11067 + caddc 11069 · cmul 11071 / cdiv 11837 ℤcz 12561 ℤ_≥cuz 12832 ...cfz 13505 ..^cfzo 13652 seqcseq 14007

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-sep 5243 ax-nul 5253 ax-pow 5319 ax-pr 5387 ax-un 7712 ax-cnex 11122 ax-resscn 11123 ax-1cn 11124 ax-icn 11125 ax-addcl 11126 ax-addrcl 11127 ax-mulcl 11128 ax-mulrcl 11129 ax-mulcom 11130 ax-addass 11131 ax-mulass 11132 ax-distr 11133 ax-i2m1 11134 ax-1ne0 11135 ax-1rid 11136 ax-rnegex 11137 ax-rrecex 11138 ax-cnre 11139 ax-pre-lttri 11140 ax-pre-lttrn 11141 ax-pre-ltadd 11142 ax-pre-mulgt0 11143

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 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 3743 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4284 df-if 4478 df-pw 4554 df-sn 4580 df-pr 4582 df-op 4586 df-uni 4863 df-iun 4948 df-br 5098 df-opab 5160 df-mpt 5179 df-tr 5205 df-id 5538 df-eprel 5543 df-po 5551 df-so 5552 df-fr 5596 df-we 5598 df-xp 5649 df-rel 5650 df-cnv 5651 df-co 5652 df-dm 5653 df-rn 5654 df-res 5655 df-ima 5656 df-pred 6282 df-ord 6343 df-on 6344 df-lim 6345 df-suc 6346 df-iota 6471 df-fun 6517 df-fn 6518 df-f 6519 df-f1 6520 df-fo 6521 df-f1o 6522 df-fv 6523 df-riota 7347 df-ov 7393 df-oprab 7394 df-mpo 7395 df-om 7841 df-1st 7964 df-2nd 7965 df-frecs 8255 df-wrecs 8286 df-recs 8335 df-rdg 8374 df-er 8671 df-en 8921 df-dom 8922 df-sdom 8923 df-pnf 11211 df-mnf 11212 df-xr 11213 df-ltxr 11214 df-le 11215 df-sub 11409 df-neg 11410 df-div 11838 df-nn 12204 df-n0 12475 df-z 12562 df-uz 12833 df-fz 13506 df-fzo 13653 df-seq 14008

This theorem is referenced by: prodfdiv 15916

W3C validator