Theorem cnrefiisplem 44531

Description: Lemma for cnrefiisp 44532 (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 44173	. . . . . . . 8 ⊢ (𝜑 → (abs‘(ℑ‘𝐴)) ∈ ℝ+)
5	4	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → (abs‘(ℑ‘𝐴)) ∈ ℝ+)
6	1, 5	eqeltrd 2833	. . . . . 6 ⊢ ((𝜑 ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ℝ+)
7	6	adantlr 713	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ℝ+)
8		simpll 765	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → 𝜑)
9		cnrefiisplem.d	. . . . . . . . . . . 12 ⊢ 𝐷 = ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
10	9	eleq2i 2825	. . . . . . . . . . 11 ⊢ (𝑤 ∈ 𝐷 ↔ 𝑤 ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
11	10	biimpi 215	. . . . . . . . . 10 ⊢ (𝑤 ∈ 𝐷 → 𝑤 ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
12		nelsn 4667	. . . . . . . . . 10 ⊢ (𝑤 ≠ (abs‘(ℑ‘𝐴)) → ¬ 𝑤 ∈ {(abs‘(ℑ‘𝐴))})
13		elunnel1 4148	. . . . . . . . . 10 ⊢ ((𝑤 ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}) ∧ ¬ 𝑤 ∈ {(abs‘(ℑ‘𝐴))}) → 𝑤 ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
14	11, 12, 13	syl2an 596	. . . . . . . . 9 ⊢ ((𝑤 ∈ 𝐷 ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
15		eliun 5000	. . . . . . . . 9 ⊢ (𝑤 ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ↔ ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 ∈ {(abs‘(𝑦 − 𝐴))})
16	14, 15	sylib 217	. . . . . . . 8 ⊢ ((𝑤 ∈ 𝐷 ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 ∈ {(abs‘(𝑦 − 𝐴))})
17		velsn 4643	. . . . . . . . 9 ⊢ (𝑤 ∈ {(abs‘(𝑦 − 𝐴))} ↔ 𝑤 = (abs‘(𝑦 − 𝐴)))
18	17	rexbii 3094	. . . . . . . 8 ⊢ (∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 ∈ {(abs‘(𝑦 − 𝐴))} ↔ ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)))
19	16, 18	sylib 217	. . . . . . 7 ⊢ ((𝑤 ∈ 𝐷 ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)))
20	19	adantll 712	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)))
21		simpr 485	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑤 = (abs‘(𝑦 − 𝐴)))
22		eldifi 4125	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) → 𝑦 ∈ (𝐵 ∩ ℂ))
23	22	elin2d 4198	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) → 𝑦 ∈ ℂ)
24	23	ad2antlr 725	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑦 ∈ ℂ)
25	2	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝐴 ∈ ℂ)
26	24, 25	subcld 11567	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → (𝑦 − 𝐴) ∈ ℂ)
27		eldifsni 4792	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) → 𝑦 ≠ 𝐴)
28	27	ad2antlr 725	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑦 ≠ 𝐴)
29	24, 25, 28	subne0d 11576	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → (𝑦 − 𝐴) ≠ 0)
30	26, 29	absrpcld 15391	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → (abs‘(𝑦 − 𝐴)) ∈ ℝ+)
31	21, 30	eqeltrd 2833	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑤 ∈ ℝ+)
32	31	rexlimdva2 3157	. . . . . 6 ⊢ (𝜑 → (∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)) → 𝑤 ∈ ℝ+))
33	8, 20, 32	sylc 65	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ℝ+)
34	7, 33	pm2.61dane 3029	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐷) → 𝑤 ∈ ℝ+)
35	34	ssd 43754	. . 3 ⊢ (𝜑 → 𝐷 ⊆ ℝ+)
36		cnrefiisplem.x	. . . 4 ⊢ 𝑋 = inf(𝐷, ℝ*, < )
37		xrltso 13116	. . . . . 6 ⊢ < Or ℝ*
38	37	a1i 11	. . . . 5 ⊢ (𝜑 → < Or ℝ*)
39		snfi 9040	. . . . . . . 8 ⊢ {(abs‘(ℑ‘𝐴))} ∈ Fin
40	39	a1i 11	. . . . . . 7 ⊢ (𝜑 → {(abs‘(ℑ‘𝐴))} ∈ Fin)
41		cnrefiisplem.b	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ Fin)
42		inss1 4227	. . . . . . . . . . 11 ⊢ (𝐵 ∩ ℂ) ⊆ 𝐵
43	42	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 ∩ ℂ) ⊆ 𝐵)
44	43	ssdifssd 4141	. . . . . . . . 9 ⊢ (𝜑 → ((𝐵 ∩ ℂ) ∖ {𝐴}) ⊆ 𝐵)
45	41, 44	ssfid 9263	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 ∩ ℂ) ∖ {𝐴}) ∈ Fin)
46		snfi 9040	. . . . . . . . 9 ⊢ {(abs‘(𝑦 − 𝐴))} ∈ Fin
47	46	rgenw 3065	. . . . . . . 8 ⊢ ∀𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin
48		iunfi 9336	. . . . . . . 8 ⊢ ((((𝐵 ∩ ℂ) ∖ {𝐴}) ∈ Fin ∧ ∀𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin) → ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin)
49	45, 47, 48	sylancl 586	. . . . . . 7 ⊢ (𝜑 → ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin)
50	40, 49	unfid 43827	. . . . . 6 ⊢ (𝜑 → ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}) ∈ Fin)
51	9, 50	eqeltrid 2837	. . . . 5 ⊢ (𝜑 → 𝐷 ∈ Fin)
52		fvex 6901	. . . . . . . . . 10 ⊢ (abs‘(ℑ‘𝐴)) ∈ V
53	52	snid 4663	. . . . . . . . 9 ⊢ (abs‘(ℑ‘𝐴)) ∈ {(abs‘(ℑ‘𝐴))}
54		elun1 4175	. . . . . . . . 9 ⊢ ((abs‘(ℑ‘𝐴)) ∈ {(abs‘(ℑ‘𝐴))} → (abs‘(ℑ‘𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
55	53, 54	ax-mp 5	. . . . . . . 8 ⊢ (abs‘(ℑ‘𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
56	55, 9	eleqtrri 2832	. . . . . . 7 ⊢ (abs‘(ℑ‘𝐴)) ∈ 𝐷
57	56	a1i 11	. . . . . 6 ⊢ (𝜑 → (abs‘(ℑ‘𝐴)) ∈ 𝐷)
58	57	ne0d 4334	. . . . 5 ⊢ (𝜑 → 𝐷 ≠ ∅)
59		rpssxr 44177	. . . . . 6 ⊢ ℝ+ ⊆ ℝ*
60	35, 59	sstrdi 3993	. . . . 5 ⊢ (𝜑 → 𝐷 ⊆ ℝ*)
61		fiinfcl 9492	. . . . 5 ⊢ (( < Or ℝ* ∧ (𝐷 ∈ Fin ∧ 𝐷 ≠ ∅ ∧ 𝐷 ⊆ ℝ*)) → inf(𝐷, ℝ*, < ) ∈ 𝐷)
62	38, 51, 58, 60, 61	syl13anc 1372	. . . 4 ⊢ (𝜑 → inf(𝐷, ℝ*, < ) ∈ 𝐷)
63	36, 62	eqeltrid 2837	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
64	35, 63	sseldd 3982	. 2 ⊢ (𝜑 → 𝑋 ∈ ℝ+)
65	35, 62	sseldd 3982	. . . . . . . . . 10 ⊢ (𝜑 → inf(𝐷, ℝ*, < ) ∈ ℝ+)
66	65	rpred 13012	. . . . . . . . 9 ⊢ (𝜑 → inf(𝐷, ℝ*, < ) ∈ ℝ)
67	66	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → inf(𝐷, ℝ*, < ) ∈ ℝ)
68	2	imcld 15138	. . . . . . . . . . 11 ⊢ (𝜑 → (ℑ‘𝐴) ∈ ℝ)
69	68	recnd 11238	. . . . . . . . . 10 ⊢ (𝜑 → (ℑ‘𝐴) ∈ ℂ)
70	69	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (ℑ‘𝐴) ∈ ℂ)
71	70	abscld 15379	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (abs‘(ℑ‘𝐴)) ∈ ℝ)
72		recn 11196	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
73	72	adantl 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
74	2	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝐴 ∈ ℂ)
75	73, 74	subcld 11567	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 − 𝐴) ∈ ℂ)
76	75	abscld 15379	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (abs‘(𝑦 − 𝐴)) ∈ ℝ)
77	60	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝐷 ⊆ ℝ*)
78		infxrlb 13309	. . . . . . . . 9 ⊢ ((𝐷 ⊆ ℝ* ∧ (abs‘(ℑ‘𝐴)) ∈ 𝐷) → inf(𝐷, ℝ*, < ) ≤ (abs‘(ℑ‘𝐴)))
79	77, 56, 78	sylancl 586	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → inf(𝐷, ℝ*, < ) ≤ (abs‘(ℑ‘𝐴)))
80		simpr 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
81	74, 80	absimlere 44176	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (abs‘(ℑ‘𝐴)) ≤ (abs‘(𝑦 − 𝐴)))
82	67, 71, 76, 79, 81	letrd 11367	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → inf(𝐷, ℝ*, < ) ≤ (abs‘(𝑦 − 𝐴)))
83	36, 82	eqbrtrid 5182	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
84	83	ad4ant14 750	. . . . 5 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ ℝ) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
85		cnrefiisplem.c	. . . . . . . . 9 ⊢ 𝐶 = (ℝ ∪ 𝐵)
86	85	eleq2i 2825	. . . . . . . 8 ⊢ (𝑦 ∈ 𝐶 ↔ 𝑦 ∈ (ℝ ∪ 𝐵))
87		elunnel1 4148	. . . . . . . 8 ⊢ ((𝑦 ∈ (ℝ ∪ 𝐵) ∧ ¬ 𝑦 ∈ ℝ) → 𝑦 ∈ 𝐵)
88	86, 87	sylanb 581	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐶 ∧ ¬ 𝑦 ∈ ℝ) → 𝑦 ∈ 𝐵)
89	88	ad4ant24 752	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ ¬ 𝑦 ∈ ℝ) → 𝑦 ∈ 𝐵)
90	60	ad2antrr 724	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → 𝐷 ⊆ ℝ*)
91		simpr 485	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ 𝐵)
92		simpll 765	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ ℂ)
93	91, 92	elind 4193	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ (𝐵 ∩ ℂ))
94		nelsn 4667	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ≠ 𝐴 → ¬ 𝑦 ∈ {𝐴})
95	94	ad2antlr 725	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → ¬ 𝑦 ∈ {𝐴})
96	93, 95	eldifd 3958	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}))
97		fvex 6901	. . . . . . . . . . . . . . 15 ⊢ (abs‘(𝑦 − 𝐴)) ∈ V
98	97	snid 4663	. . . . . . . . . . . . . 14 ⊢ (abs‘(𝑦 − 𝐴)) ∈ {(abs‘(𝑦 − 𝐴))}
99		fvoveq1 7428	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = 𝑦 → (abs‘(𝑤 − 𝐴)) = (abs‘(𝑦 − 𝐴)))
100	99	sneqd 4639	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = 𝑦 → {(abs‘(𝑤 − 𝐴))} = {(abs‘(𝑦 − 𝐴))})
101	100	eliuni 5002	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) ∧ (abs‘(𝑦 − 𝐴)) ∈ {(abs‘(𝑦 − 𝐴))}) → (abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑤 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑤 − 𝐴))})
102	96, 98, 101	sylancl 586	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑤 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑤 − 𝐴))})
103	100	cbviunv 5042	. . . . . . . . . . . . 13 ⊢ ∪ 𝑤 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑤 − 𝐴))} = ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}
104	102, 103	eleqtrdi 2843	. . . . . . . . . . . 12 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
105		elun2 4176	. . . . . . . . . . . 12 ⊢ ((abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} → (abs‘(𝑦 − 𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
106	104, 105	syl 17	. . . . . . . . . . 11 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
107	106, 9	eleqtrrdi 2844	. . . . . . . . . 10 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ 𝐷)
108	107	adantll 712	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ 𝐷)
109		infxrlb 13309	. . . . . . . . 9 ⊢ ((𝐷 ⊆ ℝ* ∧ (abs‘(𝑦 − 𝐴)) ∈ 𝐷) → inf(𝐷, ℝ*, < ) ≤ (abs‘(𝑦 − 𝐴)))
110	90, 108, 109	syl2anc 584	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → inf(𝐷, ℝ*, < ) ≤ (abs‘(𝑦 − 𝐴)))
111	36, 110	eqbrtrid 5182	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
112	111	adantllr 717	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
113	89, 112	syldan 591	. . . . 5 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ ¬ 𝑦 ∈ ℝ) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
114	84, 113	pm2.61dan 811	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
115	114	ex 413	. . 3 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐶) → ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴))))
116	115	ralrimiva 3146	. 2 ⊢ (𝜑 → ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴))))
117		breq1 5150	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑥 ≤ (abs‘(𝑦 − 𝐴)) ↔ 𝑋 ≤ (abs‘(𝑦 − 𝐴))))
118	117	imbi2d 340	. . . 4 ⊢ (𝑥 = 𝑋 → (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))) ↔ ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))))
119	118	ralbidv 3177	. . 3 ⊢ (𝑥 = 𝑋 → (∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))) ↔ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))))
120	119	rspcev 3612	. 2 ⊢ ((𝑋 ∈ ℝ+ ∧ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))) → ∃𝑥 ∈ ℝ+ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))))
121	64, 116, 120	syl2anc 584	1 ⊢ (𝜑 → ∃𝑥 ∈ ℝ+ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 396   = wceq 1541   ∈ wcel 2106   ≠ wne 2940  ∀wral 3061  ∃wrex 3070   ∖ cdif 3944   ∪ cun 3945   ∩ cin 3946   ⊆ wss 3947  ∅c0 4321  {csn 4627  ∪ ciun 4996   class class class wbr 5147   Or wor 5586  ‘cfv 6540  (class class class)co 7405  Fincfn 8935  infcinf 9432  ℂcc 11104  ℝcr 11105  ℝ^*cxr 11243   < clt 11244   ≤ cle 11245   − cmin 11440  ℝ⁺crp 12970  ℑcim 15041  abscabs 15177

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-om 7852  df-2nd 7972  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-er 8699  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-sup 9433  df-inf 9434  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-n0 12469  df-z 12555  df-uz 12819  df-rp 12971  df-seq 13963  df-exp 14024  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179

This theorem is referenced by:  cnrefiisp  44532