Theorem reccn2 15569

Description: The reciprocal function is continuous. (Contributed by Mario Carneiro, 9-Feb-2014.) (Revised by Mario Carneiro, 22-Sep-2014.)

Hypothesis

Ref	Expression
reccn2.t	⊢ 𝑇 = (if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) · ((abs‘𝐴) / 2))

Assertion

Ref	Expression
reccn2	⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → ∃𝑦 ∈ ℝ+ ∀𝑧 ∈ (ℂ ∖ {0})((abs‘(𝑧 − 𝐴)) < 𝑦 → (abs‘((1 / 𝑧) − (1 / 𝐴))) < 𝐵))

Distinct variable groups:   𝑦,𝑧,𝐴   𝑦,𝐵,𝑧   𝑦,𝑇,𝑧

Proof of Theorem reccn2

Step	Hyp	Ref	Expression
1		reccn2.t	. . 3 ⊢ 𝑇 = (if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) · ((abs‘𝐴) / 2))
2		1rp 12961	. . . . 5 ⊢ 1 ∈ ℝ+
3		simpl 482	. . . . . . . 8 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → 𝐴 ∈ (ℂ ∖ {0}))
4		eldifsn 4752	. . . . . . . 8 ⊢ (𝐴 ∈ (ℂ ∖ {0}) ↔ (𝐴 ∈ ℂ ∧ 𝐴 ≠ 0))
5	3, 4	sylib 218	. . . . . . 7 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → (𝐴 ∈ ℂ ∧ 𝐴 ≠ 0))
6		absrpcl 15260	. . . . . . 7 ⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (abs‘𝐴) ∈ ℝ+)
7	5, 6	syl 17	. . . . . 6 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → (abs‘𝐴) ∈ ℝ+)
8		rpmulcl 12982	. . . . . 6 ⊢ (((abs‘𝐴) ∈ ℝ+ ∧ 𝐵 ∈ ℝ+) → ((abs‘𝐴) · 𝐵) ∈ ℝ+)
9	7, 8	sylancom 588	. . . . 5 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → ((abs‘𝐴) · 𝐵) ∈ ℝ+)
10		ifcl 4536	. . . . 5 ⊢ ((1 ∈ ℝ+ ∧ ((abs‘𝐴) · 𝐵) ∈ ℝ+) → if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ∈ ℝ+)
11	2, 9, 10	sylancr 587	. . . 4 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ∈ ℝ+)
12	7	rphalfcld 13013	. . . 4 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → ((abs‘𝐴) / 2) ∈ ℝ+)
13	11, 12	rpmulcld 13017	. . 3 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → (if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) · ((abs‘𝐴) / 2)) ∈ ℝ+)
14	1, 13	eqeltrid 2833	. 2 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → 𝑇 ∈ ℝ+)
15	5	adantr 480	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝐴 ∈ ℂ ∧ 𝐴 ≠ 0))
16	15	simpld 494	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝐴 ∈ ℂ)
17		simprl 770	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝑧 ∈ (ℂ ∖ {0}))
18		eldifsn 4752	. . . . . . . . . . 11 ⊢ (𝑧 ∈ (ℂ ∖ {0}) ↔ (𝑧 ∈ ℂ ∧ 𝑧 ≠ 0))
19	17, 18	sylib 218	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝑧 ∈ ℂ ∧ 𝑧 ≠ 0))
20	19	simpld 494	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝑧 ∈ ℂ)
21	16, 20	mulcld 11200	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝐴 · 𝑧) ∈ ℂ)
22		mulne0 11826	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑧 ∈ ℂ ∧ 𝑧 ≠ 0)) → (𝐴 · 𝑧) ≠ 0)
23	15, 19, 22	syl2anc 584	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝐴 · 𝑧) ≠ 0)
24	16, 20, 21, 23	divsubdird 12003	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((𝐴 − 𝑧) / (𝐴 · 𝑧)) = ((𝐴 / (𝐴 · 𝑧)) − (𝑧 / (𝐴 · 𝑧))))
25	16	mulridd 11197	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝐴 · 1) = 𝐴)
26	25	oveq1d 7404	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((𝐴 · 1) / (𝐴 · 𝑧)) = (𝐴 / (𝐴 · 𝑧)))
27		1cnd 11175	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 1 ∈ ℂ)
28		divcan5 11890	. . . . . . . . . . 11 ⊢ ((1 ∈ ℂ ∧ (𝑧 ∈ ℂ ∧ 𝑧 ≠ 0) ∧ (𝐴 ∈ ℂ ∧ 𝐴 ≠ 0)) → ((𝐴 · 1) / (𝐴 · 𝑧)) = (1 / 𝑧))
29	27, 19, 15, 28	syl3anc 1373	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((𝐴 · 1) / (𝐴 · 𝑧)) = (1 / 𝑧))
30	26, 29	eqtr3d 2767	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝐴 / (𝐴 · 𝑧)) = (1 / 𝑧))
31	20	mulridd 11197	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝑧 · 1) = 𝑧)
32	20, 16	mulcomd 11201	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝑧 · 𝐴) = (𝐴 · 𝑧))
33	31, 32	oveq12d 7407	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((𝑧 · 1) / (𝑧 · 𝐴)) = (𝑧 / (𝐴 · 𝑧)))
34		divcan5 11890	. . . . . . . . . . 11 ⊢ ((1 ∈ ℂ ∧ (𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑧 ∈ ℂ ∧ 𝑧 ≠ 0)) → ((𝑧 · 1) / (𝑧 · 𝐴)) = (1 / 𝐴))
35	27, 15, 19, 34	syl3anc 1373	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((𝑧 · 1) / (𝑧 · 𝐴)) = (1 / 𝐴))
36	33, 35	eqtr3d 2767	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝑧 / (𝐴 · 𝑧)) = (1 / 𝐴))
37	30, 36	oveq12d 7407	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((𝐴 / (𝐴 · 𝑧)) − (𝑧 / (𝐴 · 𝑧))) = ((1 / 𝑧) − (1 / 𝐴)))
38	24, 37	eqtrd 2765	. . . . . . 7 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((𝐴 − 𝑧) / (𝐴 · 𝑧)) = ((1 / 𝑧) − (1 / 𝐴)))
39	38	fveq2d 6864	. . . . . 6 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘((𝐴 − 𝑧) / (𝐴 · 𝑧))) = (abs‘((1 / 𝑧) − (1 / 𝐴))))
40	16, 20	subcld 11539	. . . . . . 7 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝐴 − 𝑧) ∈ ℂ)
41	40, 21, 23	absdivd 15430	. . . . . 6 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘((𝐴 − 𝑧) / (𝐴 · 𝑧))) = ((abs‘(𝐴 − 𝑧)) / (abs‘(𝐴 · 𝑧))))
42	39, 41	eqtr3d 2767	. . . . 5 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘((1 / 𝑧) − (1 / 𝐴))) = ((abs‘(𝐴 − 𝑧)) / (abs‘(𝐴 · 𝑧))))
43	16, 20	abssubd 15428	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝐴 − 𝑧)) = (abs‘(𝑧 − 𝐴)))
44	20, 16	subcld 11539	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (𝑧 − 𝐴) ∈ ℂ)
45	44	abscld 15411	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝑧 − 𝐴)) ∈ ℝ)
46	43, 45	eqeltrd 2829	. . . . . . 7 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝐴 − 𝑧)) ∈ ℝ)
47	14	adantr 480	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝑇 ∈ ℝ+)
48	47	rpred 13001	. . . . . . 7 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝑇 ∈ ℝ)
49	21	abscld 15411	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝐴 · 𝑧)) ∈ ℝ)
50		rpre 12966	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ+ → 𝐵 ∈ ℝ)
51	50	ad2antlr 727	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝐵 ∈ ℝ)
52	49, 51	remulcld 11210	. . . . . . 7 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘(𝐴 · 𝑧)) · 𝐵) ∈ ℝ)
53		simprr 772	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝑧 − 𝐴)) < 𝑇)
54	43, 53	eqbrtrd 5131	. . . . . . 7 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝐴 − 𝑧)) < 𝑇)
55	9	adantr 480	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘𝐴) · 𝐵) ∈ ℝ+)
56	55	rpred 13001	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘𝐴) · 𝐵) ∈ ℝ)
57	12	adantr 480	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘𝐴) / 2) ∈ ℝ+)
58	57	rpred 13001	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘𝐴) / 2) ∈ ℝ)
59	56, 58	remulcld 11210	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (((abs‘𝐴) · 𝐵) · ((abs‘𝐴) / 2)) ∈ ℝ)
60		1re 11180	. . . . . . . . . . 11 ⊢ 1 ∈ ℝ
61		min2 13156	. . . . . . . . . . 11 ⊢ ((1 ∈ ℝ ∧ ((abs‘𝐴) · 𝐵) ∈ ℝ) → if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ≤ ((abs‘𝐴) · 𝐵))
62	60, 56, 61	sylancr 587	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ≤ ((abs‘𝐴) · 𝐵))
63	11	adantr 480	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ∈ ℝ+)
64	63	rpred 13001	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ∈ ℝ)
65	64, 56, 57	lemul1d 13044	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ≤ ((abs‘𝐴) · 𝐵) ↔ (if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) · ((abs‘𝐴) / 2)) ≤ (((abs‘𝐴) · 𝐵) · ((abs‘𝐴) / 2))))
66	62, 65	mpbid 232	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) · ((abs‘𝐴) / 2)) ≤ (((abs‘𝐴) · 𝐵) · ((abs‘𝐴) / 2)))
67	1, 66	eqbrtrid 5144	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝑇 ≤ (((abs‘𝐴) · 𝐵) · ((abs‘𝐴) / 2)))
68	20	abscld 15411	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘𝑧) ∈ ℝ)
69	16	abscld 15411	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘𝐴) ∈ ℝ)
70	69	recnd 11208	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘𝐴) ∈ ℂ)
71	70	2halvesd 12434	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (((abs‘𝐴) / 2) + ((abs‘𝐴) / 2)) = (abs‘𝐴))
72	69, 68	resubcld 11612	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘𝐴) − (abs‘𝑧)) ∈ ℝ)
73	16, 20	abs2difd 15432	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘𝐴) − (abs‘𝑧)) ≤ (abs‘(𝐴 − 𝑧)))
74		min1 13155	. . . . . . . . . . . . . . . . . . 19 ⊢ ((1 ∈ ℝ ∧ ((abs‘𝐴) · 𝐵) ∈ ℝ) → if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ≤ 1)
75	60, 56, 74	sylancr 587	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ≤ 1)
76		1red 11181	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 1 ∈ ℝ)
77	64, 76, 57	lemul1d 13044	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) ≤ 1 ↔ (if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) · ((abs‘𝐴) / 2)) ≤ (1 · ((abs‘𝐴) / 2))))
78	75, 77	mpbid 232	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (if(1 ≤ ((abs‘𝐴) · 𝐵), 1, ((abs‘𝐴) · 𝐵)) · ((abs‘𝐴) / 2)) ≤ (1 · ((abs‘𝐴) / 2)))
79	1, 78	eqbrtrid 5144	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝑇 ≤ (1 · ((abs‘𝐴) / 2)))
80	58	recnd 11208	. . . . . . . . . . . . . . . . 17 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘𝐴) / 2) ∈ ℂ)
81	80	mullidd 11198	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (1 · ((abs‘𝐴) / 2)) = ((abs‘𝐴) / 2))
82	79, 81	breqtrd 5135	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝑇 ≤ ((abs‘𝐴) / 2))
83	46, 48, 58, 54, 82	ltletrd 11340	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝐴 − 𝑧)) < ((abs‘𝐴) / 2))
84	72, 46, 58, 73, 83	lelttrd 11338	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘𝐴) − (abs‘𝑧)) < ((abs‘𝐴) / 2))
85	69, 68, 58	ltsubadd2d 11782	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (((abs‘𝐴) − (abs‘𝑧)) < ((abs‘𝐴) / 2) ↔ (abs‘𝐴) < ((abs‘𝑧) + ((abs‘𝐴) / 2))))
86	84, 85	mpbid 232	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘𝐴) < ((abs‘𝑧) + ((abs‘𝐴) / 2)))
87	71, 86	eqbrtrd 5131	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (((abs‘𝐴) / 2) + ((abs‘𝐴) / 2)) < ((abs‘𝑧) + ((abs‘𝐴) / 2)))
88	58, 68, 58	ltadd1d 11777	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (((abs‘𝐴) / 2) < (abs‘𝑧) ↔ (((abs‘𝐴) / 2) + ((abs‘𝐴) / 2)) < ((abs‘𝑧) + ((abs‘𝐴) / 2))))
89	87, 88	mpbird 257	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘𝐴) / 2) < (abs‘𝑧))
90	58, 68, 55, 89	ltmul2dd 13057	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (((abs‘𝐴) · 𝐵) · ((abs‘𝐴) / 2)) < (((abs‘𝐴) · 𝐵) · (abs‘𝑧)))
91	16, 20	absmuld 15429	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝐴 · 𝑧)) = ((abs‘𝐴) · (abs‘𝑧)))
92	91	oveq1d 7404	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘(𝐴 · 𝑧)) · 𝐵) = (((abs‘𝐴) · (abs‘𝑧)) · 𝐵))
93	68	recnd 11208	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘𝑧) ∈ ℂ)
94	51	recnd 11208	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝐵 ∈ ℂ)
95	70, 93, 94	mul32d 11390	. . . . . . . . . 10 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (((abs‘𝐴) · (abs‘𝑧)) · 𝐵) = (((abs‘𝐴) · 𝐵) · (abs‘𝑧)))
96	92, 95	eqtrd 2765	. . . . . . . . 9 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘(𝐴 · 𝑧)) · 𝐵) = (((abs‘𝐴) · 𝐵) · (abs‘𝑧)))
97	90, 96	breqtrrd 5137	. . . . . . . 8 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (((abs‘𝐴) · 𝐵) · ((abs‘𝐴) / 2)) < ((abs‘(𝐴 · 𝑧)) · 𝐵))
98	48, 59, 52, 67, 97	lelttrd 11338	. . . . . . 7 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → 𝑇 < ((abs‘(𝐴 · 𝑧)) · 𝐵))
99	46, 48, 52, 54, 98	lttrd 11341	. . . . . 6 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝐴 − 𝑧)) < ((abs‘(𝐴 · 𝑧)) · 𝐵))
100	21, 23	absrpcld 15423	. . . . . . 7 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘(𝐴 · 𝑧)) ∈ ℝ+)
101	46, 51, 100	ltdivmuld 13052	. . . . . 6 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (((abs‘(𝐴 − 𝑧)) / (abs‘(𝐴 · 𝑧))) < 𝐵 ↔ (abs‘(𝐴 − 𝑧)) < ((abs‘(𝐴 · 𝑧)) · 𝐵)))
102	99, 101	mpbird 257	. . . . 5 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → ((abs‘(𝐴 − 𝑧)) / (abs‘(𝐴 · 𝑧))) < 𝐵)
103	42, 102	eqbrtrd 5131	. . . 4 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ (𝑧 ∈ (ℂ ∖ {0}) ∧ (abs‘(𝑧 − 𝐴)) < 𝑇)) → (abs‘((1 / 𝑧) − (1 / 𝐴))) < 𝐵)
104	103	expr 456	. . 3 ⊢ (((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) ∧ 𝑧 ∈ (ℂ ∖ {0})) → ((abs‘(𝑧 − 𝐴)) < 𝑇 → (abs‘((1 / 𝑧) − (1 / 𝐴))) < 𝐵))
105	104	ralrimiva 3126	. 2 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → ∀𝑧 ∈ (ℂ ∖ {0})((abs‘(𝑧 − 𝐴)) < 𝑇 → (abs‘((1 / 𝑧) − (1 / 𝐴))) < 𝐵))
106		breq2 5113	. . 3 ⊢ (𝑦 = 𝑇 → ((abs‘(𝑧 − 𝐴)) < 𝑦 ↔ (abs‘(𝑧 − 𝐴)) < 𝑇))
107	106	rspceaimv 3597	. 2 ⊢ ((𝑇 ∈ ℝ+ ∧ ∀𝑧 ∈ (ℂ ∖ {0})((abs‘(𝑧 − 𝐴)) < 𝑇 → (abs‘((1 / 𝑧) − (1 / 𝐴))) < 𝐵)) → ∃𝑦 ∈ ℝ+ ∀𝑧 ∈ (ℂ ∖ {0})((abs‘(𝑧 − 𝐴)) < 𝑦 → (abs‘((1 / 𝑧) − (1 / 𝐴))) < 𝐵))
108	14, 105, 107	syl2anc 584	1 ⊢ ((𝐴 ∈ (ℂ ∖ {0}) ∧ 𝐵 ∈ ℝ+) → ∃𝑦 ∈ ℝ+ ∀𝑧 ∈ (ℂ ∖ {0})((abs‘(𝑧 − 𝐴)) < 𝑦 → (abs‘((1 / 𝑧) − (1 / 𝐴))) < 𝐵))

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1540   ∈ wcel 2109   ≠ wne 2926  ∀wral 3045  ∃wrex 3054   ∖ cdif 3913  ifcif 4490  {csn 4591   class class class wbr 5109  ‘cfv 6513  (class class class)co 7389  ℂcc 11072  ℝcr 11073  0cc0 11074  1c1 11075   + caddc 11077   · cmul 11079   < clt 11214   ≤ cle 11215   − cmin 11411   / cdiv 11841  2c2 12242  ℝ⁺crp 12957  abscabs 15206

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-sep 5253  ax-nul 5263  ax-pow 5322  ax-pr 5389  ax-un 7713  ax-cnex 11130  ax-resscn 11131  ax-1cn 11132  ax-icn 11133  ax-addcl 11134  ax-addrcl 11135  ax-mulcl 11136  ax-mulrcl 11137  ax-mulcom 11138  ax-addass 11139  ax-mulass 11140  ax-distr 11141  ax-i2m1 11142  ax-1ne0 11143  ax-1rid 11144  ax-rnegex 11145  ax-rrecex 11146  ax-cnre 11147  ax-pre-lttri 11148  ax-pre-lttrn 11149  ax-pre-ltadd 11150  ax-pre-mulgt0 11151  ax-pre-sup 11152

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-nel 3031  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3756  df-csb 3865  df-dif 3919  df-un 3921  df-in 3923  df-ss 3933  df-pss 3936  df-nul 4299  df-if 4491  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-iun 4959  df-br 5110  df-opab 5172  df-mpt 5191  df-tr 5217  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 6276  df-ord 6337  df-on 6338  df-lim 6339  df-suc 6340  df-iota 6466  df-fun 6515  df-fn 6516  df-f 6517  df-f1 6518  df-fo 6519  df-f1o 6520  df-fv 6521  df-riota 7346  df-ov 7392  df-oprab 7393  df-mpo 7394  df-om 7845  df-2nd 7971  df-frecs 8262  df-wrecs 8293  df-recs 8342  df-rdg 8380  df-er 8673  df-en 8921  df-dom 8922  df-sdom 8923  df-sup 9399  df-pnf 11216  df-mnf 11217  df-xr 11218  df-ltxr 11219  df-le 11220  df-sub 11413  df-neg 11414  df-div 11842  df-nn 12188  df-2 12250  df-3 12251  df-n0 12449  df-z 12536  df-uz 12800  df-rp 12958  df-seq 13973  df-exp 14033  df-cj 15071  df-re 15072  df-im 15073  df-sqrt 15207  df-abs 15208

This theorem is referenced by:  rlimdiv  15618  divcnOLD  24763  divcn  24765  climrec  45594