Theorem rlimcnp2 25546

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 4207	. . . . . . . 8 ⊢ (𝐵 ∩ (1[,)+∞)) ⊆ 𝐵
2		resmpt 5907	. . . . . . . 8 ⊢ ((𝐵 ∩ (1[,)+∞)) ⊆ 𝐵 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
3	1, 2	mp1i 13	. . . . . . 7 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
4		0xr 10690	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ*
5		0lt1 11164	. . . . . . . . . . 11 ⊢ 0 < 1
6		df-ioo 12745	. . . . . . . . . . . 12 ⊢ (,) = (𝑥 ∈ ℝ*, 𝑦 ∈ ℝ* ↦ {𝑧 ∈ ℝ* ∣ (𝑥 < 𝑧 ∧ 𝑧 < 𝑦)})
7		df-ico 12747	. . . . . . . . . . . 12 ⊢ [,) = (𝑥 ∈ ℝ*, 𝑦 ∈ ℝ* ↦ {𝑧 ∈ ℝ* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 < 𝑦)})
8		xrltletr 12553	. . . . . . . . . . . 12 ⊢ ((0 ∈ ℝ* ∧ 1 ∈ ℝ* ∧ 𝑤 ∈ ℝ*) → ((0 < 1 ∧ 1 ≤ 𝑤) → 0 < 𝑤))
9	6, 7, 8	ixxss1 12759	. . . . . . . . . . 11 ⊢ ((0 ∈ ℝ* ∧ 0 < 1) → (1[,)+∞) ⊆ (0(,)+∞))
10	4, 5, 9	mp2an 690	. . . . . . . . . 10 ⊢ (1[,)+∞) ⊆ (0(,)+∞)
11		ioorp 12817	. . . . . . . . . 10 ⊢ (0(,)+∞) = ℝ+
12	10, 11	sseqtri 4005	. . . . . . . . 9 ⊢ (1[,)+∞) ⊆ ℝ+
13		sslin 4213	. . . . . . . . 9 ⊢ ((1[,)+∞) ⊆ ℝ+ → (𝐵 ∩ (1[,)+∞)) ⊆ (𝐵 ∩ ℝ+))
14	12, 13	ax-mp 5	. . . . . . . 8 ⊢ (𝐵 ∩ (1[,)+∞)) ⊆ (𝐵 ∩ ℝ+)
15		resmpt 5907	. . . . . . . 8 ⊢ ((𝐵 ∩ (1[,)+∞)) ⊆ (𝐵 ∩ ℝ+) → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
16	14, 15	mp1i 13	. . . . . . 7 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = (𝑦 ∈ (𝐵 ∩ (1[,)+∞)) ↦ 𝑆))
17	3, 16	eqtr4d 2861	. . . . . 6 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞))))
18		resres 5868	. . . . . 6 ⊢ (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞)))
19		resres 5868	. . . . . 6 ⊢ (((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (𝐵 ∩ (1[,)+∞)))
20	17, 18, 19	3eqtr4g 2883	. . . . 5 ⊢ (𝜑 → (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = (((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)))
21		rlimcnp2.r	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐵) → 𝑆 ∈ ℂ)
22	21	fmpttd 6881	. . . . . . . 8 ⊢ (𝜑 → (𝑦 ∈ 𝐵 ↦ 𝑆):𝐵⟶ℂ)
23	22	ffnd 6517	. . . . . . 7 ⊢ (𝜑 → (𝑦 ∈ 𝐵 ↦ 𝑆) Fn 𝐵)
24		fnresdm 6468	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ↦ 𝑆) Fn 𝐵 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ 𝐵 ↦ 𝑆))
25	23, 24	syl 17	. . . . . 6 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ 𝐵 ↦ 𝑆))
26	25	reseq1d 5854	. . . . 5 ⊢ (𝜑 → (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)))
27		elinel1 4174	. . . . . . . . . 10 ⊢ (𝑦 ∈ (𝐵 ∩ ℝ+) → 𝑦 ∈ 𝐵)
28	27, 21	sylan2 594	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → 𝑆 ∈ ℂ)
29	28	fmpttd 6881	. . . . . . . 8 ⊢ (𝜑 → (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆):(𝐵 ∩ ℝ+)⟶ℂ)
30		frel 6521	. . . . . . . 8 ⊢ ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆):(𝐵 ∩ ℝ+)⟶ℂ → Rel (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
31	29, 30	syl 17	. . . . . . 7 ⊢ (𝜑 → Rel (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
32		eqid 2823	. . . . . . . . 9 ⊢ (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆)
33	32, 28	dmmptd 6495	. . . . . . . 8 ⊢ (𝜑 → dom (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) = (𝐵 ∩ ℝ+))
34		inss1 4207	. . . . . . . 8 ⊢ (𝐵 ∩ ℝ+) ⊆ 𝐵
35	33, 34	eqsstrdi 4023	. . . . . . 7 ⊢ (𝜑 → dom (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⊆ 𝐵)
36		relssres 5895	. . . . . . 7 ⊢ ((Rel (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ∧ dom (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⊆ 𝐵) → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
37	31, 35, 36	syl2anc 586	. . . . . 6 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
38	37	reseq1d 5854	. . . . 5 ⊢ (𝜑 → (((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ 𝐵) ↾ (1[,)+∞)) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)))
39	20, 26, 38	3eqtr3d 2866	. . . 4 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)) = ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)))
40	39	breq1d 5078	. . 3 ⊢ (𝜑 → (((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶 ↔ ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶))
41		rlimcnp2.b	. . . 4 ⊢ (𝜑 → 𝐵 ⊆ ℝ)
42		1red 10644	. . . 4 ⊢ (𝜑 → 1 ∈ ℝ)
43	22, 41, 42	rlimresb 14924	. . 3 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ⇝𝑟 𝐶 ↔ ((𝑦 ∈ 𝐵 ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶))
44	34, 41	sstrid 3980	. . . 4 ⊢ (𝜑 → (𝐵 ∩ ℝ+) ⊆ ℝ)
45	29, 44, 42	rlimresb 14924	. . 3 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⇝𝑟 𝐶 ↔ ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ↾ (1[,)+∞)) ⇝𝑟 𝐶))
46	40, 43, 45	3bitr4d 313	. 2 ⊢ (𝜑 → ((𝑦 ∈ 𝐵 ↦ 𝑆) ⇝𝑟 𝐶 ↔ (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⇝𝑟 𝐶))
47		inss2 4208	. . . . . . . . . . 11 ⊢ (𝐵 ∩ ℝ+) ⊆ ℝ+
48	47	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 ∩ ℝ+) ⊆ ℝ+)
49	48	sselda 3969	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → 𝑦 ∈ ℝ+)
50	49	rpreccld 12444	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → (1 / 𝑦) ∈ ℝ+)
51	50	rpne0d 12439	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → (1 / 𝑦) ≠ 0)
52	51	neneqd 3023	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → ¬ (1 / 𝑦) = 0)
53	52	iffalsed 4480	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅) = ⦋(1 / 𝑦) / 𝑥⦌𝑅)
54		oveq2 7166	. . . . . . . . . 10 ⊢ (𝑥 = (1 / 𝑦) → (1 / 𝑥) = (1 / (1 / 𝑦)))
55		rpcnne0 12410	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ+ → (𝑦 ∈ ℂ ∧ 𝑦 ≠ 0))
56		recrec 11339	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 0) → (1 / (1 / 𝑦)) = 𝑦)
57	49, 55, 56	3syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → (1 / (1 / 𝑦)) = 𝑦)
58	54, 57	sylan9eqr 2880	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → (1 / 𝑥) = 𝑦)
59	58	eqcomd 2829	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → 𝑦 = (1 / 𝑥))
60		rlimcnp2.s	. . . . . . . 8 ⊢ (𝑦 = (1 / 𝑥) → 𝑆 = 𝑅)
61	59, 60	syl 17	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → 𝑆 = 𝑅)
62	61	eqcomd 2829	. . . . . 6 ⊢ (((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) ∧ 𝑥 = (1 / 𝑦)) → 𝑅 = 𝑆)
63	50, 62	csbied 3921	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → ⦋(1 / 𝑦) / 𝑥⦌𝑅 = 𝑆)
64	53, 63	eqtrd 2858	. . . 4 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅) = 𝑆)
65	64	mpteq2dva 5163	. . 3 ⊢ (𝜑 → (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) = (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆))
66	65	breq1d 5078	. 2 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) ⇝𝑟 𝐶 ↔ (𝑦 ∈ (𝐵 ∩ ℝ+) ↦ 𝑆) ⇝𝑟 𝐶))
67		rlimcnp2.a	. . . 4 ⊢ (𝜑 → 𝐴 ⊆ (0[,)+∞))
68		rlimcnp2.0	. . . 4 ⊢ (𝜑 → 0 ∈ 𝐴)
69		rlimcnp2.c	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ ℂ)
70	69	ad2antrr 724	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ 𝑤 = 0) → 𝐶 ∈ ℂ)
71	67	sselda 3969	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → 𝑤 ∈ (0[,)+∞))
72		0re 10645	. . . . . . . . . . . . 13 ⊢ 0 ∈ ℝ
73		pnfxr 10697	. . . . . . . . . . . . 13 ⊢ +∞ ∈ ℝ*
74		elico2 12803	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ +∞ ∈ ℝ*) → (𝑤 ∈ (0[,)+∞) ↔ (𝑤 ∈ ℝ ∧ 0 ≤ 𝑤 ∧ 𝑤 < +∞)))
75	72, 73, 74	mp2an 690	. . . . . . . . . . . 12 ⊢ (𝑤 ∈ (0[,)+∞) ↔ (𝑤 ∈ ℝ ∧ 0 ≤ 𝑤 ∧ 𝑤 < +∞))
76	71, 75	sylib 220	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (𝑤 ∈ ℝ ∧ 0 ≤ 𝑤 ∧ 𝑤 < +∞))
77	76	simp1d 1138	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → 𝑤 ∈ ℝ)
78	77	adantr 483	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝑤 ∈ ℝ)
79	76	simp2d 1139	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → 0 ≤ 𝑤)
80		leloe 10729	. . . . . . . . . . . . . . 15 ⊢ ((0 ∈ ℝ ∧ 𝑤 ∈ ℝ) → (0 ≤ 𝑤 ↔ (0 < 𝑤 ∨ 0 = 𝑤)))
81	72, 77, 80	sylancr 589	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (0 ≤ 𝑤 ↔ (0 < 𝑤 ∨ 0 = 𝑤)))
82	79, 81	mpbid 234	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (0 < 𝑤 ∨ 0 = 𝑤))
83	82	ord 860	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (¬ 0 < 𝑤 → 0 = 𝑤))
84		eqcom 2830	. . . . . . . . . . . 12 ⊢ (0 = 𝑤 ↔ 𝑤 = 0)
85	83, 84	syl6ib 253	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (¬ 0 < 𝑤 → 𝑤 = 0))
86	85	con1d 147	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (¬ 𝑤 = 0 → 0 < 𝑤))
87	86	imp 409	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 0 < 𝑤)
88	78, 87	elrpd 12431	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝑤 ∈ ℝ+)
89		rpcnne0 12410	. . . . . . . . 9 ⊢ (𝑤 ∈ ℝ+ → (𝑤 ∈ ℂ ∧ 𝑤 ≠ 0))
90		recrec 11339	. . . . . . . . 9 ⊢ ((𝑤 ∈ ℂ ∧ 𝑤 ≠ 0) → (1 / (1 / 𝑤)) = 𝑤)
91	89, 90	syl 17	. . . . . . . 8 ⊢ (𝑤 ∈ ℝ+ → (1 / (1 / 𝑤)) = 𝑤)
92	88, 91	syl 17	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / (1 / 𝑤)) = 𝑤)
93	92	csbeq1d 3889	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅 = ⦋𝑤 / 𝑥⦌𝑅)
94		oveq2 7166	. . . . . . . . 9 ⊢ (𝑦 = (1 / 𝑤) → (1 / 𝑦) = (1 / (1 / 𝑤)))
95	94	csbeq1d 3889	. . . . . . . 8 ⊢ (𝑦 = (1 / 𝑤) → ⦋(1 / 𝑦) / 𝑥⦌𝑅 = ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅)
96	95	eleq1d 2899	. . . . . . 7 ⊢ (𝑦 = (1 / 𝑤) → (⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ ↔ ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅 ∈ ℂ))
97	63, 28	eqeltrd 2915	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝐵 ∩ ℝ+)) → ⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ)
98	97	ralrimiva 3184	. . . . . . . 8 ⊢ (𝜑 → ∀𝑦 ∈ (𝐵 ∩ ℝ+)⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ)
99	98	ad2antrr 724	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ∀𝑦 ∈ (𝐵 ∩ ℝ+)⦋(1 / 𝑦) / 𝑥⦌𝑅 ∈ ℂ)
100		simplr 767	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝑤 ∈ 𝐴)
101		simpll 765	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → 𝜑)
102		eleq1 2902	. . . . . . . . . . . . 13 ⊢ (𝑦 = (1 / 𝑤) → (𝑦 ∈ 𝐵 ↔ (1 / 𝑤) ∈ 𝐵))
103	94	eleq1d 2899	. . . . . . . . . . . . 13 ⊢ (𝑦 = (1 / 𝑤) → ((1 / 𝑦) ∈ 𝐴 ↔ (1 / (1 / 𝑤)) ∈ 𝐴))
104	102, 103	bibi12d 348	. . . . . . . . . . . 12 ⊢ (𝑦 = (1 / 𝑤) → ((𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴) ↔ ((1 / 𝑤) ∈ 𝐵 ↔ (1 / (1 / 𝑤)) ∈ 𝐴)))
105		rlimcnp2.d	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ+) → (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
106	105	ralrimiva 3184	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑦 ∈ ℝ+ (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
107	106	adantr 483	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ∀𝑦 ∈ ℝ+ (𝑦 ∈ 𝐵 ↔ (1 / 𝑦) ∈ 𝐴))
108		rpreccl 12418	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℝ+ → (1 / 𝑤) ∈ ℝ+)
109	108	adantl 484	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (1 / 𝑤) ∈ ℝ+)
110	104, 107, 109	rspcdva 3627	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ((1 / 𝑤) ∈ 𝐵 ↔ (1 / (1 / 𝑤)) ∈ 𝐴))
111	91	adantl 484	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (1 / (1 / 𝑤)) = 𝑤)
112	111	eleq1d 2899	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ((1 / (1 / 𝑤)) ∈ 𝐴 ↔ 𝑤 ∈ 𝐴))
113	110, 112	bitr2d 282	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 ∈ 𝐴 ↔ (1 / 𝑤) ∈ 𝐵))
114	101, 88, 113	syl2anc 586	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (𝑤 ∈ 𝐴 ↔ (1 / 𝑤) ∈ 𝐵))
115	100, 114	mpbid 234	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / 𝑤) ∈ 𝐵)
116	88	rpreccld 12444	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / 𝑤) ∈ ℝ+)
117	115, 116	elind 4173	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → (1 / 𝑤) ∈ (𝐵 ∩ ℝ+))
118	96, 99, 117	rspcdva 3627	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ⦋(1 / (1 / 𝑤)) / 𝑥⦌𝑅 ∈ ℂ)
119	93, 118	eqeltrrd 2916	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐴) ∧ ¬ 𝑤 = 0) → ⦋𝑤 / 𝑥⦌𝑅 ∈ ℂ)
120	70, 119	ifclda 4503	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅) ∈ ℂ)
121	109	biantrud 534	. . . . . 6 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ((1 / 𝑤) ∈ 𝐵 ↔ ((1 / 𝑤) ∈ 𝐵 ∧ (1 / 𝑤) ∈ ℝ+)))
122	113, 121	bitrd 281	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 ∈ 𝐴 ↔ ((1 / 𝑤) ∈ 𝐵 ∧ (1 / 𝑤) ∈ ℝ+)))
123		elin 4171	. . . . 5 ⊢ ((1 / 𝑤) ∈ (𝐵 ∩ ℝ+) ↔ ((1 / 𝑤) ∈ 𝐵 ∧ (1 / 𝑤) ∈ ℝ+))
124	122, 123	syl6bbr 291	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 ∈ 𝐴 ↔ (1 / 𝑤) ∈ (𝐵 ∩ ℝ+)))
125		iftrue 4475	. . . 4 ⊢ (𝑤 = 0 → if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅) = 𝐶)
126		eqeq1 2827	. . . . 5 ⊢ (𝑤 = (1 / 𝑦) → (𝑤 = 0 ↔ (1 / 𝑦) = 0))
127		csbeq1 3888	. . . . 5 ⊢ (𝑤 = (1 / 𝑦) → ⦋𝑤 / 𝑥⦌𝑅 = ⦋(1 / 𝑦) / 𝑥⦌𝑅)
128	126, 127	ifbieq2d 4494	. . . 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 25545	. . 3 ⊢ (𝜑 → ((𝑦 ∈ (𝐵 ∩ ℝ+) ↦ if((1 / 𝑦) = 0, 𝐶, ⦋(1 / 𝑦) / 𝑥⦌𝑅)) ⇝𝑟 𝐶 ↔ (𝑤 ∈ 𝐴 ↦ if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅)) ∈ ((𝐾 CnP 𝐽)‘0)))
132		nfcv 2979	. . . . 5 ⊢ Ⅎ𝑤if(𝑥 = 0, 𝐶, 𝑅)
133		nfv 1915	. . . . . 6 ⊢ Ⅎ𝑥 𝑤 = 0
134		nfcv 2979	. . . . . 6 ⊢ Ⅎ𝑥𝐶
135		nfcsb1v 3909	. . . . . 6 ⊢ Ⅎ𝑥⦋𝑤 / 𝑥⦌𝑅
136	133, 134, 135	nfif 4498	. . . . 5 ⊢ Ⅎ𝑥if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅)
137		eqeq1 2827	. . . . . 6 ⊢ (𝑥 = 𝑤 → (𝑥 = 0 ↔ 𝑤 = 0))
138		csbeq1a 3899	. . . . . 6 ⊢ (𝑥 = 𝑤 → 𝑅 = ⦋𝑤 / 𝑥⦌𝑅)
139	137, 138	ifbieq2d 4494	. . . . 5 ⊢ (𝑥 = 𝑤 → if(𝑥 = 0, 𝐶, 𝑅) = if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅))
140	132, 136, 139	cbvmpt 5169	. . . 4 ⊢ (𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) = (𝑤 ∈ 𝐴 ↦ if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅))
141	140	eleq1i 2905	. . 3 ⊢ ((𝑥 ∈ 𝐴 ↦ if(𝑥 = 0, 𝐶, 𝑅)) ∈ ((𝐾 CnP 𝐽)‘0) ↔ (𝑤 ∈ 𝐴 ↦ if(𝑤 = 0, 𝐶, ⦋𝑤 / 𝑥⦌𝑅)) ∈ ((𝐾 CnP 𝐽)‘0))
142	131, 141	syl6bbr 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 398   ∨ wo 843   ∧ w3a 1083   = wceq 1537   ∈ wcel 2114   ≠ wne 3018  ∀wral 3140  ⦋csb 3885   ∩ cin 3937   ⊆ wss 3938  ifcif 4469   class class class wbr 5068   ↦ cmpt 5148  dom cdm 5557   ↾ cres 5559  Rel wrel 5562   Fn wfn 6352  ⟶wf 6353  ‘cfv 6357  (class class class)co 7158  ℂcc 10537  ℝcr 10538  0cc0 10539  1c1 10540  +∞cpnf 10674  ℝ^*cxr 10676   < clt 10677   ≤ cle 10678   / cdiv 11299  ℝ⁺crp 12392  (,)cioo 12741  [,)cico 12743   ⇝_𝑟 crli 14844   ↾_t crest 16696  TopOpenctopn 16697  ℂ_fldccnfld 20547   CnP ccnp 21835

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 2795  ax-rep 5192  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463  ax-cnex 10595  ax-resscn 10596  ax-1cn 10597  ax-icn 10598  ax-addcl 10599  ax-addrcl 10600  ax-mulcl 10601  ax-mulrcl 10602  ax-mulcom 10603  ax-addass 10604  ax-mulass 10605  ax-distr 10606  ax-i2m1 10607  ax-1ne0 10608  ax-1rid 10609  ax-rnegex 10610  ax-rrecex 10611  ax-cnre 10612  ax-pre-lttri 10613  ax-pre-lttrn 10614  ax-pre-ltadd 10615  ax-pre-mulgt0 10616  ax-pre-sup 10617

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 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-nel 3126  df-ral 3145  df-rex 3146  df-reu 3147  df-rmo 3148  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-pss 3956  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-tp 4574  df-op 4576  df-uni 4841  df-int 4879  df-iun 4923  df-br 5069  df-opab 5131  df-mpt 5149  df-tr 5175  df-id 5462  df-eprel 5467  df-po 5476  df-so 5477  df-fr 5516  df-we 5518  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-pred 6150  df-ord 6196  df-on 6197  df-lim 6198  df-suc 6199  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-riota 7116  df-ov 7161  df-oprab 7162  df-mpo 7163  df-om 7583  df-1st 7691  df-2nd 7692  df-wrecs 7949  df-recs 8010  df-rdg 8048  df-1o 8104  df-oadd 8108  df-er 8291  df-map 8410  df-pm 8411  df-en 8512  df-dom 8513  df-sdom 8514  df-fin 8515  df-sup 8908  df-inf 8909  df-pnf 10679  df-mnf 10680  df-xr 10681  df-ltxr 10682  df-le 10683  df-sub 10874  df-neg 10875  df-div 11300  df-nn 11641  df-2 11703  df-3 11704  df-4 11705  df-5 11706  df-6 11707  df-7 11708  df-8 11709  df-9 11710  df-n0 11901  df-z 11985  df-dec 12102  df-uz 12247  df-q 12352  df-rp 12393  df-xneg 12510  df-xadd 12511  df-xmul 12512  df-ioo 12745  df-ico 12747  df-fz 12896  df-seq 13373  df-exp 13433  df-cj 14460  df-re 14461  df-im 14462  df-sqrt 14596  df-abs 14597  df-rlim 14848  df-struct 16487  df-ndx 16488  df-slot 16489  df-base 16491  df-plusg 16580  df-mulr 16581  df-starv 16582  df-tset 16586  df-ple 16587  df-ds 16589  df-unif 16590  df-rest 16698  df-topn 16699  df-topgen 16719  df-psmet 20539  df-xmet 20540  df-met 20541  df-bl 20542  df-mopn 20543  df-cnfld 20548  df-top 21504  df-topon 21521  df-bases 21556  df-cnp 21838

This theorem is referenced by:  rlimcnp3  25547