Theorem cnrefiisplem 46275

Description: Lemma for cnrefiisp 46276 (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 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → 𝑤 = (abs‘(ℑ‘𝐴)))
2		cnrefiisplem.a	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℂ)
3		cnrefiisplem.n	. . . . . . . . 9 ⊢ (𝜑 → ¬ 𝐴 ∈ ℝ)
4	2, 3	absimnre 45922	. . . . . . . 8 ⊢ (𝜑 → (abs‘(ℑ‘𝐴)) ∈ ℝ+)
5	4	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → (abs‘(ℑ‘𝐴)) ∈ ℝ+)
6	1, 5	eqeltrd 2837	. . . . . 6 ⊢ ((𝜑 ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ℝ+)
7	6	adantlr 716	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 = (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ℝ+)
8		simpll 767	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → 𝜑)
9		cnrefiisplem.d	. . . . . . . . . . . 12 ⊢ 𝐷 = ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
10	9	eleq2i 2829	. . . . . . . . . . 11 ⊢ (𝑤 ∈ 𝐷 ↔ 𝑤 ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
11	10	biimpi 216	. . . . . . . . . 10 ⊢ (𝑤 ∈ 𝐷 → 𝑤 ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
12		nelsn 4611	. . . . . . . . . 10 ⊢ (𝑤 ≠ (abs‘(ℑ‘𝐴)) → ¬ 𝑤 ∈ {(abs‘(ℑ‘𝐴))})
13		elunnel1 4095	. . . . . . . . . 10 ⊢ ((𝑤 ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}) ∧ ¬ 𝑤 ∈ {(abs‘(ℑ‘𝐴))}) → 𝑤 ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
14	11, 12, 13	syl2an 597	. . . . . . . . 9 ⊢ ((𝑤 ∈ 𝐷 ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
15		eliun 4938	. . . . . . . . 9 ⊢ (𝑤 ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ↔ ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 ∈ {(abs‘(𝑦 − 𝐴))})
16	14, 15	sylib 218	. . . . . . . 8 ⊢ ((𝑤 ∈ 𝐷 ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 ∈ {(abs‘(𝑦 − 𝐴))})
17		velsn 4584	. . . . . . . . 9 ⊢ (𝑤 ∈ {(abs‘(𝑦 − 𝐴))} ↔ 𝑤 = (abs‘(𝑦 − 𝐴)))
18	17	rexbii 3085	. . . . . . . 8 ⊢ (∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 ∈ {(abs‘(𝑦 − 𝐴))} ↔ ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)))
19	16, 18	sylib 218	. . . . . . 7 ⊢ ((𝑤 ∈ 𝐷 ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)))
20	19	adantll 715	. . . . . 6 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → ∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)))
21		simpr 484	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑤 = (abs‘(𝑦 − 𝐴)))
22		eldifi 4072	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) → 𝑦 ∈ (𝐵 ∩ ℂ))
23	22	elin2d 4146	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) → 𝑦 ∈ ℂ)
24	23	ad2antlr 728	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑦 ∈ ℂ)
25	2	ad2antrr 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝐴 ∈ ℂ)
26	24, 25	subcld 11496	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → (𝑦 − 𝐴) ∈ ℂ)
27		eldifsni 4734	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) → 𝑦 ≠ 𝐴)
28	27	ad2antlr 728	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑦 ≠ 𝐴)
29	24, 25, 28	subne0d 11505	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → (𝑦 − 𝐴) ≠ 0)
30	26, 29	absrpcld 15404	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → (abs‘(𝑦 − 𝐴)) ∈ ℝ+)
31	21, 30	eqeltrd 2837	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})) ∧ 𝑤 = (abs‘(𝑦 − 𝐴))) → 𝑤 ∈ ℝ+)
32	31	rexlimdva2 3141	. . . . . 6 ⊢ (𝜑 → (∃𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴})𝑤 = (abs‘(𝑦 − 𝐴)) → 𝑤 ∈ ℝ+))
33	8, 20, 32	sylc 65	. . . . 5 ⊢ (((𝜑 ∧ 𝑤 ∈ 𝐷) ∧ 𝑤 ≠ (abs‘(ℑ‘𝐴))) → 𝑤 ∈ ℝ+)
34	7, 33	pm2.61dane 3020	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐷) → 𝑤 ∈ ℝ+)
35	34	ssd 45529	. . 3 ⊢ (𝜑 → 𝐷 ⊆ ℝ+)
36		cnrefiisplem.x	. . . 4 ⊢ 𝑋 = inf(𝐷, ℝ*, < )
37		xrltso 13083	. . . . . 6 ⊢ < Or ℝ*
38	37	a1i 11	. . . . 5 ⊢ (𝜑 → < Or ℝ*)
39		snfi 8983	. . . . . . . 8 ⊢ {(abs‘(ℑ‘𝐴))} ∈ Fin
40	39	a1i 11	. . . . . . 7 ⊢ (𝜑 → {(abs‘(ℑ‘𝐴))} ∈ Fin)
41		cnrefiisplem.b	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ Fin)
42		inss1 4178	. . . . . . . . . . 11 ⊢ (𝐵 ∩ ℂ) ⊆ 𝐵
43	42	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (𝐵 ∩ ℂ) ⊆ 𝐵)
44	43	ssdifssd 4088	. . . . . . . . 9 ⊢ (𝜑 → ((𝐵 ∩ ℂ) ∖ {𝐴}) ⊆ 𝐵)
45	41, 44	ssfid 9172	. . . . . . . 8 ⊢ (𝜑 → ((𝐵 ∩ ℂ) ∖ {𝐴}) ∈ Fin)
46		snfi 8983	. . . . . . . . 9 ⊢ {(abs‘(𝑦 − 𝐴))} ∈ Fin
47	46	rgenw 3056	. . . . . . . 8 ⊢ ∀𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin
48		iunfi 9246	. . . . . . . 8 ⊢ ((((𝐵 ∩ ℂ) ∖ {𝐴}) ∈ Fin ∧ ∀𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin) → ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin)
49	45, 47, 48	sylancl 587	. . . . . . 7 ⊢ (𝜑 → ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} ∈ Fin)
50	40, 49	unfid 9099	. . . . . 6 ⊢ (𝜑 → ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}) ∈ Fin)
51	9, 50	eqeltrid 2841	. . . . 5 ⊢ (𝜑 → 𝐷 ∈ Fin)
52		fvex 6847	. . . . . . . . . 10 ⊢ (abs‘(ℑ‘𝐴)) ∈ V
53	52	snid 4607	. . . . . . . . 9 ⊢ (abs‘(ℑ‘𝐴)) ∈ {(abs‘(ℑ‘𝐴))}
54		elun1 4123	. . . . . . . . 9 ⊢ ((abs‘(ℑ‘𝐴)) ∈ {(abs‘(ℑ‘𝐴))} → (abs‘(ℑ‘𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
55	53, 54	ax-mp 5	. . . . . . . 8 ⊢ (abs‘(ℑ‘𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
56	55, 9	eleqtrri 2836	. . . . . . 7 ⊢ (abs‘(ℑ‘𝐴)) ∈ 𝐷
57	56	a1i 11	. . . . . 6 ⊢ (𝜑 → (abs‘(ℑ‘𝐴)) ∈ 𝐷)
58	57	ne0d 4283	. . . . 5 ⊢ (𝜑 → 𝐷 ≠ ∅)
59		rpssxr 45926	. . . . . 6 ⊢ ℝ+ ⊆ ℝ*
60	35, 59	sstrdi 3935	. . . . 5 ⊢ (𝜑 → 𝐷 ⊆ ℝ*)
61		fiinfcl 9409	. . . . 5 ⊢ (( < Or ℝ* ∧ (𝐷 ∈ Fin ∧ 𝐷 ≠ ∅ ∧ 𝐷 ⊆ ℝ*)) → inf(𝐷, ℝ*, < ) ∈ 𝐷)
62	38, 51, 58, 60, 61	syl13anc 1375	. . . 4 ⊢ (𝜑 → inf(𝐷, ℝ*, < ) ∈ 𝐷)
63	36, 62	eqeltrid 2841	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝐷)
64	35, 63	sseldd 3923	. 2 ⊢ (𝜑 → 𝑋 ∈ ℝ+)
65	35, 62	sseldd 3923	. . . . . . . . . 10 ⊢ (𝜑 → inf(𝐷, ℝ*, < ) ∈ ℝ+)
66	65	rpred 12977	. . . . . . . . 9 ⊢ (𝜑 → inf(𝐷, ℝ*, < ) ∈ ℝ)
67	66	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → inf(𝐷, ℝ*, < ) ∈ ℝ)
68	2	imcld 15148	. . . . . . . . . . 11 ⊢ (𝜑 → (ℑ‘𝐴) ∈ ℝ)
69	68	recnd 11164	. . . . . . . . . 10 ⊢ (𝜑 → (ℑ‘𝐴) ∈ ℂ)
70	69	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (ℑ‘𝐴) ∈ ℂ)
71	70	abscld 15392	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (abs‘(ℑ‘𝐴)) ∈ ℝ)
72		recn 11119	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ℂ)
73	72	adantl 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
74	2	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝐴 ∈ ℂ)
75	73, 74	subcld 11496	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 − 𝐴) ∈ ℂ)
76	75	abscld 15392	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (abs‘(𝑦 − 𝐴)) ∈ ℝ)
77	60	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝐷 ⊆ ℝ*)
78		infxrlb 13278	. . . . . . . . 9 ⊢ ((𝐷 ⊆ ℝ* ∧ (abs‘(ℑ‘𝐴)) ∈ 𝐷) → inf(𝐷, ℝ*, < ) ≤ (abs‘(ℑ‘𝐴)))
79	77, 56, 78	sylancl 587	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → inf(𝐷, ℝ*, < ) ≤ (abs‘(ℑ‘𝐴)))
80		simpr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
81	74, 80	absimlere 45925	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (abs‘(ℑ‘𝐴)) ≤ (abs‘(𝑦 − 𝐴)))
82	67, 71, 76, 79, 81	letrd 11294	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → inf(𝐷, ℝ*, < ) ≤ (abs‘(𝑦 − 𝐴)))
83	36, 82	eqbrtrid 5121	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
84	83	ad4ant14 753	. . . . 5 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ ℝ) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
85		cnrefiisplem.c	. . . . . . . . 9 ⊢ 𝐶 = (ℝ ∪ 𝐵)
86	85	eleq2i 2829	. . . . . . . 8 ⊢ (𝑦 ∈ 𝐶 ↔ 𝑦 ∈ (ℝ ∪ 𝐵))
87		elunnel1 4095	. . . . . . . 8 ⊢ ((𝑦 ∈ (ℝ ∪ 𝐵) ∧ ¬ 𝑦 ∈ ℝ) → 𝑦 ∈ 𝐵)
88	86, 87	sylanb 582	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐶 ∧ ¬ 𝑦 ∈ ℝ) → 𝑦 ∈ 𝐵)
89	88	ad4ant24 755	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ ¬ 𝑦 ∈ ℝ) → 𝑦 ∈ 𝐵)
90	60	ad2antrr 727	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → 𝐷 ⊆ ℝ*)
91		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ 𝐵)
92		simpll 767	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ ℂ)
93	91, 92	elind 4141	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ (𝐵 ∩ ℂ))
94		nelsn 4611	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ≠ 𝐴 → ¬ 𝑦 ∈ {𝐴})
95	94	ad2antlr 728	. . . . . . . . . . . . . . 15 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → ¬ 𝑦 ∈ {𝐴})
96	93, 95	eldifd 3901	. . . . . . . . . . . . . 14 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}))
97		fvex 6847	. . . . . . . . . . . . . . 15 ⊢ (abs‘(𝑦 − 𝐴)) ∈ V
98	97	snid 4607	. . . . . . . . . . . . . 14 ⊢ (abs‘(𝑦 − 𝐴)) ∈ {(abs‘(𝑦 − 𝐴))}
99		fvoveq1 7383	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = 𝑦 → (abs‘(𝑤 − 𝐴)) = (abs‘(𝑦 − 𝐴)))
100	99	sneqd 4580	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = 𝑦 → {(abs‘(𝑤 − 𝐴))} = {(abs‘(𝑦 − 𝐴))})
101	100	eliuni 4940	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}) ∧ (abs‘(𝑦 − 𝐴)) ∈ {(abs‘(𝑦 − 𝐴))}) → (abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑤 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑤 − 𝐴))})
102	96, 98, 101	sylancl 587	. . . . . . . . . . . . 13 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑤 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑤 − 𝐴))})
103	100	cbviunv 4982	. . . . . . . . . . . . 13 ⊢ ∪ 𝑤 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑤 − 𝐴))} = ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}
104	102, 103	eleqtrdi 2847	. . . . . . . . . . . 12 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))})
105		elun2 4124	. . . . . . . . . . . 12 ⊢ ((abs‘(𝑦 − 𝐴)) ∈ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))} → (abs‘(𝑦 − 𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
106	104, 105	syl 17	. . . . . . . . . . 11 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ ({(abs‘(ℑ‘𝐴))} ∪ ∪ 𝑦 ∈ ((𝐵 ∩ ℂ) ∖ {𝐴}){(abs‘(𝑦 − 𝐴))}))
107	106, 9	eleqtrrdi 2848	. . . . . . . . . 10 ⊢ (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ 𝐷)
108	107	adantll 715	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → (abs‘(𝑦 − 𝐴)) ∈ 𝐷)
109		infxrlb 13278	. . . . . . . . 9 ⊢ ((𝐷 ⊆ ℝ* ∧ (abs‘(𝑦 − 𝐴)) ∈ 𝐷) → inf(𝐷, ℝ*, < ) ≤ (abs‘(𝑦 − 𝐴)))
110	90, 108, 109	syl2anc 585	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → inf(𝐷, ℝ*, < ) ≤ (abs‘(𝑦 − 𝐴)))
111	36, 110	eqbrtrid 5121	. . . . . . 7 ⊢ (((𝜑 ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
112	111	adantllr 720	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ 𝑦 ∈ 𝐵) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
113	89, 112	syldan 592	. . . . 5 ⊢ ((((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) ∧ ¬ 𝑦 ∈ ℝ) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
114	84, 113	pm2.61dan 813	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐶) ∧ (𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴)) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))
115	114	ex 412	. . 3 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐶) → ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴))))
116	115	ralrimiva 3130	. 2 ⊢ (𝜑 → ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴))))
117		breq1 5089	. . . . 5 ⊢ (𝑥 = 𝑋 → (𝑥 ≤ (abs‘(𝑦 − 𝐴)) ↔ 𝑋 ≤ (abs‘(𝑦 − 𝐴))))
118	117	imbi2d 340	. . . 4 ⊢ (𝑥 = 𝑋 → (((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))) ↔ ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))))
119	118	ralbidv 3161	. . 3 ⊢ (𝑥 = 𝑋 → (∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))) ↔ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))))
120	119	rspcev 3565	. 2 ⊢ ((𝑋 ∈ ℝ+ ∧ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑋 ≤ (abs‘(𝑦 − 𝐴)))) → ∃𝑥 ∈ ℝ+ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))))
121	64, 116, 120	syl2anc 585	1 ⊢ (𝜑 → ∃𝑥 ∈ ℝ+ ∀𝑦 ∈ 𝐶 ((𝑦 ∈ ℂ ∧ 𝑦 ≠ 𝐴) → 𝑥 ≤ (abs‘(𝑦 − 𝐴))))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   = wceq 1542   ∈ wcel 2114   ≠ wne 2933  ∀wral 3052  ∃wrex 3062   ∖ cdif 3887   ∪ cun 3888   ∩ cin 3889   ⊆ wss 3890  ∅c0 4274  {csn 4568  ∪ ciun 4934   class class class wbr 5086   Or wor 5531  ‘cfv 6492  (class class class)co 7360  Fincfn 8886  infcinf 9347  ℂcc 11027  ℝcr 11028  ℝ^*cxr 11169   < clt 11170   ≤ cle 11171   − cmin 11368  ℝ⁺crp 12933  ℑcim 15051  abscabs 15187

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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  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 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-om 7811  df-2nd 7936  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8342  df-1o 8398  df-er 8636  df-en 8887  df-dom 8888  df-sdom 8889  df-fin 8890  df-sup 9348  df-inf 9349  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12166  df-2 12235  df-3 12236  df-n0 12429  df-z 12516  df-uz 12780  df-rp 12934  df-seq 13955  df-exp 14015  df-cj 15052  df-re 15053  df-im 15054  df-sqrt 15188  df-abs 15189

This theorem is referenced by:  cnrefiisp  46276