Theorem rlimcnp2 27097

Description: Relate a limit of a real-valued sequence at infinity to the continuity of the function 𝑆(𝑦) = 𝑅(1 / 𝑦) at zero. (Contributed by Mario Carneiro, 1-Mar-2015.)

Hypotheses

Ref	Expression
rlimcnp2.a	⊢ (𝜑 → 𝐴 ⊆ (0[,)+∞))
rlimcnp2.0	⊢ (𝜑 → 0 ∈ 𝐴)
rlimcnp2.b	⊢ (𝜑 → 𝐵 ⊆ ℝ)
rlimcnp2.c	⊢ (𝜑 → 𝐶 ∈ ℂ)
rlimcnp2.r	⊢ ((𝜑 ∧ 𝑦 ∈ 𝐵) → 𝑆 ∈ ℂ)
rlimcnp2.d	⊢ ((𝜑 ∧ 𝑦 ∈ ℝ+) → (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
rlimcnp2.s	⊢ (𝑦 = (1 / 𝑥) → 𝑆 = 𝑅)
rlimcnp2.j	⊢ 𝐽 = (TopOpen‘ℂfld)
rlimcnp2.k	⊢ 𝐾 = (𝐽 ↾t 𝐴)

Assertion

Ref	Expression
rlimcnp2	⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ⇝𝑟 𝐶 ↔ (𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) ∈ ((𝐾 CnP 𝐽)‘0)))

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

Allowed substitution hints:   𝑅(𝑥)   𝑆(𝑦)   𝐽(𝑥,𝑦)   𝐾(𝑥,𝑦)

