Theorem rlimcld2 14935

Description: If 𝐷 is a closed set in the topology of the complex numbers (stated here in basic form), and all the elements of the sequence lie in 𝐷, then the limit of the sequence also lies in 𝐷. (Contributed by Mario Carneiro, 10-May-2016.)

Hypotheses

Ref	Expression
rlimcld2.1	⊢ (𝜑 → sup(𝐴, ℝ*, < ) = +∞)
rlimcld2.2	⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐶)
rlimcld2.3	⊢ (𝜑 → 𝐷 ⊆ ℂ)
rlimcld2.4	⊢ ((𝜑 ∧ 𝑦 ∈ (ℂ ∖ 𝐷)) → 𝑅 ∈ ℝ+)
rlimcld2.5	⊢ (((𝜑 ∧ 𝑦 ∈ (ℂ ∖ 𝐷)) ∧ 𝑧 ∈ 𝐷) → 𝑅 ≤ (abs‘(𝑧 − 𝑦)))
rlimcld2.6	⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ 𝐷)

Assertion

Ref	Expression
rlimcld2	⊢ (𝜑 → 𝐶 ∈ 𝐷)

Distinct variable groups:   𝑥,𝑦,𝑧,𝐴   𝑦,𝐵,𝑧   𝑥,𝐶,𝑦,𝑧   𝜑,𝑥,𝑦,𝑧   𝑥,𝐷,𝑦,𝑧   𝑥,𝑅,𝑧

Allowed substitution hints:   𝐵(𝑥)   𝑅(𝑦)

Proof of Theorem rlimcld2

