Theorem rlimcnp2 27031

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 4188	. . . . . . . 8 ⊢ (𝐵 ∩ (1[,)+∞)) ⊆ 𝐵
2		resmpt 6026	. . . . . . . 8 ⊢ ((𝐵 ∩ (1[,)+∞)) ⊆ 𝐵 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
3	1, 2	mp1i 13	. . . . . . 7 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
4		0xr 11229	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ*
5		0lt1 11709	. . . . . . . . . . 11 ⊢ 0 < 1
6		df-ioo 13353	. . . . . . . . . . . 12 ⊢ (,) = (𝑥 ∈ ℝ*, 𝑦 ∈ ℝ* ↦ {𝑧 ∈ ℝ* ∣ (𝑥 < 𝑧 ∧ 𝑧 < 𝑦)})
7		df-ico 13355	. . . . . . . . . . . 12 ⊢ [,) = (𝑥 ∈ ℝ*, 𝑦 ∈ ℝ* ↦ {𝑧 ∈ ℝ* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 < 𝑦)})
8		xrltletr 13159	. . . . . . . . . . . 12 ⊢ ((0 ∈ ℝ* ∧ 1 ∈ ℝ* ∧ 𝑤 ∈ ℝ*) → ((0 < 1 ∧ 1 ≤ 𝑤) → 0 < 𝑤))
9	6, 7, 8	ixxss1 13367	. . . . . . . . . . 11 ⊢ ((0 ∈ ℝ* ∧ 0 < 1) → (1[,)+∞) ⊆ (0(,)+∞))
10	4, 5, 9	mp2an 702	. . . . . . . . . 10 ⊢ (1[,)+∞) ⊆ (0(,)+∞)
11		ioorp 13429	. . . . . . . . . 10 ⊢ (0(,)+∞) = ℝ+
12	10, 11	sseqtri 3984	. . . . . . . . 9 ⊢ (1[,)+∞) ⊆ ℝ+
13		sslin 4194	. . . . . . . . 9 ⊢ ((1[,)+∞) ⊆ ℝ+ → (𝐵 ∩ (1[,)+∞)) ⊆ (𝐵 ∩ ℝ+))
14	12, 13	ax-mp 5	. . . . . . . 8 ⊢ (𝐵 ∩ (1[,)+∞)) ⊆ (𝐵 ∩ ℝ+)
15		resmpt 6026	. . . . . . . 8 ⊢ ((𝐵 ∩ (1[,)+∞)) ⊆ (𝐵 ∩ ℝ+) → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
16	14, 15	mp1i 13	. . . . . . 7 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
17	3, 16	eqtr4d 2800	. . . . . 6 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))))
18		resres 5978	. . . . . 6 ⊢ (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞)))
19		resres 5978	. . . . . 6 ⊢ (((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞)))
20	17, 18, 19	3eqtr4g 2822	. . . . 5 ⊢ (𝜑 → (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = (((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)))
21		rlimcnp2.r	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐵) → 𝑆 ∈ ℂ)
22	21	fmpttd 7096	. . . . . . . 8 ⊢ (𝜑 → (𝑦 ∈ 𝐵 ↦ 𝑆):𝐵⟶ℂ)
23	22	ffnd 6692	. . . . . . 7 ⊢ (𝜑 → (𝑦 ∈ 𝐵 ↦ 𝑆) Fn 𝐵)
24		fnresdm 6640	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ↦ 𝑆) Fn 𝐵 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ 𝐵 ↦ 𝑆))
25	23, 24	syl 17	. . . . . 6 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ 𝐵 ↦ 𝑆))
26	25	reseq1d 5964	. . . . 5 ⊢ (𝜑 → (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)))
27		elinel1 4153	. . . . . . . . . 10 ⊢ (𝑦 ∈ (𝐵 ∩ ℝ+) → 𝑦 ∈ 𝐵)
28	27, 21	sylan2 602	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → 𝑆 ∈ ℂ)
29	28	fmpttd 7096	. . . . . . . 8 ⊢ (𝜑 → (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆):(𝐵 ∩ ℝ+)⟶ℂ)
30		frel 6697	. . . . . . . 8 ⊢ ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆):(𝐵 ∩ ℝ+)⟶ℂ → Rel (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
31	29, 30	syl 17	. . . . . . 7 ⊢ (𝜑 → Rel (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
32		eqid 2762	. . . . . . . . 9 ⊢ (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆)
33	32, 28	dmmptd 6666	. . . . . . . 8 ⊢ (𝜑 → dom (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) = (𝐵 ∩ ℝ+))
34		inss1 4188	. . . . . . . 8 ⊢ (𝐵 ∩ ℝ+) ⊆ 𝐵
35	33, 34	eqsstrdi 3980	. . . . . . 7 ⊢ (𝜑 → dom (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⊆ 𝐵)
36		relssres 6008	. . . . . . 7 ⊢ ((Rel (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ∧ dom (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⊆ 𝐵) → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
37	31, 35, 36	syl2anc 593	. . . . . 6 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
38	37	reseq1d 5964	. . . . 5 ⊢ (𝜑 → (((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)))
39	20, 26, 38	3eqtr3d 2805	. . . 4 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)))
40	39	breq1d 5110	. . 3 ⊢ (𝜑 → (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶 ↔ ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶))
41		rlimcnp2.b	. . . 4 ⊢ (𝜑 → 𝐵 ⊆ ℝ)
42		1red 11182	. . . 4 ⊢ (𝜑 → 1 ∈ ℝ)
43	22, 41, 42	rlimresb 15592	. . 3 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ⇝𝑟 𝐶 ↔ ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶))
44	34, 41	sstrid 3947	. . . 4 ⊢ (𝜑 → (𝐵 ∩ ℝ+) ⊆ ℝ)
45	29, 44, 42	rlimresb 15592	. . 3 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⇝𝑟 𝐶 ↔ ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶))
46	40, 43, 45	3bitr4d 313	. 2 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ⇝𝑟 𝐶 ↔ (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⇝𝑟 𝐶))
47		inss2 4189	. . . . . . . . . . 11 ⊢ (𝐵 ∩ ℝ+) ⊆ ℝ+
48	47	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 ∩ ℝ+) ⊆ ℝ+)
49	48	sselda 3936	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → 𝑦 ∈ ℝ+)
50	49	rpreccld 13047	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → (1 / 𝑦) ∈ ℝ+)
51	50	rpne0d 13042	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → (1 / 𝑦) ≠ 0)
52	51	neneqd 2962	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → ¬ (1 / 𝑦) = 0)
53	52	iffalsed 4491	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅) = ⦋(1 / 𝑦) / 𝑥⦌𝑅)
54		oveq2 7404	. . . . . . . . . 10 ⊢ (𝑥 = (1 / 𝑦) → (1 / 𝑥) = (1 / (1 / 𝑦)))
55		rpcnne0 13012	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ+ → (𝑦 ∈ ℂ ∧ 𝑦 ≠ 0))
56		recrec 11888	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 0) → (1 / (1 / 𝑦)) = 𝑦)
57	49, 55, 56	3syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → (1 / (1 / 𝑦)) = 𝑦)
58	54, 57	sylan9eqr 2819	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → (1 / 𝑥) = 𝑦)
59	58	eqcomd 2768	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → 𝑦 = (1 / 𝑥))
60		rlimcnp2.s	. . . . . . . 8 ⊢ (𝑦 = (1 / 𝑥) → 𝑆 = 𝑅)
61	59, 60	syl 17	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → 𝑆 = 𝑅)
62	61	eqcomd 2768	. . . . . 6 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → 𝑅 = 𝑆)
63	50, 62	csbied 3888	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → ⦋(1 / 𝑦) / 𝑥⦌𝑅 = 𝑆)
64	53, 63	eqtrd 2797	. . . 4 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅) = 𝑆)
65	64	mpteq2dva 5193	. . 3 ⊢ (𝜑 → (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
66	65	breq1d 5110	. 2 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) ⇝𝑟 𝐶 ↔ (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⇝𝑟 𝐶))
67		rlimcnp2.a	. . . 4 ⊢ (𝜑 → 𝐴 ⊆ (0[,)+∞))
68		rlimcnp2.0	. . . 4 ⊢ (𝜑 → 0 ∈ 𝐴)
69		rlimcnp2.c	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ ℂ)
70	69	ad2antrr 736	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ 𝑤 = 0) → 𝐶 ∈ ℂ)
71	67	sselda 3936	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → 𝑤 ∈ (0[,)+∞))
72		0re 11183	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℝ
73		pnfxr 11236	. . . . . . . . . . . . 13 ⊢ +∞ ∈ ℝ*
74		elico2 13414	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ +∞ ∈ ℝ*) → (𝑤 ∈ (0[,)+∞) ↔ (𝑤 ∈ ℝ ∧ 0 ≤ 𝑤 ∧ 𝑤 < +∞)))
75	72, 73, 74	mp2an 702	. . . . . . . . . . . 12 ⊢ (𝑤 ∈ (0[,)+∞) ↔ (𝑤 ∈ ℝ ∧ 0 ≤ 𝑤 ∧ 𝑤 < +∞))
76	71, 75	sylib 220	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (𝑤 ∈ ℝ ∧ 0 ≤ 𝑤 ∧ 𝑤 < +∞))
77	76	simp1d 1155	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → 𝑤 ∈ ℝ)
78	77	adantr 484	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝑤 ∈ ℝ)
79	76	simp2d 1156	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → 0 ≤ 𝑤)
80		leloe 11269	. . . . . . . . . . . . . . 15 ⊢ ((0 ∈ ℝ ∧ 𝑤 ∈ ℝ) → (0 ≤ 𝑤 ↔ (0 < 𝑤 ∨ 0 = 𝑤)))
81	72, 77, 80	sylancr 596	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (0 ≤ 𝑤 ↔ (0 < 𝑤 ∨ 0 = 𝑤)))
82	79, 81	mpbid 234	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (0 < 𝑤 ∨ 0 = 𝑤))
83	82	ord 875	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (¬ 0 < 𝑤 → 0 = 𝑤))
84		eqcom 2769	. . . . . . . . . . . 12 ⊢ (0 = 𝑤 ↔ 𝑤 = 0)
85	83, 84	imbitrdi 253	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (¬ 0 < 𝑤 → 𝑤 = 0))
86	85	con1d 145	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (¬ 𝑤 = 0 → 0 < 𝑤))
87	86	imp 410	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 0 < 𝑤)
88	78, 87	elrpd 13034	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝑤 ∈ ℝ+)
89		rpcnne0 13012	. . . . . . . . 9 ⊢ (𝑤 ∈ ℝ+ → (𝑤 ∈ ℂ ∧ 𝑤 ≠ 0))
90		recrec 11888	. . . . . . . . 9 ⊢ ((𝑤 ∈ ℂ ∧ 𝑤 ≠ 0) → (1 / (1 / 𝑤)) = 𝑤)
91	89, 90	syl 17	. . . . . . . 8 ⊢ (𝑤 ∈ ℝ+ → (1 / (1 / 𝑤)) = 𝑤)
92	88, 91	syl 17	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / (1 / 𝑤)) = 𝑤)
93	92	csbeq1d 3856	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅 = ⦋𝑤 / 𝑥⦌𝑅)
94		oveq2 7404	. . . . . . . . 9 ⊢ (𝑦 = (1 / 𝑤) → (1 / 𝑦) = (1 / (1 / 𝑤)))
95	94	csbeq1d 3856	. . . . . . . 8 ⊢ (𝑦 = (1 / 𝑤) → ⦋(1 / 𝑦) / 𝑥⦌𝑅 = ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅)
96	95	eleq1d 2847	. . . . . . 7 ⊢ (𝑦 = (1 / 𝑤) → (⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ ↔ ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅 ∈ ℂ))
97	63, 28	eqeltrd 2862	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → ⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ)
98	97	ralrimiva 3154	. . . . . . . 8 ⊢ (𝜑 → ∀𝑦 ∈ (𝐵 ∩ ℝ+)⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ)
99	98	ad2antrr 736	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ∀𝑦 ∈ (𝐵 ∩ ℝ+)⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ)
100		simplr 778	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝑤 ∈ 𝐴)
101		simpll 776	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝜑)
102		eleq1 2850	. . . . . . . . . . . . 13 ⊢ (𝑦 = (1 / 𝑤) → (𝑦 ∈ 𝐵 ↔ (1 / 𝑤) ∈ 𝐵))
103	94	eleq1d 2847	. . . . . . . . . . . . 13 ⊢ (𝑦 = (1 / 𝑤) → ((1 / 𝑦) ∈ 𝐴 ↔ (1 / (1 / 𝑤)) ∈ 𝐴))
104	102, 103	bibi12d 347	. . . . . . . . . . . 12 ⊢ (𝑦 = (1 / 𝑤) → ((𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴) ↔ ((1 / 𝑤) ∈ 𝐵 ↔ (1 / (1 / 𝑤)) ∈ 𝐴)))
105		rlimcnp2.d	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ+) → (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
106	105	ralrimiva 3154	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑦 ∈ ℝ+ (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
107	106	adantr 484	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ∀𝑦 ∈ ℝ+ (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
108		rpreccl 13021	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℝ+ → (1 / 𝑤) ∈ ℝ+)
109	108	adantl 485	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (1 / 𝑤) ∈ ℝ+)
110	104, 107, 109	rspcdva 3582	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ((1 / 𝑤) ∈ 𝐵 ↔ (1 / (1 / 𝑤)) ∈ 𝐴))
111	91	adantl 485	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (1 / (1 / 𝑤)) = 𝑤)
112	111	eleq1d 2847	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ((1 / (1 / 𝑤)) ∈ 𝐴 ↔ 𝑤 ∈ 𝐴))
113	110, 112	bitr2d 282	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 ∈ 𝐴 ↔ (1 / 𝑤) ∈ 𝐵))
114	101, 88, 113	syl2anc 593	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (𝑤 ∈ 𝐴 ↔ (1 / 𝑤) ∈ 𝐵))
115	100, 114	mpbid 234	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / 𝑤) ∈ 𝐵)
116	88	rpreccld 13047	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / 𝑤) ∈ ℝ+)
117	115, 116	elind 4152	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / 𝑤) ∈ (𝐵 ∩ ℝ+))
118	96, 99, 117	rspcdva 3582	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅 ∈ ℂ)
119	93, 118	eqeltrrd 2863	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ⦋𝑤 / 𝑥⦌𝑅 ∈ ℂ)
120	70, 119	ifclda 4516	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅) ∈ ℂ)
121	109	biantrud 539	. . . . . 6 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ((1 / 𝑤) ∈ 𝐵 ↔ ((1 / 𝑤) ∈ 𝐵 ∧ (1 / 𝑤) ∈ ℝ+)))
122	113, 121	bitrd 281	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 ∈ 𝐴 ↔ ((1 / 𝑤) ∈ 𝐵 ∧ (1 / 𝑤) ∈ ℝ+)))
123		elin 3920	. . . . 5 ⊢ ((1 / 𝑤) ∈ (𝐵 ∩ ℝ+) ↔ ((1 / 𝑤) ∈ 𝐵 ∧ (1 / 𝑤) ∈ ℝ+))
124	122, 123	bitr4di 291	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 ∈ 𝐴 ↔ (1 / 𝑤) ∈ (𝐵 ∩ ℝ+)))
125		iftrue 4486	. . . 4 ⊢ (𝑤 = 0 → if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅) = 𝐶)
126		eqeq1 2766	. . . . 5 ⊢ (𝑤 = (1 / 𝑦) → (𝑤 = 0 ↔ (1 / 𝑦) = 0))
127		csbeq1 3855	. . . . 5 ⊢ (𝑤 = (1 / 𝑦) → ⦋𝑤 / 𝑥⦌𝑅 = ⦋(1 / 𝑦) / 𝑥⦌𝑅)
128	126, 127	ifbieq2d 4507	. . . 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 27030	. . 3 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) ⇝𝑟 𝐶 ↔ (𝑤 ∈ 𝐴 ↦ if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅)) ∈ ((𝐾 CnP 𝐽)‘0)))
132		nfcv 2924	. . . . 5 ⊢ Ⅎ𝑤if(𝑥 = 0, 𝐶, 𝑅)
133		nfv 1934	. . . . . 6 ⊢ Ⅎ𝑥 𝑤 = 0
134		nfcv 2924	. . . . . 6 ⊢ Ⅎ𝑥𝐶
135		nfcsb1v 3876	. . . . . 6 ⊢ Ⅎ𝑥⦋𝑤 / 𝑥⦌𝑅
136	133, 134, 135	nfif 4511	. . . . 5 ⊢ Ⅎ𝑥if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅)
137		eqeq1 2766	. . . . . 6 ⊢ (𝑥 = 𝑤 → (𝑥 = 0 ↔ 𝑤 = 0))
138		csbeq1a 3866	. . . . . 6 ⊢ (𝑥 = 𝑤 → 𝑅 = ⦋𝑤 / 𝑥⦌𝑅)
139	137, 138	ifbieq2d 4507	. . . . 5 ⊢ (𝑥 = 𝑤 → if(𝑥 = 0, 𝐶, 𝑅) = if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅))
140	132, 136, 139	cbvmpt 5202	. . . 4 ⊢ (𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) = (𝑤 ∈ 𝐴 ↦ if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅))
141	140	eleq1i 2853	. . 3 ⊢ ((𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) ∈ ((𝐾 CnP 𝐽)‘0) ↔ (𝑤 ∈ 𝐴 ↦ if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅)) ∈ ((𝐾 CnP 𝐽)‘0))
142	131, 141	bitr4di 291	. 2 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) ⇝𝑟 𝐶 ↔ (𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) ∈ ((𝐾 CnP 𝐽)‘0)))
143	46, 66, 142	3bitr2d 309	1 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ⇝𝑟 𝐶 ↔ (𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) ∈ ((𝐾 CnP 𝐽)‘0)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 399   ∨ wo 858   ∧ w3a 1098   = wceq 1560   ∈ wcel 2142   ≠ wne 2957  ∀wral 3076  ⦋csb 3852   ∩ cin 3903   ⊆ wss 3904  ifcif 4480   class class class wbr 5100   ↦ cmpt 5181  dom cdm 5647   ↾ cres 5649  Rel wrel 5652   Fn wfn 6516  ⟶wf 6517  ‘cfv 6521  (class class class)co 7396  ℂcc 11071  ℝcr 11072  0cc0 11073  1c1 11074  +∞cpnf 11213  ℝ^*cxr 11215   < clt 11216   ≤ cle 11217   / cdiv 11844  ℝ⁺crp 12993  (,)cioo 13349  [,)cico 13351   ⇝_𝑟 crli 15512   ↾_t crest 17449  TopOpenctopn 17450  ℂ_fldccnfld 21424   CnP ccnp 23285

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5227  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718  ax-cnex 11129  ax-resscn 11130  ax-1cn 11131  ax-icn 11132  ax-addcl 11133  ax-addrcl 11134  ax-mulcl 11135  ax-mulrcl 11136  ax-mulcom 11137  ax-addass 11138  ax-mulass 11139  ax-distr 11140  ax-i2m1 11141  ax-1ne0 11142  ax-1rid 11143  ax-rnegex 11144  ax-rrecex 11145  ax-cnre 11146  ax-pre-lttri 11147  ax-pre-lttrn 11148  ax-pre-ltadd 11149  ax-pre-mulgt0 11150  ax-pre-sup 11151

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1099  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-iun 4951  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6288  df-ord 6349  df-on 6350  df-lim 6351  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-riota 7353  df-ov 7399  df-oprab 7400  df-mpo 7401  df-om 7847  df-1st 7970  df-2nd 7971  df-frecs 8262  df-wrecs 8293  df-recs 8342  df-rdg 8381  df-1o 8437  df-er 8678  df-map 8810  df-pm 8811  df-en 8928  df-dom 8929  df-sdom 8930  df-fin 8931  df-sup 9388  df-inf 9389  df-pnf 11218  df-mnf 11219  df-xr 11220  df-ltxr 11221  df-le 11222  df-sub 11416  df-neg 11417  df-div 11845  df-nn 12211  df-2 12280  df-3 12281  df-4 12282  df-5 12283  df-6 12284  df-7 12285  df-8 12286  df-9 12287  df-n0 12482  df-z 12569  df-dec 12689  df-uz 12840  df-q 12950  df-rp 12994  df-xneg 13114  df-xadd 13115  df-xmul 13116  df-ioo 13353  df-ico 13355  df-fz 13513  df-seq 14015  df-exp 14075  df-cj 15126  df-re 15127  df-im 15128  df-sqrt 15262  df-abs 15263  df-rlim 15516  df-struct 17183  df-slot 17218  df-ndx 17230  df-base 17246  df-plusg 17299  df-mulr 17300  df-starv 17301  df-tset 17305  df-ple 17306  df-ds 17308  df-unif 17309  df-rest 17451  df-topn 17452  df-topgen 17472  df-psmet 21416  df-xmet 21417  df-met 21418  df-bl 21419  df-mopn 21420  df-cnfld 21425  df-top 22954  df-topon 22971  df-bases 23006  df-cnp 23288

This theorem is referenced by:  rlimcnp3  27032