Proof of Theorem rlimcnp2

Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		inss1 4197	. . . . . . . 8 ⊢ (𝐵 ∩ (1[,)+∞)) ⊆ 𝐵
2		resmpt 6040	. . . . . . . 8 ⊢ ((𝐵 ∩ (1[,)+∞)) ⊆ 𝐵 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
3	1, 2	mp1i 14	. . . . . . 7 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
4		0xr 11256	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ*
5		0lt1 11736	. . . . . . . . . . 11 ⊢ 0 < 1
6		df-ioo 13376	. . . . . . . . . . . 12 ⊢ (,) = (𝑥 ∈ ℝ*, 𝑦 ∈ ℝ* ↦ {𝑧 ∈ ℝ* ∣ (𝑥 < 𝑧 ∧ 𝑧 < 𝑦)})
7		df-ico 13378	. . . . . . . . . . . 12 ⊢ [,) = (𝑥 ∈ ℝ*, 𝑦 ∈ ℝ* ↦ {𝑧 ∈ ℝ* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 < 𝑦)})
8		xrltletr 13182	. . . . . . . . . . . 12 ⊢ ((0 ∈ ℝ* ∧ 1 ∈ ℝ* ∧ 𝑤 ∈ ℝ*) → ((0 < 1 ∧ 1 ≤ 𝑤) → 0 < 𝑤))
9	6, 7, 8	ixxss1 13390	. . . . . . . . . . 11 ⊢ ((0 ∈ ℝ* ∧ 0 < 1) → (1[,)+∞) ⊆ (0(,)+∞))
10	4, 5, 9	mp2an 704	. . . . . . . . . 10 ⊢ (1[,)+∞) ⊆ (0(,)+∞)
11		ioorp 13452	. . . . . . . . . 10 ⊢ (0(,)+∞) = ℝ+
12	10, 11	sseqtri 3993	. . . . . . . . 9 ⊢ (1[,)+∞) ⊆ ℝ+
13		sslin 4203	. . . . . . . . 9 ⊢ ((1[,)+∞) ⊆ ℝ+ → (𝐵 ∩ (1[,)+∞)) ⊆ (𝐵 ∩ ℝ+))
14	12, 13	ax-mp 5	. . . . . . . 8 ⊢ (𝐵 ∩ (1[,)+∞)) ⊆ (𝐵 ∩ ℝ+)
15		resmpt 6040	. . . . . . . 8 ⊢ ((𝐵 ∩ (1[,)+∞)) ⊆ (𝐵 ∩ ℝ+) → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
16	14, 15	mp1i 14	. . . . . . 7 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
17	3, 16	eqtr4d 2807	. . . . . 6 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))))
18		resres 5992	. . . . . 6 ⊢ (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞)))
19		resres 5992	. . . . . 6 ⊢ (((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞)))
20	17, 18, 19	3eqtr4g 2829	. . . . 5 ⊢ (𝜑 → (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = (((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)))
21		rlimcnp2.r	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐵) → 𝑆 ∈ ℂ)
22	21	fmpttd 7111	. . . . . . . 8 ⊢ (𝜑 → (𝑦 ∈ 𝐵 ↦ 𝑆):𝐵⟶ℂ)
23	22	ffnd 6707	. . . . . . 7 ⊢ (𝜑 → (𝑦 ∈ 𝐵 ↦ 𝑆) Fn 𝐵)
24		fnresdm 6655	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ↦ 𝑆) Fn 𝐵 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ 𝐵 ↦ 𝑆))
25	23, 24	syl 18	. . . . . 6 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ 𝐵 ↦ 𝑆))
26	25	reseq1d 5978	. . . . 5 ⊢ (𝜑 → (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)))
27		elinel1 4162	. . . . . . . . . 10 ⊢ (𝑦 ∈ (𝐵 ∩ ℝ+) → 𝑦 ∈ 𝐵)
28	27, 21	sylan2 604	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → 𝑆 ∈ ℂ)
29	28	fmpttd 7111	. . . . . . . 8 ⊢ (𝜑 → (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆):(𝐵 ∩ ℝ+)⟶ℂ)
30		frel 6712	. . . . . . . 8 ⊢ ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆):(𝐵 ∩ ℝ+)⟶ℂ → Rel (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
31	29, 30	syl 18	. . . . . . 7 ⊢ (𝜑 → Rel (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
32		eqid 2769	. . . . . . . . 9 ⊢ (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆)
33	32, 28	dmmptd 6681	. . . . . . . 8 ⊢ (𝜑 → dom (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) = (𝐵 ∩ ℝ+))
34		inss1 4197	. . . . . . . 8 ⊢ (𝐵 ∩ ℝ+) ⊆ 𝐵
35	33, 34	eqsstrdi 3989	. . . . . . 7 ⊢ (𝜑 → dom (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⊆ 𝐵)
36		relssres 6022	. . . . . . 7 ⊢ ((Rel (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ∧ dom (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⊆ 𝐵) → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
37	31, 35, 36	syl2anc 595	. . . . . 6 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
38	37	reseq1d 5978	. . . . 5 ⊢ (𝜑 → (((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)))
39	20, 26, 38	3eqtr3d 2812	. . . 4 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)))
40	39	breq1d 5123	. . 3 ⊢ (𝜑 → (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶 ↔ ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶))
41		rlimcnp2.b	. . . 4 ⊢ (𝜑 → 𝐵 ⊆ ℝ)
42		1red 11209	. . . 4 ⊢ (𝜑 → 1 ∈ ℝ)
43	22, 41, 42	rlimresb 15616	. . 3 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ⇝𝑟 𝐶 ↔ ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶))
44	34, 41	sstrid 3956	. . . 4 ⊢ (𝜑 → (𝐵 ∩ ℝ+) ⊆ ℝ)
45	29, 44, 42	rlimresb 15616	. . 3 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⇝𝑟 𝐶 ↔ ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶))
46	40, 43, 45	3bitr4d 314	. 2 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ⇝𝑟 𝐶 ↔ (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⇝𝑟 𝐶))
47		inss2 4198	. . . . . . . . . . 11 ⊢ (𝐵 ∩ ℝ+) ⊆ ℝ+
48	47	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 ∩ ℝ+) ⊆ ℝ+)
49	48	sselda 3945	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → 𝑦 ∈ ℝ+)
50	49	rpreccld 13070	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → (1 / 𝑦) ∈ ℝ+)
51	50	rpne0d 13065	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → (1 / 𝑦) ≠ 0)
52	51	neneqd 2969	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → ¬ (1 / 𝑦) = 0)
53	52	iffalsed 4503	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅) = ⦋(1 / 𝑦) / 𝑥⦌𝑅)
54		oveq2 7419	. . . . . . . . . 10 ⊢ (𝑥 = (1 / 𝑦) → (1 / 𝑥) = (1 / (1 / 𝑦)))
55		rpcnne0 13035	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ+ → (𝑦 ∈ ℂ ∧ 𝑦 ≠ 0))
56		recrec 11912	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 0) → (1 / (1 / 𝑦)) = 𝑦)
57	49, 55, 56	3syl 19	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → (1 / (1 / 𝑦)) = 𝑦)
58	54, 57	sylan9eqr 2826	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → (1 / 𝑥) = 𝑦)
59	58	eqcomd 2775	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → 𝑦 = (1 / 𝑥))
60		rlimcnp2.s	. . . . . . . 8 ⊢ (𝑦 = (1 / 𝑥) → 𝑆 = 𝑅)
61	59, 60	syl 18	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → 𝑆 = 𝑅)
62	61	eqcomd 2775	. . . . . 6 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → 𝑅 = 𝑆)
63	50, 62	csbied 3897	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → ⦋(1 / 𝑦) / 𝑥⦌𝑅 = 𝑆)
64	53, 63	eqtrd 2804	. . . 4 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅) = 𝑆)
65	64	mpteq2dva 5208	. . 3 ⊢ (𝜑 → (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
66	65	breq1d 5123	. 2 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) ⇝𝑟 𝐶 ↔ (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⇝𝑟 𝐶))
67		rlimcnp2.a	. . . 4 ⊢ (𝜑 → 𝐴 ⊆ (0[,)+∞))
68		rlimcnp2.0	. . . 4 ⊢ (𝜑 → 0 ∈ 𝐴)
69		rlimcnp2.c	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ ℂ)
70	69	ad2antrr 738	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ 𝑤 = 0) → 𝐶 ∈ ℂ)
71	67	sselda 3945	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → 𝑤 ∈ (0[,)+∞))
72		0re 11210	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℝ
73		pnfxr 11263	. . . . . . . . . . . . 13 ⊢ +∞ ∈ ℝ*
74		elico2 13437	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ +∞ ∈ ℝ*) → (𝑤 ∈ (0[,)+∞) ↔ (𝑤 ∈ ℝ ∧ 0 ≤ 𝑤 ∧ 𝑤 < +∞)))
75	72, 73, 74	mp2an 704	. . . . . . . . . . . 12 ⊢ (𝑤 ∈ (0[,)+∞) ↔ (𝑤 ∈ ℝ ∧ 0 ≤ 𝑤 ∧ 𝑤 < +∞))
76	71, 75	sylib 221	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (𝑤 ∈ ℝ ∧ 0 ≤ 𝑤 ∧ 𝑤 < +∞))
77	76	simp1d 1158	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → 𝑤 ∈ ℝ)
78	77	adantr 485	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝑤 ∈ ℝ)
79	76	simp2d 1159	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → 0 ≤ 𝑤)
80		leloe 11296	. . . . . . . . . . . . . . 15 ⊢ ((0 ∈ ℝ ∧ 𝑤 ∈ ℝ) → (0 ≤ 𝑤 ↔ (0 < 𝑤 ∨ 0 = 𝑤)))
81	72, 77, 80	sylancr 598	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (0 ≤ 𝑤 ↔ (0 < 𝑤 ∨ 0 = 𝑤)))
82	79, 81	mpbid 235	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (0 < 𝑤 ∨ 0 = 𝑤))
83	82	ord 877	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (¬ 0 < 𝑤 → 0 = 𝑤))
84		eqcom 2776	. . . . . . . . . . . 12 ⊢ (0 = 𝑤 ↔ 𝑤 = 0)
85	83, 84	imbitrdi 254	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (¬ 0 < 𝑤 → 𝑤 = 0))
86	85	con1d 146	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (¬ 𝑤 = 0 → 0 < 𝑤))
87	86	imp 411	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 0 < 𝑤)
88	78, 87	elrpd 13057	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝑤 ∈ ℝ+)
89		rpcnne0 13035	. . . . . . . . 9 ⊢ (𝑤 ∈ ℝ+ → (𝑤 ∈ ℂ ∧ 𝑤 ≠ 0))
90		recrec 11912	. . . . . . . . 9 ⊢ ((𝑤 ∈ ℂ ∧ 𝑤 ≠ 0) → (1 / (1 / 𝑤)) = 𝑤)
91	89, 90	syl 18	. . . . . . . 8 ⊢ (𝑤 ∈ ℝ+ → (1 / (1 / 𝑤)) = 𝑤)
92	88, 91	syl 18	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / (1 / 𝑤)) = 𝑤)
93	92	csbeq1d 3865	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅 = ⦋𝑤 / 𝑥⦌𝑅)
94		oveq2 7419	. . . . . . . . 9 ⊢ (𝑦 = (1 / 𝑤) → (1 / 𝑦) = (1 / (1 / 𝑤)))
95	94	csbeq1d 3865	. . . . . . . 8 ⊢ (𝑦 = (1 / 𝑤) → ⦋(1 / 𝑦) / 𝑥⦌𝑅 = ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅)
96	95	eleq1d 2854	. . . . . . 7 ⊢ (𝑦 = (1 / 𝑤) → (⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ ↔ ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅 ∈ ℂ))
97	63, 28	eqeltrd 2869	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → ⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ)
98	97	ralrimiva 3163	. . . . . . . 8 ⊢ (𝜑 → ∀𝑦 ∈ (𝐵 ∩ ℝ+)⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ)
99	98	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ∀𝑦 ∈ (𝐵 ∩ ℝ+)⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ)
100		simplr 780	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝑤 ∈ 𝐴)
101		simpll 778	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝜑)
102		eleq1 2857	. . . . . . . . . . . . 13 ⊢ (𝑦 = (1 / 𝑤) → (𝑦 ∈ 𝐵 ↔ (1 / 𝑤) ∈ 𝐵))
103	94	eleq1d 2854	. . . . . . . . . . . . 13 ⊢ (𝑦 = (1 / 𝑤) → ((1 / 𝑦) ∈ 𝐴 ↔ (1 / (1 / 𝑤)) ∈ 𝐴))
104	102, 103	bibi12d 348	. . . . . . . . . . . 12 ⊢ (𝑦 = (1 / 𝑤) → ((𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴) ↔ ((1 / 𝑤) ∈ 𝐵 ↔ (1 / (1 / 𝑤)) ∈ 𝐴)))
105		rlimcnp2.d	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ+) → (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
106	105	ralrimiva 3163	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑦 ∈ ℝ+ (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
107	106	adantr 485	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ∀𝑦 ∈ ℝ+ (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
108		rpreccl 13044	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℝ+ → (1 / 𝑤) ∈ ℝ+)
109	108	adantl 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (1 / 𝑤) ∈ ℝ+)
110	104, 107, 109	rspcdva 3591	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ((1 / 𝑤) ∈ 𝐵 ↔ (1 / (1 / 𝑤)) ∈ 𝐴))
111	91	adantl 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (1 / (1 / 𝑤)) = 𝑤)
112	111	eleq1d 2854	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ((1 / (1 / 𝑤)) ∈ 𝐴 ↔ 𝑤 ∈ 𝐴))
113	110, 112	bitr2d 283	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 ∈ 𝐴 ↔ (1 / 𝑤) ∈ 𝐵))
114	101, 88, 113	syl2anc 595	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (𝑤 ∈ 𝐴 ↔ (1 / 𝑤) ∈ 𝐵))
115	100, 114	mpbid 235	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / 𝑤) ∈ 𝐵)
116	88	rpreccld 13070	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / 𝑤) ∈ ℝ+)
117	115, 116	elind 4161	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / 𝑤) ∈ (𝐵 ∩ ℝ+))
118	96, 99, 117	rspcdva 3591	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅 ∈ ℂ)
119	93, 118	eqeltrrd 2870	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ⦋𝑤 / 𝑥⦌𝑅 ∈ ℂ)
120	70, 119	ifclda 4528	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅) ∈ ℂ)
121	109	biantrud 540	. . . . . 6 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ((1 / 𝑤) ∈ 𝐵 ↔ ((1 / 𝑤) ∈ 𝐵 ∧ (1 / 𝑤) ∈ ℝ+)))
122	113, 121	bitrd 282	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 ∈ 𝐴 ↔ ((1 / 𝑤) ∈ 𝐵 ∧ (1 / 𝑤) ∈ ℝ+)))
123		elin 3929	. . . . 5 ⊢ ((1 / 𝑤) ∈ (𝐵 ∩ ℝ+) ↔ ((1 / 𝑤) ∈ 𝐵 ∧ (1 / 𝑤) ∈ ℝ+))
124	122, 123	bitr4di 292	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 ∈ 𝐴 ↔ (1 / 𝑤) ∈ (𝐵 ∩ ℝ+)))
125		iftrue 4498	. . . 4 ⊢ (𝑤 = 0 → if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅) = 𝐶)
126		eqeq1 2773	. . . . 5 ⊢ (𝑤 = (1 / 𝑦) → (𝑤 = 0 ↔ (1 / 𝑦) = 0))
127		csbeq1 3864	. . . . 5 ⊢ (𝑤 = (1 / 𝑦) → ⦋𝑤 / 𝑥⦌𝑅 = ⦋(1 / 𝑦) / 𝑥⦌𝑅)
128	126, 127	ifbieq2d 4519	. . . 4 ⊢ (𝑤 = (1 / 𝑦) → if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅) = if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅))
129		rlimcnp2.j	. . . 4 ⊢ 𝐽 = (TopOpen‘ℂfld)
130		rlimcnp2.k	. . . 4 ⊢ 𝐾 = (𝐽 ↾t 𝐴)
131	67, 68, 48, 120, 124, 125, 128, 129, 130	rlimcnp 27096	. . 3 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) ⇝𝑟 𝐶 ↔ (𝑤 ∈ 𝐴 ↦ if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅)) ∈ ((𝐾 CnP 𝐽)‘0)))
132		nfcv 2931	. . . . 5 ⊢ Ⅎ𝑤if(𝑥 = 0, 𝐶, 𝑅)
133		nfv 1941	. . . . . 6 ⊢ Ⅎ𝑥 𝑤 = 0
134		nfcv 2931	. . . . . 6 ⊢ Ⅎ𝑥𝐶
135		nfcsb1v 3885	. . . . . 6 ⊢ Ⅎ𝑥⦋𝑤 / 𝑥⦌𝑅
136	133, 134, 135	nfif 4523	. . . . 5 ⊢ Ⅎ𝑥if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅)
137		eqeq1 2773	. . . . . 6 ⊢ (𝑥 = 𝑤 → (𝑥 = 0 ↔ 𝑤 = 0))
138		csbeq1a 3875	. . . . . 6 ⊢ (𝑥 = 𝑤 → 𝑅 = ⦋𝑤 / 𝑥⦌𝑅)
139	137, 138	ifbieq2d 4519	. . . . 5 ⊢ (𝑥 = 𝑤 → if(𝑥 = 0, 𝐶, 𝑅) = if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅))
140	132, 136, 139	cbvmpt 5217	. . . 4 ⊢ (𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) = (𝑤 ∈ 𝐴 ↦ if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅))
141	140	eleq1i 2860	. . 3 ⊢ ((𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) ∈ ((𝐾 CnP 𝐽)‘0) ↔ (𝑤 ∈ 𝐴 ↦ if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅)) ∈ ((𝐾 CnP 𝐽)‘0))
142	131, 141	bitr4di 292	. 2 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) ⇝𝑟 𝐶 ↔ (𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) ∈ ((𝐾 CnP 𝐽)‘0)))
143	46, 66, 142	3bitr2d 310	1 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ⇝𝑟 𝐶 ↔ (𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) ∈ ((𝐾 CnP 𝐽)‘0)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∨ wo 860   ∧ w3a 1101   = wceq 1567   ∈ wcel 2149   ≠ wne 2964  ∀wral 3085  ⦋csb 3861   ∩ cin 3912   ⊆ wss 3913  ifcif 4492   class class class wbr 5113   ↦ cmpt 5196  dom cdm 5662   ↾ cres 5664  Rel wrel 5667   Fn wfn 6532  ⟶wf 6533  ‘cfv 6537  (class class class)co 7411  ℂcc 11098  ℝcr 11099  0cc0 11100  1c1 11101  +∞cpnf 11240  ℝ^*cxr 11242   < clt 11243   ≤ cle 11244   / cdiv 11871  ℝ⁺crp 13016  (,)cioo 13372  [,)cico 13374   ⇝_𝑟 crli 15536   ↾_t crest 17473  TopOpenctopn 17474  ℂ_fldccnfld 21491   CnP ccnp 23351

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-cnex 11156  ax-resscn 11157  ax-1cn 11158  ax-icn 11159  ax-addcl 11160  ax-addrcl 11161  ax-mulcl 11162  ax-mulrcl 11163  ax-mulcom 11164  ax-addass 11165  ax-mulass 11166  ax-distr 11167  ax-i2m1 11168  ax-1ne0 11169  ax-1rid 11170  ax-rnegex 11171  ax-rrecex 11172  ax-cnre 11173  ax-pre-lttri 11174  ax-pre-lttrn 11175  ax-pre-ltadd 11176  ax-pre-mulgt0 11177  ax-pre-sup 11178

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-tp 4599  df-op 4601  df-uni 4877  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7863  df-1st 7986  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-1o 8453  df-er 8694  df-map 8826  df-pm 8827  df-en 8944  df-dom 8945  df-sdom 8946  df-fin 8947  df-sup 9402  df-inf 9403  df-pnf 11245  df-mnf 11246  df-xr 11247  df-ltxr 11248  df-le 11249  df-sub 11443  df-neg 11444  df-div 11872  df-nn 12234  df-2 12303  df-3 12304  df-4 12305  df-5 12306  df-6 12307  df-7 12308  df-8 12309  df-9 12310  df-n0 12505  df-z 12592  df-dec 12712  df-uz 12863  df-q 12973  df-rp 13017  df-xneg 13137  df-xadd 13138  df-xmul 13139  df-ioo 13376  df-ico 13378  df-fz 13536  df-seq 14038  df-exp 14098  df-cj 15150  df-re 15151  df-im 15152  df-sqrt 15286  df-abs 15287  df-rlim 15540  df-struct 17207  df-slot 17242  df-ndx 17254  df-base 17270  df-plusg 17323  df-mulr 17324  df-starv 17325  df-tset 17329  df-ple 17330  df-ds 17332  df-unif 17333  df-rest 17475  df-topn 17476  df-topgen 17496  df-psmet 21483  df-xmet 21484  df-met 21485  df-bl 21486  df-mopn 21487  df-cnfld 21492  df-top 23020  df-topon 23037  df-bases 23072  df-cnp 23354

This theorem is referenced by:  rlimcnp3  27098