Dummy variable 𝑟 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		rlimcld2.6	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ 𝐷)
2	1	ralrimiva 3182	. . . 4 ⊢ (𝜑 → ∀𝑥 ∈ 𝐴 𝐵 ∈ 𝐷)
3	2	adantr 483	. . 3 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → ∀𝑥 ∈ 𝐴 𝐵 ∈ 𝐷)
4		rlimcld2.2	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐶)
5	4	adantr 483	. . . . . 6 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → (𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐶)
6		rlimcl 14860	. . . . . 6 ⊢ ((𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐶 → 𝐶 ∈ ℂ)
7	5, 6	syl 17	. . . . 5 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → 𝐶 ∈ ℂ)
8		simpr 487	. . . . 5 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → ¬ 𝐶 ∈ 𝐷)
9	7, 8	eldifd 3947	. . . 4 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → 𝐶 ∈ (ℂ ∖ 𝐷))
10		rlimcld2.4	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ (ℂ ∖ 𝐷)) → 𝑅 ∈ ℝ+)
11	10	ralrimiva 3182	. . . . 5 ⊢ (𝜑 → ∀𝑦 ∈ (ℂ ∖ 𝐷)𝑅 ∈ ℝ+)
12	11	adantr 483	. . . 4 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → ∀𝑦 ∈ (ℂ ∖ 𝐷)𝑅 ∈ ℝ+)
13		nfcsb1v 3907	. . . . . 6 ⊢ Ⅎ𝑦⦋𝐶 / 𝑦⦌𝑅
14	13	nfel1 2994	. . . . 5 ⊢ Ⅎ𝑦⦋𝐶 / 𝑦⦌𝑅 ∈ ℝ+
15		csbeq1a 3897	. . . . . 6 ⊢ (𝑦 = 𝐶 → 𝑅 = ⦋𝐶 / 𝑦⦌𝑅)
16	15	eleq1d 2897	. . . . 5 ⊢ (𝑦 = 𝐶 → (𝑅 ∈ ℝ+ ↔ ⦋𝐶 / 𝑦⦌𝑅 ∈ ℝ+))
17	14, 16	rspc 3611	. . . 4 ⊢ (𝐶 ∈ (ℂ ∖ 𝐷) → (∀𝑦 ∈ (ℂ ∖ 𝐷)𝑅 ∈ ℝ+ → ⦋𝐶 / 𝑦⦌𝑅 ∈ ℝ+))
18	9, 12, 17	sylc 65	. . 3 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → ⦋𝐶 / 𝑦⦌𝑅 ∈ ℝ+)
19	3, 18, 5	rlimi 14870	. 2 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → ∃𝑟 ∈ ℝ ∀𝑥 ∈ 𝐴 (𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅))
20	18	ad2antrr 724	. . . . . . . 8 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ⦋𝐶 / 𝑦⦌𝑅 ∈ ℝ+)
21	20	rpred 12432	. . . . . . 7 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ⦋𝐶 / 𝑦⦌𝑅 ∈ ℝ)
22		rlimcld2.3	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐷 ⊆ ℂ)
23	22	ad3antrrr 728	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → 𝐷 ⊆ ℂ)
24	1	ad4ant14 750	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ 𝐷)
25	23, 24	sseldd 3968	. . . . . . . . 9 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℂ)
26	7	ad2antrr 724	. . . . . . . . 9 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → 𝐶 ∈ ℂ)
27	25, 26	subcld 10997	. . . . . . . 8 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝐵 − 𝐶) ∈ ℂ)
28	27	abscld 14796	. . . . . . 7 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (abs‘(𝐵 − 𝐶)) ∈ ℝ)
29		rlimcld2.5	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ (ℂ ∖ 𝐷)) ∧ 𝑧 ∈ 𝐷) → 𝑅 ≤ (abs‘(𝑧 − 𝑦)))
30	29	ralrimiva 3182	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (ℂ ∖ 𝐷)) → ∀𝑧 ∈ 𝐷 𝑅 ≤ (abs‘(𝑧 − 𝑦)))
31	30	ralrimiva 3182	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑦 ∈ (ℂ ∖ 𝐷)∀𝑧 ∈ 𝐷 𝑅 ≤ (abs‘(𝑧 − 𝑦)))
32	31	adantr 483	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → ∀𝑦 ∈ (ℂ ∖ 𝐷)∀𝑧 ∈ 𝐷 𝑅 ≤ (abs‘(𝑧 − 𝑦)))
33		nfcv 2977	. . . . . . . . . . . 12 ⊢ Ⅎ𝑦𝐷
34		nfcv 2977	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑦 ≤
35		nfcv 2977	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑦(abs‘(𝑧 − 𝐶))
36	13, 34, 35	nfbr 5113	. . . . . . . . . . . 12 ⊢ Ⅎ𝑦⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝑧 − 𝐶))
37	33, 36	nfralw 3225	. . . . . . . . . . 11 ⊢ Ⅎ𝑦∀𝑧 ∈ 𝐷 ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝑧 − 𝐶))
38		oveq2 7164	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 𝐶 → (𝑧 − 𝑦) = (𝑧 − 𝐶))
39	38	fveq2d 6674	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝐶 → (abs‘(𝑧 − 𝑦)) = (abs‘(𝑧 − 𝐶)))
40	15, 39	breq12d 5079	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝐶 → (𝑅 ≤ (abs‘(𝑧 − 𝑦)) ↔ ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝑧 − 𝐶))))
41	40	ralbidv 3197	. . . . . . . . . . 11 ⊢ (𝑦 = 𝐶 → (∀𝑧 ∈ 𝐷 𝑅 ≤ (abs‘(𝑧 − 𝑦)) ↔ ∀𝑧 ∈ 𝐷 ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝑧 − 𝐶))))
42	37, 41	rspc 3611	. . . . . . . . . 10 ⊢ (𝐶 ∈ (ℂ ∖ 𝐷) → (∀𝑦 ∈ (ℂ ∖ 𝐷)∀𝑧 ∈ 𝐷 𝑅 ≤ (abs‘(𝑧 − 𝑦)) → ∀𝑧 ∈ 𝐷 ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝑧 − 𝐶))))
43	9, 32, 42	sylc 65	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → ∀𝑧 ∈ 𝐷 ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝑧 − 𝐶)))
44	43	ad2antrr 724	. . . . . . . 8 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ∀𝑧 ∈ 𝐷 ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝑧 − 𝐶)))
45		fvoveq1 7179	. . . . . . . . . 10 ⊢ (𝑧 = 𝐵 → (abs‘(𝑧 − 𝐶)) = (abs‘(𝐵 − 𝐶)))
46	45	breq2d 5078	. . . . . . . . 9 ⊢ (𝑧 = 𝐵 → (⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝑧 − 𝐶)) ↔ ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝐵 − 𝐶))))
47	46	rspcv 3618	. . . . . . . 8 ⊢ (𝐵 ∈ 𝐷 → (∀𝑧 ∈ 𝐷 ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝑧 − 𝐶)) → ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝐵 − 𝐶))))
48	24, 44, 47	sylc 65	. . . . . . 7 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ⦋𝐶 / 𝑦⦌𝑅 ≤ (abs‘(𝐵 − 𝐶)))
49	21, 28, 48	lensymd 10791	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ¬ (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅)
50		id 22	. . . . . . 7 ⊢ ((𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) → (𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅))
51	50	imp 409	. . . . . 6 ⊢ (((𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) ∧ 𝑟 ≤ 𝑥) → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅)
52	49, 51	nsyl 142	. . . . 5 ⊢ ((((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ¬ ((𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) ∧ 𝑟 ≤ 𝑥))
53	52	nrexdv 3270	. . . 4 ⊢ (((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) → ¬ ∃𝑥 ∈ 𝐴 ((𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) ∧ 𝑟 ≤ 𝑥))
54		rlimcld2.1	. . . . . . . 8 ⊢ (𝜑 → sup(𝐴, ℝ*, < ) = +∞)
55		eqid 2821	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝐴 ↦ 𝐵) = (𝑥 ∈ 𝐴 ↦ 𝐵)
56	55, 1	dmmptd 6493	. . . . . . . . . . 11 ⊢ (𝜑 → dom (𝑥 ∈ 𝐴 ↦ 𝐵) = 𝐴)
57		rlimss 14859	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ 𝐴 ↦ 𝐵) ⇝𝑟 𝐶 → dom (𝑥 ∈ 𝐴 ↦ 𝐵) ⊆ ℝ)
58	4, 57	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → dom (𝑥 ∈ 𝐴 ↦ 𝐵) ⊆ ℝ)
59	56, 58	eqsstrrd 4006	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ⊆ ℝ)
60		ressxr 10685	. . . . . . . . . 10 ⊢ ℝ ⊆ ℝ*
61	59, 60	sstrdi 3979	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ⊆ ℝ*)
62		supxrunb1 12713	. . . . . . . . 9 ⊢ (𝐴 ⊆ ℝ* → (∀𝑟 ∈ ℝ ∃𝑥 ∈ 𝐴 𝑟 ≤ 𝑥 ↔ sup(𝐴, ℝ*, < ) = +∞))
63	61, 62	syl 17	. . . . . . . 8 ⊢ (𝜑 → (∀𝑟 ∈ ℝ ∃𝑥 ∈ 𝐴 𝑟 ≤ 𝑥 ↔ sup(𝐴, ℝ*, < ) = +∞))
64	54, 63	mpbird 259	. . . . . . 7 ⊢ (𝜑 → ∀𝑟 ∈ ℝ ∃𝑥 ∈ 𝐴 𝑟 ≤ 𝑥)
65	64	adantr 483	. . . . . 6 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → ∀𝑟 ∈ ℝ ∃𝑥 ∈ 𝐴 𝑟 ≤ 𝑥)
66	65	r19.21bi 3208	. . . . 5 ⊢ (((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) → ∃𝑥 ∈ 𝐴 𝑟 ≤ 𝑥)
67		r19.29 3254	. . . . . 6 ⊢ ((∀𝑥 ∈ 𝐴 (𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) ∧ ∃𝑥 ∈ 𝐴 𝑟 ≤ 𝑥) → ∃𝑥 ∈ 𝐴 ((𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) ∧ 𝑟 ≤ 𝑥))
68	67	expcom 416	. . . . 5 ⊢ (∃𝑥 ∈ 𝐴 𝑟 ≤ 𝑥 → (∀𝑥 ∈ 𝐴 (𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) → ∃𝑥 ∈ 𝐴 ((𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) ∧ 𝑟 ≤ 𝑥)))
69	66, 68	syl 17	. . . 4 ⊢ (((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) → (∀𝑥 ∈ 𝐴 (𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) → ∃𝑥 ∈ 𝐴 ((𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅) ∧ 𝑟 ≤ 𝑥)))
70	53, 69	mtod 200	. . 3 ⊢ (((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) ∧ 𝑟 ∈ ℝ) → ¬ ∀𝑥 ∈ 𝐴 (𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅))
71	70	nrexdv 3270	. 2 ⊢ ((𝜑 ∧ ¬ 𝐶 ∈ 𝐷) → ¬ ∃𝑟 ∈ ℝ ∀𝑥 ∈ 𝐴 (𝑟 ≤ 𝑥 → (abs‘(𝐵 − 𝐶)) < ⦋𝐶 / 𝑦⦌𝑅))
72	19, 71	condan 816	1 ⊢ (𝜑 → 𝐶 ∈ 𝐷)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1537   ∈ wcel 2114  ∀wral 3138  ∃wrex 3139  ⦋csb 3883   ∖ cdif 3933   ⊆ wss 3936   class class class wbr 5066   ↦ cmpt 5146  dom cdm 5555  ‘cfv 6355  (class class class)co 7156  supcsup 8904  ℂcc 10535  ℝcr 10536  +∞cpnf 10672  ℝ^*cxr 10674   < clt 10675   ≤ cle 10676   − cmin 10870  ℝ⁺crp 12390  abscabs 14593   ⇝_𝑟 crli 14842

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461  ax-cnex 10593  ax-resscn 10594  ax-1cn 10595  ax-icn 10596  ax-addcl 10597  ax-addrcl 10598  ax-mulcl 10599  ax-mulrcl 10600  ax-mulcom 10601  ax-addass 10602  ax-mulass 10603  ax-distr 10604  ax-i2m1 10605  ax-1ne0 10606  ax-1rid 10607  ax-rnegex 10608  ax-rrecex 10609  ax-cnre 10610  ax-pre-lttri 10611  ax-pre-lttrn 10612  ax-pre-ltadd 10613  ax-pre-mulgt0 10614  ax-pre-sup 10615

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-pss 3954  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4839  df-iun 4921  df-br 5067  df-opab 5129  df-mpt 5147  df-tr 5173  df-id 5460  df-eprel 5465  df-po 5474  df-so 5475  df-fr 5514  df-we 5516  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-pred 6148  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-riota 7114  df-ov 7159  df-oprab 7160  df-mpo 7161  df-om 7581  df-2nd 7690  df-wrecs 7947  df-recs 8008  df-rdg 8046  df-er 8289  df-pm 8409  df-en 8510  df-dom 8511  df-sdom 8512  df-sup 8906  df-pnf 10677  df-mnf 10678  df-xr 10679  df-ltxr 10680  df-le 10681  df-sub 10872  df-neg 10873  df-div 11298  df-nn 11639  df-2 11701  df-3 11702  df-n0 11899  df-z 11983  df-uz 12245  df-rp 12391  df-seq 13371  df-exp 13431  df-cj 14458  df-re 14459  df-im 14460  df-sqrt 14594  df-abs 14595  df-rlim 14846

This theorem is referenced by:  rlimrege0  14936  rlimrecl  14937