Theorem cnrefiisplem 46279

Description: Lemma for cnrefiisp 46280 (some local definitions are used). (Contributed by Glauco Siliprandi, 5-Feb-2022.)

Hypotheses

Ref	Expression
cnrefiisplem.a	⊢ (𝜑 → 𝐴 ∈ ℂ)
cnrefiisplem.n	⊢ (𝜑 → ¬ 𝐴 ∈ ℝ)
cnrefiisplem.b	⊢ (𝜑 → 𝐵 ∈ Fin)
cnrefiisplem.c	⊢ 𝐶 = (ℝ ∪ 𝐵)
cnrefiisplem.d	⊢ 𝐷 = ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
cnrefiisplem.x	⊢ 𝑋 = inf(𝐷, ℝ*, < )

Assertion

Ref	Expression
cnrefiisplem	⊢ (𝜑 → ∃𝑥 ∈ ℝ+ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))))

Distinct variable groups:   𝑦,𝐴,𝑥   𝑦,𝐵   𝑥,𝐶   𝑥,𝑋,𝑦   𝜑,𝑦

Allowed substitution hints:   𝜑(𝑥)   𝐵(𝑥)   𝐶(𝑦)   𝐷(𝑥,𝑦)

Proof of Theorem cnrefiisplem

Dummy variable 𝑤 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → 𝑤 = (abs‘(ℑ‘𝐴)))
2		cnrefiisplem.a	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℂ)
3		cnrefiisplem.n	. . . . . . . . 9 ⊢ (𝜑 → ¬ 𝐴 ∈ ℝ)
4	2, 3	absimnre 45926	. . . . . . . 8 ⊢ (𝜑 → (abs‘(ℑ‘𝐴)) ∈ ℝ+)
5	4	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → (abs‘(ℑ‘𝐴)) ∈ ℝ+)
6	1, 5	eqeltrd 2840	. . . . . 6 ⊢ ((𝜑 ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ℝ+)
7	6	adantlr 721	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ℝ+)
8		simpll 772	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → 𝜑)
9		cnrefiisplem.d	. . . . . . . . . . . 12 ⊢ 𝐷 = ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
10	9	eleq2i 2832	. . . . . . . . . . 11 ⊢ (𝑤 ∈ 𝐷 ↔ 𝑤 ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
11	10	biimpi 217	. . . . . . . . . 10 ⊢ (𝑤 ∈ 𝐷 → 𝑤 ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
12		nelsn 4605	. . . . . . . . . 10 ⊢ (𝑤 ≠ (abs‘(ℑ‘𝐴)) → ¬ 𝑤 ∈ {(abs‘(ℑ‘𝐴))})
13		elunnel1 4091	. . . . . . . . . 10 ⊢ ((𝑤 ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}) ∧ ¬ 𝑤 ∈ {(abs‘(ℑ‘𝐴))}) → 𝑤 ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
14	11, 12, 13	syl2an 602	. . . . . . . . 9 ⊢ ((𝑤 ∈ 𝐷 ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
15		eliun 4932	. . . . . . . . 9 ⊢ (𝑤 ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ↔ ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 ∈ {(abs‘(𝑦 − 𝐴))})
16	14, 15	sylib 219	. . . . . . . 8 ⊢ ((𝑤 ∈ 𝐷 ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 ∈ {(abs‘(𝑦 − 𝐴))})
17		velsn 4578	. . . . . . . . 9 ⊢ (𝑤 ∈ {(abs‘(𝑦 − 𝐴))} ↔ 𝑤 = (abs‘(𝑦 − 𝐴)))
18	17	rexbii 3087	. . . . . . . 8 ⊢ (∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 ∈ {(abs‘(𝑦 − 𝐴))} ↔ ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)))
19	16, 18	sylib 219	. . . . . . 7 ⊢ ((𝑤 ∈ 𝐷 ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)))
20	19	adantll 720	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)))
21		simpr 485	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑤 = (abs‘(𝑦 − 𝐴)))
22		eldifi 4068	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) → 𝑦 ∈ (𝐵 ∩ ℂ))
23	22	elin2d 4141	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) → 𝑦 ∈ ℂ)
24	23	ad2antlr 733	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑦 ∈ ℂ)
25	2	ad2antrr 732	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝐴 ∈ ℂ)
26	24, 25	subcld 11503	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → (𝑦 − 𝐴) ∈ ℂ)
27		eldifsni 4730	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) → 𝑦 ≠ 𝐴)
28	27	ad2antlr 733	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑦 ≠ 𝐴)
29	24, 25, 28	subne0d 11512	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → (𝑦 − 𝐴) ≠ 0)
30	26, 29	absrpcld 15411	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → (abs‘(𝑦 − 𝐴)) ∈ ℝ+)
31	21, 30	eqeltrd 2840	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑤 ∈ ℝ+)
32	31	rexlimdva2 3143	. . . . . 6 ⊢ (𝜑 → (∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)) → 𝑤 ∈ ℝ+))
33	8, 20, 32	sylc 65	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ℝ+)
34	7, 33	pm2.61dane 3022	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐷) → 𝑤 ∈ ℝ+)
35	34	ssd 45535	. . 3 ⊢ (𝜑 → 𝐷 ⊆ ℝ+)
36		cnrefiisplem.x	. . . 4 ⊢ 𝑋 = inf(𝐷, ℝ*, < )
37		xrltso 13090	. . . . . 6 ⊢ < Or ℝ*
38	37	a1i 11	. . . . 5 ⊢ (𝜑 → < Or ℝ*)
39		snfi 8987	. . . . . . . 8 ⊢ {(abs‘(ℑ‘𝐴))} ∈ Fin
40	39	a1i 11	. . . . . . 7 ⊢ (𝜑 → {(abs‘(ℑ‘𝐴))} ∈ Fin)
41		cnrefiisplem.b	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ Fin)
42		inss1 4172	. . . . . . . . . . 11 ⊢ (𝐵 ∩ ℂ) ⊆ 𝐵
43	42	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 ∩ ℂ) ⊆ 𝐵)
44	43	ssdifssd 4084	. . . . . . . . 9 ⊢ (𝜑 → ((𝐵 ∩ ℂ) ∖ {𝐴}) ⊆ 𝐵)
45	41, 44	ssfid 9176	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 ∩ ℂ) ∖ {𝐴}) ∈ Fin)
46		snfi 8987	. . . . . . . . 9 ⊢ {(abs‘(𝑦 − 𝐴))} ∈ Fin
47	46	rgenw 3058	. . . . . . . 8 ⊢ ∀𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin
48		iunfi 9250	. . . . . . . 8 ⊢ ((((𝐵 ∩ ℂ) ∖ {𝐴}) ∈ Fin ∧ ∀𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin) → ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin)
49	45, 47, 48	sylancl 592	. . . . . . 7 ⊢ (𝜑 → ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin)
50	40, 49	unfid 9103	. . . . . 6 ⊢ (𝜑 → ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}) ∈ Fin)
51	9, 50	eqeltrid 2844	. . . . 5 ⊢ (𝜑 → 𝐷 ∈ Fin)
52		fvex 6847	. . . . . . . . . 10 ⊢ (abs‘(ℑ‘𝐴)) ∈ V
53	52	snid 4601	. . . . . . . . 9 ⊢ (abs‘(ℑ‘𝐴)) ∈ {(abs‘(ℑ‘𝐴))}
54		elun1 4118	. . . . . . . . 9 ⊢ ((abs‘(ℑ‘𝐴)) ∈ {(abs‘(ℑ‘𝐴))} → (abs‘(ℑ‘𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
55	53, 54	ax-mp 5	. . . . . . . 8 ⊢ (abs‘(ℑ‘𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
56	55, 9	eleqtrri 2839	. . . . . . 7 ⊢ (abs‘(ℑ‘𝐴)) ∈ 𝐷
57	56	a1i 11	. . . . . 6 ⊢ (𝜑 → (abs‘(ℑ‘𝐴)) ∈ 𝐷)
58	57	ne0d 4277	. . . . 5 ⊢ (𝜑 → 𝐷 ≠ ∅)
59		rpssxr 45930	. . . . . 6 ⊢ ℝ+ ⊆ ℝ*
60	35, 59	sstrdi 3934	. . . . 5 ⊢ (𝜑 → 𝐷 ⊆ ℝ*)
61		fiinfcl 9413	. . . . 5 ⊢ (( < Or ℝ* ∧ (𝐷 ∈ Fin ∧ 𝐷 ≠ ∅ ∧ 𝐷 ⊆ ℝ*)) → inf(𝐷, ℝ*, < ) ∈ 𝐷)
62	38, 51, 58, 60, 61	syl13anc 1380	. . . 4 ⊢ (𝜑 → inf(𝐷, ℝ*, < ) ∈ 𝐷)
63	36, 62	eqeltrid 2844	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
64	35, 63	sseldd 3923	. 2 ⊢ (𝜑 → 𝑋 ∈ ℝ+)
65	35, 62	sseldd 3923	. . . . . . . . . 10 ⊢ (𝜑 → inf(𝐷, ℝ*, < ) ∈ ℝ+)
66	65	rpred 12984	. . . . . . . . 9 ⊢ (𝜑 → inf(𝐷, ℝ*, < ) ∈ ℝ)
67	66	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → inf(𝐷, ℝ*, < ) ∈ ℝ)
68	2	imcld 15155	. . . . . . . . . . 11 ⊢ (𝜑 → (ℑ‘𝐴) ∈ ℝ)
69	68	recnd 11171	. . . . . . . . . 10 ⊢ (𝜑 → (ℑ‘𝐴) ∈ ℂ)
70	69	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (ℑ‘𝐴) ∈ ℂ)
71	70	abscld 15399	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (abs‘(ℑ‘𝐴)) ∈ ℝ)
72		recn 11126	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
73	72	adantl 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
74	2	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝐴 ∈ ℂ)
75	73, 74	subcld 11503	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 − 𝐴) ∈ ℂ)
76	75	abscld 15399	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (abs‘(𝑦 − 𝐴)) ∈ ℝ)
77	60	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝐷 ⊆ ℝ*)
78		infxrlb 13285	. . . . . . . . 9 ⊢ ((𝐷 ⊆ ℝ* ∧ (abs‘(ℑ‘𝐴)) ∈ 𝐷) → inf(𝐷, ℝ*, < ) ≤ (abs‘(ℑ‘𝐴)))
79	77, 56, 78	sylancl 592	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → inf(𝐷, ℝ*, < ) ≤ (abs‘(ℑ‘𝐴)))
80		simpr 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
81	74, 80	absimlere 45929	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (abs‘(ℑ‘𝐴)) ≤ (abs‘(𝑦 − 𝐴)))
82	67, 71, 76, 79, 81	letrd 11301	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → inf(𝐷, ℝ*, < ) ≤ (abs‘(𝑦 − 𝐴)))
83	36, 82	eqbrtrid 5114	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
84	83	ad4ant14 758	. . . . 5 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ ℝ) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
85		cnrefiisplem.c	. . . . . . . . 9 ⊢ 𝐶 = (ℝ ∪ 𝐵)
86	85	eleq2i 2832	. . . . . . . 8 ⊢ (𝑦 ∈ 𝐶 ↔ 𝑦 ∈ (ℝ ∪ 𝐵))
87		elunnel1 4091	. . . . . . . 8 ⊢ ((𝑦 ∈ (ℝ ∪ 𝐵) ∧ ¬ 𝑦 ∈ ℝ) → 𝑦 ∈ 𝐵)
88	86, 87	sylanb 587	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐶 ∧ ¬ 𝑦 ∈ ℝ) → 𝑦 ∈ 𝐵)
89	88	ad4ant24 760	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ ¬ 𝑦 ∈ ℝ) → 𝑦 ∈ 𝐵)
90	60	ad2antrr 732	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → 𝐷 ⊆ ℝ*)
91		simpr 485	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ 𝐵)
92		simpll 772	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ ℂ)
93	91, 92	elind 4136	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ (𝐵 ∩ ℂ))
94		nelsn 4605	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ≠ 𝐴 → ¬ 𝑦 ∈ {𝐴})
95	94	ad2antlr 733	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → ¬ 𝑦 ∈ {𝐴})
96	93, 95	eldifd 3901	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}))
97		fvex 6847	. . . . . . . . . . . . . . 15 ⊢ (abs‘(𝑦 − 𝐴)) ∈ V
98	97	snid 4601	. . . . . . . . . . . . . 14 ⊢ (abs‘(𝑦 − 𝐴)) ∈ {(abs‘(𝑦 − 𝐴))}
99		fvoveq1 7386	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = 𝑦 → (abs‘(𝑤 − 𝐴)) = (abs‘(𝑦 − 𝐴)))
100	99	sneqd 4574	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = 𝑦 → {(abs‘(𝑤 − 𝐴))} = {(abs‘(𝑦 − 𝐴))})
101	100	eliuni 4934	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) ∧ (abs‘(𝑦 − 𝐴)) ∈ {(abs‘(𝑦 − 𝐴))}) → (abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑤 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑤 − 𝐴))})
102	96, 98, 101	sylancl 592	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑤 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑤 − 𝐴))})
103	100	cbviunv 4975	. . . . . . . . . . . . 13 ⊢ ∪ 𝑤 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑤 − 𝐴))} = ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}
104	102, 103	eleqtrdi 2850	. . . . . . . . . . . 12 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
105		elun2 4119	. . . . . . . . . . . 12 ⊢ ((abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} → (abs‘(𝑦 − 𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
106	104, 105	syl 17	. . . . . . . . . . 11 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
107	106, 9	eleqtrrdi 2851	. . . . . . . . . 10 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ 𝐷)
108	107	adantll 720	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ 𝐷)
109		infxrlb 13285	. . . . . . . . 9 ⊢ ((𝐷 ⊆ ℝ* ∧ (abs‘(𝑦 − 𝐴)) ∈ 𝐷) → inf(𝐷, ℝ*, < ) ≤ (abs‘(𝑦 − 𝐴)))
110	90, 108, 109	syl2anc 590	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → inf(𝐷, ℝ*, < ) ≤ (abs‘(𝑦 − 𝐴)))
111	36, 110	eqbrtrid 5114	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
112	111	adantllr 725	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
113	89, 112	syldan 597	. . . . 5 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ ¬ 𝑦 ∈ ℝ) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
114	84, 113	pm2.61dan 818	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
115	114	ex 413	. . 3 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐶) → ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴))))
116	115	ralrimiva 3132	. 2 ⊢ (𝜑 → ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴))))
117		breq1 5082	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑥 ≤ (abs‘(𝑦 − 𝐴)) ↔ 𝑋 ≤ (abs‘(𝑦 − 𝐴))))
118	117	imbi2d 341	. . . 4 ⊢ (𝑥 = 𝑋 → (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))) ↔ ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))))
119	118	ralbidv 3163	. . 3 ⊢ (𝑥 = 𝑋 → (∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))) ↔ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))))
120	119	rspcev 3567	. 2 ⊢ ((𝑋 ∈ ℝ+ ∧ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))) → ∃𝑥 ∈ ℝ+ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))))
121	64, 116, 120	syl2anc 590	1 ⊢ (𝜑 → ∃𝑥 ∈ ℝ+ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 396   = wceq 1547   ∈ wcel 2119   ≠ wne 2935  ∀wral 3054  ∃wrex 3064   ∖ cdif 3887   ∪ cun 3888   ∩ cin 3889   ⊆ wss 3890  ∅c0 4268  {csn 4562  ∪ ciun 4928   class class class wbr 5079   Or wor 5532  ‘cfv 6492  (class class class)co 7363  Fincfn 8890  infcinf 9351  ℂcc 11034  ℝcr 11035  ℝ^*cxr 11176   < clt 11177   ≤ cle 11178   − cmin 11375  ℝ⁺crp 12940  ℑcim 15058  abscabs 15194

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-cnex 11092  ax-resscn 11093  ax-1cn 11094  ax-icn 11095  ax-addcl 11096  ax-addrcl 11097  ax-mulcl 11098  ax-mulrcl 11099  ax-mulcom 11100  ax-addass 11101  ax-mulass 11102  ax-distr 11103  ax-i2m1 11104  ax-1ne0 11105  ax-1rid 11106  ax-rnegex 11107  ax-rrecex 11108  ax-cnre 11109  ax-pre-lttri 11110  ax-pre-lttrn 11111  ax-pre-ltadd 11112  ax-pre-mulgt0 11113  ax-pre-sup 11114

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-nel 3040  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7320  df-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-2nd 7939  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-1o 8402  df-er 8640  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-sup 9352  df-inf 9353  df-pnf 11179  df-mnf 11180  df-xr 11181  df-ltxr 11182  df-le 11183  df-sub 11377  df-neg 11378  df-div 11806  df-nn 12173  df-2 12242  df-3 12243  df-n0 12436  df-z 12523  df-uz 12787  df-rp 12941  df-seq 13962  df-exp 14022  df-cj 15059  df-re 15060  df-im 15061  df-sqrt 15195  df-abs 15196

This theorem is referenced by:  cnrefiisp  46280