Theorem geomcau 38836

Description: If the distance between consecutive points in a sequence is bounded by a geometric sequence, then the sequence is Cauchy. (Contributed by Jeff Madsen, 2-Sep-2009.) (Proof shortened by Mario Carneiro, 5-Jun-2014.)

Hypotheses

Ref	Expression
lmclim2.2	⊢ (𝜑 → 𝐷 ∈ (Met‘𝑋))
lmclim2.3	⊢ (𝜑 → 𝐹:ℕ⟶𝑋)
geomcau.4	⊢ (𝜑 → 𝐴 ∈ ℝ)
geomcau.5	⊢ (𝜑 → 𝐵 ∈ ℝ+)
geomcau.6	⊢ (𝜑 → 𝐵 < 1)
geomcau.7	⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ≤ (𝐴 · (𝐵↑𝑘)))

Assertion

Ref	Expression
geomcau	⊢ (𝜑 → 𝐹 ∈ (Cau‘𝐷))

Distinct variable groups:   𝐷,𝑘   𝑘,𝐹   𝑘,𝑋   𝐴,𝑘   𝐵,𝑘   𝜑,𝑘

Proof of Theorem geomcau

Dummy variables 𝑗 𝑛 𝑥 𝑚 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		nnuz 13017	. . . . . 6 ⊢ ℕ = (ℤ≥‘1)
2		1zzd 12740	. . . . . 6 ⊢ (𝜑 → 1 ∈ ℤ)
3		geomcau.5	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ∈ ℝ+)
4	3	rpcnd 13179	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ ℂ)
5	3	rpred 13177	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ ℝ)
6	3	rpge0d 13181	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ 𝐵)
7	5, 6	absidd 15605	. . . . . . . 8 ⊢ (𝜑 → (abs‘𝐵) = 𝐵)
8		geomcau.6	. . . . . . . 8 ⊢ (𝜑 → 𝐵 < 1)
9	7, 8	eqbrtrd 5130	. . . . . . 7 ⊢ (𝜑 → (abs‘𝐵) < 1)
10	4, 9	expcnv 16048	. . . . . 6 ⊢ (𝜑 → (𝑚 ∈ ℕ0 ↦ (𝐵↑𝑚)) ⇝ 0)
11		geomcau.4	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ∈ ℝ)
12		1re 11321	. . . . . . . . . 10 ⊢ 1 ∈ ℝ
13		resubcl 11635	. . . . . . . . . 10 ⊢ ((1 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (1 − 𝐵) ∈ ℝ)
14	12, 5, 13	sylancr 599	. . . . . . . . 9 ⊢ (𝜑 → (1 − 𝐵) ∈ ℝ)
15		posdif 11822	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ ℝ ∧ 1 ∈ ℝ) → (𝐵 < 1 ↔ 0 < (1 − 𝐵)))
16	5, 12, 15	sylancl 598	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 < 1 ↔ 0 < (1 − 𝐵)))
17	8, 16	mpbid 235	. . . . . . . . 9 ⊢ (𝜑 → 0 < (1 − 𝐵))
18	14, 17	elrpd 13174	. . . . . . . 8 ⊢ (𝜑 → (1 − 𝐵) ∈ ℝ+)
19	11, 18	rerpdivcld 13208	. . . . . . 7 ⊢ (𝜑 → (𝐴 / (1 − 𝐵)) ∈ ℝ)
20	19	recnd 11350	. . . . . 6 ⊢ (𝜑 → (𝐴 / (1 − 𝐵)) ∈ ℂ)
21		nnex 12354	. . . . . . . 8 ⊢ ℕ ∈ V
22	21	mptex 7239	. . . . . . 7 ⊢ (𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵)))) ∈ V
23	22	a1i 11	. . . . . 6 ⊢ (𝜑 → (𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵)))) ∈ V)
24		nnnn0 12626	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ0)
25	24	adantl 487	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ0)
26		oveq2 7438	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → (𝐵↑𝑚) = (𝐵↑𝑛))
27		eqid 2763	. . . . . . . . 9 ⊢ (𝑚 ∈ ℕ0 ↦ (𝐵↑𝑚)) = (𝑚 ∈ ℕ0 ↦ (𝐵↑𝑚))
28		ovex 7463	. . . . . . . . 9 ⊢ (𝐵↑𝑛) ∈ V
29	26, 27, 28	fvmpt 7004	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ0 → ((𝑚 ∈ ℕ0 ↦ (𝐵↑𝑚))‘𝑛) = (𝐵↑𝑛))
30	25, 29	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ0 ↦ (𝐵↑𝑚))‘𝑛) = (𝐵↑𝑛))
31		nnz 12727	. . . . . . . . 9 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℤ)
32		rpexpcl 14236	. . . . . . . . 9 ⊢ ((𝐵 ∈ ℝ+ ∧ 𝑛 ∈ ℤ) → (𝐵↑𝑛) ∈ ℝ+)
33	3, 31, 32	syl2an 608	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐵↑𝑛) ∈ ℝ+)
34	33	rpcnd 13179	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐵↑𝑛) ∈ ℂ)
35	30, 34	eqeltrd 2864	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ0 ↦ (𝐵↑𝑚))‘𝑛) ∈ ℂ)
36	20	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐴 / (1 − 𝐵)) ∈ ℂ)
37	34, 36	mulcomd 11343	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝐵↑𝑛) · (𝐴 / (1 − 𝐵))) = ((𝐴 / (1 − 𝐵)) · (𝐵↑𝑛)))
38	26	oveq1d 7445	. . . . . . . . 9 ⊢ (𝑚 = 𝑛 → ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵))) = ((𝐵↑𝑛) · (𝐴 / (1 − 𝐵))))
39		eqid 2763	. . . . . . . . 9 ⊢ (𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵)))) = (𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵))))
40		ovex 7463	. . . . . . . . 9 ⊢ ((𝐵↑𝑛) · (𝐴 / (1 − 𝐵))) ∈ V
41	38, 39, 40	fvmpt 7004	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ → ((𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵))))‘𝑛) = ((𝐵↑𝑛) · (𝐴 / (1 − 𝐵))))
42	41	adantl 487	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵))))‘𝑛) = ((𝐵↑𝑛) · (𝐴 / (1 − 𝐵))))
43	30	oveq2d 7446	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝐴 / (1 − 𝐵)) · ((𝑚 ∈ ℕ0 ↦ (𝐵↑𝑚))‘𝑛)) = ((𝐴 / (1 − 𝐵)) · (𝐵↑𝑛)))
44	37, 42, 43	3eqtr4d 2808	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵))))‘𝑛) = ((𝐴 / (1 − 𝐵)) · ((𝑚 ∈ ℕ0 ↦ (𝐵↑𝑚))‘𝑛)))
45	1, 2, 10, 20, 23, 35, 44	climmulc2 15819	. . . . 5 ⊢ (𝜑 → (𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵)))) ⇝ ((𝐴 / (1 − 𝐵)) · 0))
46	20	mul01d 11522	. . . . 5 ⊢ (𝜑 → ((𝐴 / (1 − 𝐵)) · 0) = 0)
47	45, 46	breqtrd 5134	. . . 4 ⊢ (𝜑 → (𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵)))) ⇝ 0)
48	33	rpred 13177	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐵↑𝑛) ∈ ℝ)
49	19	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐴 / (1 − 𝐵)) ∈ ℝ)
50	48, 49	remulcld 11352	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝐵↑𝑛) · (𝐴 / (1 − 𝐵))) ∈ ℝ)
51	50	recnd 11350	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((𝐵↑𝑛) · (𝐴 / (1 − 𝐵))) ∈ ℂ)
52	1, 2, 23, 42, 51	clim0c 15689	. . . 4 ⊢ (𝜑 → ((𝑚 ∈ ℕ ↦ ((𝐵↑𝑚) · (𝐴 / (1 − 𝐵)))) ⇝ 0 ↔ ∀𝑥 ∈ ℝ+ ∃𝑗 ∈ ℕ ∀𝑛 ∈ (ℤ≥‘𝑗)(abs‘((𝐵↑𝑛) · (𝐴 / (1 − 𝐵)))) < 𝑥))
53	47, 52	mpbid 235	. . 3 ⊢ (𝜑 → ∀𝑥 ∈ ℝ+ ∃𝑗 ∈ ℕ ∀𝑛 ∈ (ℤ≥‘𝑗)(abs‘((𝐵↑𝑛) · (𝐴 / (1 − 𝐵)))) < 𝑥)
54		nnz 12727	. . . . . . . 8 ⊢ (𝑗 ∈ ℕ → 𝑗 ∈ ℤ)
55	54	adantl 487	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑗 ∈ ℕ) → 𝑗 ∈ ℤ)
56		uzid 12993	. . . . . . 7 ⊢ (𝑗 ∈ ℤ → 𝑗 ∈ (ℤ≥‘𝑗))
57		oveq2 7438	. . . . . . . . . 10 ⊢ (𝑛 = 𝑗 → (𝐵↑𝑛) = (𝐵↑𝑗))
58	57	fvoveq1d 7452	. . . . . . . . 9 ⊢ (𝑛 = 𝑗 → (abs‘((𝐵↑𝑛) · (𝐴 / (1 − 𝐵)))) = (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))))
59	58	breq1d 5116	. . . . . . . 8 ⊢ (𝑛 = 𝑗 → ((abs‘((𝐵↑𝑛) · (𝐴 / (1 − 𝐵)))) < 𝑥 ↔ (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) < 𝑥))
60	59	rspcv 3576	. . . . . . 7 ⊢ (𝑗 ∈ (ℤ≥‘𝑗) → (∀𝑛 ∈ (ℤ≥‘𝑗)(abs‘((𝐵↑𝑛) · (𝐴 / (1 − 𝐵)))) < 𝑥 → (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) < 𝑥))
61	55, 56, 60	3syl 19	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑗 ∈ ℕ) → (∀𝑛 ∈ (ℤ≥‘𝑗)(abs‘((𝐵↑𝑛) · (𝐴 / (1 − 𝐵)))) < 𝑥 → (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) < 𝑥))
62		lmclim2.2	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐷 ∈ (Met‘𝑋))
63	62	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → 𝐷 ∈ (Met‘𝑋))
64		lmclim2.3	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹:ℕ⟶𝑋)
65		simpl 488	. . . . . . . . . . . . 13 ⊢ ((𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗)) → 𝑗 ∈ ℕ)
66		ffvelcdm 7092	. . . . . . . . . . . . 13 ⊢ ((𝐹:ℕ⟶𝑋 ∧ 𝑗 ∈ ℕ) → (𝐹‘𝑗) ∈ 𝑋)
67	64, 65, 66	syl2an 608	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (𝐹‘𝑗) ∈ 𝑋)
68		eluznn 13058	. . . . . . . . . . . . 13 ⊢ ((𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗)) → 𝑛 ∈ ℕ)
69		ffvelcdm 7092	. . . . . . . . . . . . 13 ⊢ ((𝐹:ℕ⟶𝑋 ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ∈ 𝑋)
70	64, 68, 69	syl2an 608	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (𝐹‘𝑛) ∈ 𝑋)
71		metcl 24666	. . . . . . . . . . . 12 ⊢ ((𝐷 ∈ (Met‘𝑋) ∧ (𝐹‘𝑗) ∈ 𝑋 ∧ (𝐹‘𝑛) ∈ 𝑋) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ∈ ℝ)
72	63, 67, 70, 71	syl3anc 1398	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ∈ ℝ)
73		eqid 2763	. . . . . . . . . . . . 13 ⊢ (ℤ≥‘𝑗) = (ℤ≥‘𝑗)
74		nnnn0 12626	. . . . . . . . . . . . . . 15 ⊢ (𝑗 ∈ ℕ → 𝑗 ∈ ℕ0)
75	74	ad2antrl 741	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → 𝑗 ∈ ℕ0)
76	75	nn0zd 12731	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → 𝑗 ∈ ℤ)
77		oveq2 7438	. . . . . . . . . . . . . . . 16 ⊢ (𝑚 = 𝑘 → (𝐵↑𝑚) = (𝐵↑𝑘))
78	77	oveq2d 7446	. . . . . . . . . . . . . . 15 ⊢ (𝑚 = 𝑘 → (𝐴 · (𝐵↑𝑚)) = (𝐴 · (𝐵↑𝑘)))
79		eqid 2763	. . . . . . . . . . . . . . 15 ⊢ (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚))) = (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))
80		ovex 7463	. . . . . . . . . . . . . . 15 ⊢ (𝐴 · (𝐵↑𝑘)) ∈ V
81	78, 79, 80	fvmpt 7004	. . . . . . . . . . . . . 14 ⊢ (𝑘 ∈ (ℤ≥‘𝑗) → ((𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))‘𝑘) = (𝐴 · (𝐵↑𝑘)))
82	81	adantl 487	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → ((𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))‘𝑘) = (𝐴 · (𝐵↑𝑘)))
83	11	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 𝐴 ∈ ℝ)
84	5	ad2antrr 739	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 𝐵 ∈ ℝ)
85		eluznn0 13057	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑗 ∈ ℕ0 ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 𝑘 ∈ ℕ0)
86	75, 85	sylan 592	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 𝑘 ∈ ℕ0)
87	84, 86	reexpcld 14319	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → (𝐵↑𝑘) ∈ ℝ)
88	83, 87	remulcld 11352	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → (𝐴 · (𝐵↑𝑘)) ∈ ℝ)
89	88	recnd 11350	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → (𝐴 · (𝐵↑𝑘)) ∈ ℂ)
90	11	recnd 11350	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐴 ∈ ℂ)
91	90	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → 𝐴 ∈ ℂ)
92	4	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → 𝐵 ∈ ℂ)
93	9	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (abs‘𝐵) < 1)
94		eqid 2763	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐵↑𝑚)) = (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐵↑𝑚))
95		ovex 7463	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐵↑𝑘) ∈ V
96	77, 94, 95	fvmpt 7004	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ (ℤ≥‘𝑗) → ((𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐵↑𝑚))‘𝑘) = (𝐵↑𝑘))
97	96	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → ((𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐵↑𝑚))‘𝑘) = (𝐵↑𝑘))
98	92, 93, 75, 97	geolim2 16055	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → seq𝑗( + , (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐵↑𝑚))) ⇝ ((𝐵↑𝑗) / (1 − 𝐵)))
99	87	recnd 11350	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → (𝐵↑𝑘) ∈ ℂ)
100	97, 99	eqeltrd 2864	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → ((𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐵↑𝑚))‘𝑘) ∈ ℂ)
101	97	oveq2d 7446	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → (𝐴 · ((𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐵↑𝑚))‘𝑘)) = (𝐴 · (𝐵↑𝑘)))
102	82, 101	eqtr4d 2801	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → ((𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))‘𝑘) = (𝐴 · ((𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐵↑𝑚))‘𝑘)))
103	73, 76, 91, 98, 100, 102	isermulc2 15840	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → seq𝑗( + , (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))) ⇝ (𝐴 · ((𝐵↑𝑗) / (1 − 𝐵))))
104	3	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → 𝐵 ∈ ℝ+)
105	104, 76	rpexpcld 14404	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (𝐵↑𝑗) ∈ ℝ+)
106	105	rpcnd 13179	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (𝐵↑𝑗) ∈ ℂ)
107	14	recnd 11350	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (1 − 𝐵) ∈ ℂ)
108	107	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (1 − 𝐵) ∈ ℂ)
109	18	rpne0d 13182	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (1 − 𝐵) ≠ 0)
110	109	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (1 − 𝐵) ≠ 0)
111	91, 106, 108, 110	div12d 12142	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (𝐴 · ((𝐵↑𝑗) / (1 − 𝐵))) = ((𝐵↑𝑗) · (𝐴 / (1 − 𝐵))))
112	103, 111	breqtrd 5134	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → seq𝑗( + , (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))) ⇝ ((𝐵↑𝑗) · (𝐴 / (1 − 𝐵))))
113	73, 76, 82, 89, 112	isumclim 15938	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → Σ𝑘 ∈ (ℤ≥‘𝑗)(𝐴 · (𝐵↑𝑘)) = ((𝐵↑𝑗) · (𝐴 / (1 − 𝐵))))
114		seqex 14159	. . . . . . . . . . . . . . 15 ⊢ seq𝑗( + , (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))) ∈ V
115		ovex 7463	. . . . . . . . . . . . . . 15 ⊢ (𝐴 · ((𝐵↑𝑗) / (1 − 𝐵))) ∈ V
116	114, 115	breldm 5895	. . . . . . . . . . . . . 14 ⊢ (seq𝑗( + , (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))) ⇝ (𝐴 · ((𝐵↑𝑗) / (1 − 𝐵))) → seq𝑗( + , (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))) ∈ dom ⇝ )
117	103, 116	syl 18	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → seq𝑗( + , (𝑚 ∈ (ℤ≥‘𝑗) ↦ (𝐴 · (𝐵↑𝑚)))) ∈ dom ⇝ )
118	73, 76, 82, 88, 117	isumrecl 15946	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → Σ𝑘 ∈ (ℤ≥‘𝑗)(𝐴 · (𝐵↑𝑘)) ∈ ℝ)
119	113, 118	eqeltrrd 2865	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐵↑𝑗) · (𝐴 / (1 − 𝐵))) ∈ ℝ)
120	119	recnd 11350	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐵↑𝑗) · (𝐴 / (1 − 𝐵))) ∈ ℂ)
121	120	abscld 15621	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) ∈ ℝ)
122		fzfid 14129	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (𝑗...(𝑛 − 1)) ∈ Fin)
123		simpll 779	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (𝑗...(𝑛 − 1))) → 𝜑)
124		elfzuz 13665	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ (𝑗...(𝑛 − 1)) → 𝑘 ∈ (ℤ≥‘𝑗))
125		simprl 783	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → 𝑗 ∈ ℕ)
126		eluznn 13058	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑗 ∈ ℕ ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 𝑘 ∈ ℕ)
127	125, 126	sylan 592	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 𝑘 ∈ ℕ)
128	124, 127	sylan2 605	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (𝑗...(𝑛 − 1))) → 𝑘 ∈ ℕ)
129	62	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐷 ∈ (Met‘𝑋))
130	64	ffvelcdmda 7095	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) ∈ 𝑋)
131		peano2nn 12360	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℕ → (𝑘 + 1) ∈ ℕ)
132		ffvelcdm 7092	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐹:ℕ⟶𝑋 ∧ (𝑘 + 1) ∈ ℕ) → (𝐹‘(𝑘 + 1)) ∈ 𝑋)
133	64, 131, 132	syl2an 608	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘(𝑘 + 1)) ∈ 𝑋)
134		metcl 24666	. . . . . . . . . . . . . . . 16 ⊢ ((𝐷 ∈ (Met‘𝑋) ∧ (𝐹‘𝑘) ∈ 𝑋 ∧ (𝐹‘(𝑘 + 1)) ∈ 𝑋) → ((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ∈ ℝ)
135	129, 130, 133, 134	syl3anc 1398	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ∈ ℝ)
136	123, 128, 135	syl2anc 596	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (𝑗...(𝑛 − 1))) → ((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ∈ ℝ)
137	122, 136	fsumrecl 15915	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → Σ𝑘 ∈ (𝑗...(𝑛 − 1))((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ∈ ℝ)
138		simprr 785	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → 𝑛 ∈ (ℤ≥‘𝑗))
139		elfzuz 13665	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ (𝑗...𝑛) → 𝑘 ∈ (ℤ≥‘𝑗))
140		simpll 779	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 𝜑)
141	140, 127, 130	syl2anc 596	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → (𝐹‘𝑘) ∈ 𝑋)
142	139, 141	sylan2 605	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (𝑗...𝑛)) → (𝐹‘𝑘) ∈ 𝑋)
143	63, 138, 142	mettrifi 38834	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ≤ Σ𝑘 ∈ (𝑗...(𝑛 − 1))((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))))
144	124, 88	sylan2 605	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (𝑗...(𝑛 − 1))) → (𝐴 · (𝐵↑𝑘)) ∈ ℝ)
145	122, 144	fsumrecl 15915	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → Σ𝑘 ∈ (𝑗...(𝑛 − 1))(𝐴 · (𝐵↑𝑘)) ∈ ℝ)
146		geomcau.7	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ≤ (𝐴 · (𝐵↑𝑘)))
147	123, 128, 146	syl2anc 596	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (𝑗...(𝑛 − 1))) → ((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ≤ (𝐴 · (𝐵↑𝑘)))
148	122, 136, 144, 147	fsumle 15981	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → Σ𝑘 ∈ (𝑗...(𝑛 − 1))((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ≤ Σ𝑘 ∈ (𝑗...(𝑛 − 1))(𝐴 · (𝐵↑𝑘)))
149		fzssuz 13712	. . . . . . . . . . . . . . . 16 ⊢ (𝑗...(𝑛 − 1)) ⊆ (ℤ≥‘𝑗)
150	149	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (𝑗...(𝑛 − 1)) ⊆ (ℤ≥‘𝑗))
151		0red 11324	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 ∈ ℝ)
152		nnz 12727	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
153		rpexpcl 14236	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐵 ∈ ℝ+ ∧ 𝑘 ∈ ℤ) → (𝐵↑𝑘) ∈ ℝ+)
154	3, 152, 153	syl2an 608	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐵↑𝑘) ∈ ℝ+)
155	135, 154	rerpdivcld 13208	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) / (𝐵↑𝑘)) ∈ ℝ)
156	11	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐴 ∈ ℝ)
157		metge0 24679	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐷 ∈ (Met‘𝑋) ∧ (𝐹‘𝑘) ∈ 𝑋 ∧ (𝐹‘(𝑘 + 1)) ∈ 𝑋) → 0 ≤ ((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))))
158	129, 130, 133, 157	syl3anc 1398	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 ≤ ((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))))
159	135, 154, 158	divge0d 13217	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 ≤ (((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) / (𝐵↑𝑘)))
160	135, 156, 154	ledivmul2d 13231	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) / (𝐵↑𝑘)) ≤ 𝐴 ↔ ((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ≤ (𝐴 · (𝐵↑𝑘))))
161	146, 160	mpbird 260	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) / (𝐵↑𝑘)) ≤ 𝐴)
162	151, 155, 156, 159, 161	letrd 11480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 0 ≤ 𝐴)
163	140, 127, 162	syl2anc 596	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 0 ≤ 𝐴)
164	140, 127, 154	syl2anc 596	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → (𝐵↑𝑘) ∈ ℝ+)
165	164	rpge0d 13181	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 0 ≤ (𝐵↑𝑘))
166	83, 87, 163, 165	mulge0d 11906	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) ∧ 𝑘 ∈ (ℤ≥‘𝑗)) → 0 ≤ (𝐴 · (𝐵↑𝑘)))
167	73, 76, 122, 150, 82, 88, 166, 117	isumless 16029	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → Σ𝑘 ∈ (𝑗...(𝑛 − 1))(𝐴 · (𝐵↑𝑘)) ≤ Σ𝑘 ∈ (ℤ≥‘𝑗)(𝐴 · (𝐵↑𝑘)))
168	137, 145, 118, 148, 167	letrd 11480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → Σ𝑘 ∈ (𝑗...(𝑛 − 1))((𝐹‘𝑘)𝐷(𝐹‘(𝑘 + 1))) ≤ Σ𝑘 ∈ (ℤ≥‘𝑗)(𝐴 · (𝐵↑𝑘)))
169	72, 137, 118, 143, 168	letrd 11480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ≤ Σ𝑘 ∈ (ℤ≥‘𝑗)(𝐴 · (𝐵↑𝑘)))
170	169, 113	breqtrd 5134	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ≤ ((𝐵↑𝑗) · (𝐴 / (1 − 𝐵))))
171	119	leabsd 15597	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐵↑𝑗) · (𝐴 / (1 − 𝐵))) ≤ (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))))
172	72, 119, 121, 170, 171	letrd 11480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ≤ (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))))
173	172	adantlr 728	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ≤ (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))))
174	72	adantlr 728	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ∈ ℝ)
175	121	adantlr 728	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) ∈ ℝ)
176		rpre 13142	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℝ+ → 𝑥 ∈ ℝ)
177	176	ad2antlr 740	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → 𝑥 ∈ ℝ)
178		lelttr 11413	. . . . . . . . . 10 ⊢ ((((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ∈ ℝ ∧ (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) ∈ ℝ ∧ 𝑥 ∈ ℝ) → ((((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ≤ (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) ∧ (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) < 𝑥) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥))
179	174, 175, 177, 178	syl3anc 1398	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((((𝐹‘𝑗)𝐷(𝐹‘𝑛)) ≤ (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) ∧ (abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) < 𝑥) → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥))
180	173, 179	mpand 708	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ (𝑗 ∈ ℕ ∧ 𝑛 ∈ (ℤ≥‘𝑗))) → ((abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) < 𝑥 → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥))
181	180	anassrs 473	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑗 ∈ ℕ) ∧ 𝑛 ∈ (ℤ≥‘𝑗)) → ((abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) < 𝑥 → ((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥))
182	181	ralrimdva 3166	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑗 ∈ ℕ) → ((abs‘((𝐵↑𝑗) · (𝐴 / (1 − 𝐵)))) < 𝑥 → ∀𝑛 ∈ (ℤ≥‘𝑗)((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥))
183	61, 182	syld 48	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ ℝ+) ∧ 𝑗 ∈ ℕ) → (∀𝑛 ∈ (ℤ≥‘𝑗)(abs‘((𝐵↑𝑛) · (𝐴 / (1 − 𝐵)))) < 𝑥 → ∀𝑛 ∈ (ℤ≥‘𝑗)((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥))
184	183	reximdva 3179	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ+) → (∃𝑗 ∈ ℕ ∀𝑛 ∈ (ℤ≥‘𝑗)(abs‘((𝐵↑𝑛) · (𝐴 / (1 − 𝐵)))) < 𝑥 → ∃𝑗 ∈ ℕ ∀𝑛 ∈ (ℤ≥‘𝑗)((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥))
185	184	ralimdva 3178	. . 3 ⊢ (𝜑 → (∀𝑥 ∈ ℝ+ ∃𝑗 ∈ ℕ ∀𝑛 ∈ (ℤ≥‘𝑗)(abs‘((𝐵↑𝑛) · (𝐴 / (1 − 𝐵)))) < 𝑥 → ∀𝑥 ∈ ℝ+ ∃𝑗 ∈ ℕ ∀𝑛 ∈ (ℤ≥‘𝑗)((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥))
186	53, 185	mpd 16	. 2 ⊢ (𝜑 → ∀𝑥 ∈ ℝ+ ∃𝑗 ∈ ℕ ∀𝑛 ∈ (ℤ≥‘𝑗)((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥)
187		metxmet 24668	. . . 4 ⊢ (𝐷 ∈ (Met‘𝑋) → 𝐷 ∈ (∞Met‘𝑋))
188	62, 187	syl 18	. . 3 ⊢ (𝜑 → 𝐷 ∈ (∞Met‘𝑋))
189		eqidd 2764	. . 3 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) = (𝐹‘𝑛))
190		eqidd 2764	. . 3 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐹‘𝑗) = (𝐹‘𝑗))
191	1, 188, 2, 189, 190, 64	iscauf 25616	. 2 ⊢ (𝜑 → (𝐹 ∈ (Cau‘𝐷) ↔ ∀𝑥 ∈ ℝ+ ∃𝑗 ∈ ℕ ∀𝑛 ∈ (ℤ≥‘𝑗)((𝐹‘𝑗)𝐷(𝐹‘𝑛)) < 𝑥))
192	186, 191	mpbird 260	1 ⊢ (𝜑 → 𝐹 ∈ (Cau‘𝐷))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1569   ∈ wcel 2146   ≠ wne 2959  ∀wral 3080  ∃wrex 3090  Vcvv 3454   ⊆ wss 3900   class class class wbr 5106   ↦ cmpt 5189  dom cdm 5655  ⟶wf 6543  ‘cfv 6547  (class class class)co 7430  ℂcc 11211  ℝcr 11212  0cc0 11213  1c1 11214   + caddc 11216   · cmul 11218   < clt 11356   ≤ cle 11357   − cmin 11554   / cdiv 11986  ℕcn 12348  ℕ₀cn0 12619  ℤcz 12706  ℤ_≥cuz 12978  ℝ⁺crp 13133  ...cfz 13652  seqcseq 14157  ↑cexp 14217  abscabs 15416   ⇝ cli 15666  Σcsu 15868  ∞Metcxmet 21678  Metcmet 21679  Cauccau 25589

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1944  ax-6 2001  ax-7 2042  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2196  ax-12 2215  ax-ext 2735  ax-rep 5235  ax-sep 5252  ax-nul 5263  ax-pow 5331  ax-pr 5395  ax-un 7761  ax-inf2 9655  ax-cnex 11269  ax-resscn 11270  ax-1cn 11271  ax-icn 11272  ax-addcl 11273  ax-addrcl 11274  ax-mulcl 11275  ax-mulrcl 11276  ax-mulcom 11277  ax-addass 11278  ax-mulass 11279  ax-distr 11280  ax-i2m1 11281  ax-1ne0 11282  ax-1rid 11283  ax-rnegex 11284  ax-rrecex 11285  ax-cnre 11286  ax-pre-lttri 11287  ax-pre-lttrn 11288  ax-pre-ltadd 11289  ax-pre-mulgt0 11290  ax-pre-sup 11291

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2101  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4839  df-uni 4871  df-int 4911  df-iun 4956  df-br 5107  df-opab 5171  df-mpt 5190  df-tr 5216  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6311  df-ord 6372  df-on 6373  df-lim 6374  df-suc 6375  df-iota 6501  df-fun 6549  df-fn 6550  df-f 6551  df-f1 6552  df-fo 6553  df-f1o 6554  df-fv 6555  df-isom 6556  df-riota 7387  df-ov 7433  df-oprab 7434  df-mpo 7435  df-om 7888  df-1st 8011  df-2nd 8012  df-frecs 8313  df-wrecs 8344  df-recs 8393  df-rdg 8432  df-1o 8490  df-er 8731  df-map 8863  df-pm 8864  df-en 8988  df-dom 8989  df-sdom 8990  df-fin 8991  df-sup 9447  df-inf 9448  df-oi 9517  df-card 10033  df-pnf 11358  df-mnf 11359  df-xr 11360  df-ltxr 11361  df-le 11362  df-sub 11556  df-neg 11557  df-div 11987  df-nn 12349  df-2 12418  df-3 12419  df-n0 12620  df-z 12707  df-uz 12979  df-rp 13134  df-xneg 13254  df-xadd 13255  df-xmul 13256  df-ico 13495  df-fz 13653  df-fzo 13802  df-fl 13945  df-seq 14158  df-exp 14218  df-hash 14488  df-cj 15281  df-re 15282  df-im 15283  df-sqrt 15417  df-abs 15418  df-clim 15670  df-rlim 15671  df-sum 15869  df-psmet 21685  df-xmet 21686  df-met 21687  df-bl 21688  df-cau 25592

This theorem is used by:  bfplem1  38899