metnrmlem3 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > metnrmlem3		Structured version Visualization version GIF version

Theorem metnrmlem3 25193

Description: Lemma for metnrm 25194. (Contributed by Mario Carneiro, 14-Jan-2014.) (Revised by Mario Carneiro, 5-Sep-2015.)

**Hypotheses**
Ref	Expression
metdscn.f	⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ inf(ran (𝑦 ∈ 𝑆 ↦ (𝑥𝐷𝑦)), ℝ^*, < ))
metdscn.j	⊢ 𝐽 = (MetOpen‘𝐷)
metnrmlem.1	⊢ (𝜑 → 𝐷 ∈ (∞Met‘𝑋))
metnrmlem.2	⊢ (𝜑 → 𝑆 ∈ (Clsd‘𝐽))
metnrmlem.3	⊢ (𝜑 → 𝑇 ∈ (Clsd‘𝐽))
metnrmlem.4	⊢ (𝜑 → (𝑆 ∩ 𝑇) = ∅)
metnrmlem.u	⊢ 𝑈 = ∪ 𝑡 ∈ 𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))
metnrmlem.g	⊢ 𝐺 = (𝑥 ∈ 𝑋 ↦ inf(ran (𝑦 ∈ 𝑇 ↦ (𝑥𝐷𝑦)), ℝ^*, < ))
metnrmlem.v	⊢ 𝑉 = ∪ 𝑠 ∈ 𝑆 (𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2))

**Assertion**
Ref	Expression
metnrmlem3	⊢ (𝜑 → ∃𝑧 ∈ 𝐽 ∃𝑤 ∈ 𝐽 (𝑆 ⊆ 𝑧 ∧ 𝑇 ⊆ 𝑤 ∧ (𝑧 ∩ 𝑤) = ∅))

Distinct variable groups: 𝑥,𝑤,𝑦,𝑧 𝑡,𝑠,𝑤,𝑥,𝑦,𝑧,𝐷 𝐽,𝑠,𝑡,𝑤,𝑦,𝑧 𝜑,𝑠,𝑡 𝐺,𝑠,𝑡 𝑇,𝑠,𝑡,𝑤,𝑥,𝑦,𝑧 𝑆,𝑠,𝑡,𝑤,𝑥,𝑦,𝑧 𝑈,𝑠,𝑤 𝑋,𝑠,𝑡,𝑤,𝑥,𝑦,𝑧 𝐹,𝑠,𝑡,𝑤,𝑧 𝑤,𝑉,𝑧 Allowed substitution hints: 𝜑(𝑥, 𝑦, 𝑧, 𝑤) 𝑈(𝑥, 𝑦, 𝑧, 𝑡) 𝐹(𝑥, 𝑦) 𝐺(𝑥, 𝑦, 𝑧, 𝑤) 𝐽(𝑥) 𝑉(𝑥, 𝑦, 𝑡, 𝑠)

**Proof of Theorem metnrmlem3**
Step	Hyp	Ref	Expression
1		metnrmlem.g	. . . 4 ⊢ 𝐺 = (𝑥 ∈ 𝑋 ↦ inf(ran (𝑦 ∈ 𝑇 ↦ (𝑥𝐷𝑦)), ℝ^*, < ))
2		metdscn.j	. . . 4 ⊢ 𝐽 = (MetOpen‘𝐷)
3		metnrmlem.1	. . . 4 ⊢ (𝜑 → 𝐷 ∈ (∞Met‘𝑋))
4		metnrmlem.3	. . . 4 ⊢ (𝜑 → 𝑇 ∈ (Clsd‘𝐽))
5		metnrmlem.2	. . . 4 ⊢ (𝜑 → 𝑆 ∈ (Clsd‘𝐽))
6		incom 4108	. . . . 5 ⊢ (𝑇 ∩ 𝑆) = (𝑆 ∩ 𝑇)
7		metnrmlem.4	. . . . 5 ⊢ (𝜑 → (𝑆 ∩ 𝑇) = ∅)
8	6, 7	eqtrid 2810	. . . 4 ⊢ (𝜑 → (𝑇 ∩ 𝑆) = ∅)
9		metnrmlem.v	. . . 4 ⊢ 𝑉 = ∪ 𝑠 ∈ 𝑆 (𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2))
10	1, 2, 3, 4, 5, 8, 9	metnrmlem2 25192	. . 3 ⊢ (𝜑 → (𝑉 ∈ 𝐽 ∧ 𝑆 ⊆ 𝑉))
11	10	simpld 500	. 2 ⊢ (𝜑 → 𝑉 ∈ 𝐽)
12		metdscn.f	. . . 4 ⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ inf(ran (𝑦 ∈ 𝑆 ↦ (𝑥𝐷𝑦)), ℝ^*, < ))
13		metnrmlem.u	. . . 4 ⊢ 𝑈 = ∪ 𝑡 ∈ 𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))
14	12, 2, 3, 5, 4, 7, 13	metnrmlem2 25192	. . 3 ⊢ (𝜑 → (𝑈 ∈ 𝐽 ∧ 𝑇 ⊆ 𝑈))
15	14	simpld 500	. 2 ⊢ (𝜑 → 𝑈 ∈ 𝐽)
16	10	simprd 501	. 2 ⊢ (𝜑 → 𝑆 ⊆ 𝑉)
17	14	simprd 501	. 2 ⊢ (𝜑 → 𝑇 ⊆ 𝑈)
18	9	ineq1i 4115	. . . 4 ⊢ (𝑉 ∩ 𝑈) = (∪ 𝑠 ∈ 𝑆 (𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈)
19		iunin1 5032	. . . 4 ⊢ ∪ 𝑠 ∈ 𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) = (∪ 𝑠 ∈ 𝑆 (𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈)
20	18, 19	eqtr4i 2789	. . 3 ⊢ (𝑉 ∩ 𝑈) = ∪ 𝑠 ∈ 𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈)
21	13	ineq2i 4116	. . . . . . . 8 ⊢ ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) = ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ ∪ 𝑡 ∈ 𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2)))
22		iunin2 5031	. . . . . . . 8 ⊢ ∪ 𝑡 ∈ 𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) = ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ ∪ 𝑡 ∈ 𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2)))
23	21, 22	eqtr4i 2789	. . . . . . 7 ⊢ ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) = ∪ 𝑡 ∈ 𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2)))
24	3	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → 𝐷 ∈ (∞Met‘𝑋))
25		eqid 2763	. . . . . . . . . . . . . . . . 17 ⊢ ∪ 𝐽 = ∪ 𝐽
26	25	cldss 23359	. . . . . . . . . . . . . . . 16 ⊢ (𝑆 ∈ (Clsd‘𝐽) → 𝑆 ⊆ ∪ 𝐽)
27	5, 26	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑆 ⊆ ∪ 𝐽)
28	2	mopnuni 24772	. . . . . . . . . . . . . . . 16 ⊢ (𝐷 ∈ (∞Met‘𝑋) → 𝑋 = ∪ 𝐽)
29	3, 28	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑋 = ∪ 𝐽)
30	27, 29	sseqtrrd 3949	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑆 ⊆ 𝑋)
31	30	sselda 3912	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑆) → 𝑠 ∈ 𝑋)
32	31	adantrr 730	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → 𝑠 ∈ 𝑋)
33	25	cldss 23359	. . . . . . . . . . . . . . . 16 ⊢ (𝑇 ∈ (Clsd‘𝐽) → 𝑇 ⊆ ∪ 𝐽)
34	4, 33	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑇 ⊆ ∪ 𝐽)
35	34, 29	sseqtrrd 3949	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑇 ⊆ 𝑋)
36	35	sselda 3912	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → 𝑡 ∈ 𝑋)
37	36	adantrl 729	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → 𝑡 ∈ 𝑋)
38	1, 2, 3, 4, 5, 8	metnrmlem1a 25190	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑆) → (0 < (𝐺‘𝑠) ∧ if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ∈ ℝ⁺))
39	38	simprd 501	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑆) → if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ∈ ℝ⁺)
40	39	adantrr 730	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ∈ ℝ⁺)
41	40	rphalfcld 13186	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) ∈ ℝ⁺)
42	41	rpxrd 13175	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) ∈ ℝ^*)
43	12, 2, 3, 5, 4, 7	metnrmlem1a 25190	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (0 < (𝐹‘𝑡) ∧ if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ∈ ℝ⁺))
44	43	adantrl 729	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (0 < (𝐹‘𝑡) ∧ if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ∈ ℝ⁺))
45	44	simprd 501	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ∈ ℝ⁺)
46	45	rphalfcld 13186	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2) ∈ ℝ⁺)
47	46	rpxrd 13175	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2) ∈ ℝ^*)
48	40	rpred 13174	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ∈ ℝ)
49	48	rehalfcld 12603	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) ∈ ℝ)
50	45	rpred 13174	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ∈ ℝ)
51	50	rehalfcld 12603	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2) ∈ ℝ)
52	49, 51	rexaddd 13374	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) +_e (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2)) = ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) + (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2)))
53	48	recnd 11347	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ∈ ℂ)
54	50	recnd 11347	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ∈ ℂ)
55		2cnd 12431	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → 2 ∈ ℂ)
56		2ne0 12459	. . . . . . . . . . . . . . . 16 ⊢ 2 ≠ 0
57	56	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → 2 ≠ 0)
58	53, 54, 55, 57	divdird 12141	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2) = ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) + (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2)))
59	52, 58	eqtr4d 2801	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) +_e (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2)) = ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2))
60	1, 2, 3, 4, 5, 8	metnrmlem1 25191	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (𝑡 ∈ 𝑇 ∧ 𝑠 ∈ 𝑆)) → if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ≤ (𝑡𝐷𝑠))
61	60	ancom2s 663	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ≤ (𝑡𝐷𝑠))
62		xmetsym 24678	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑡 ∈ 𝑋 ∧ 𝑠 ∈ 𝑋) → (𝑡𝐷𝑠) = (𝑠𝐷𝑡))
63	24, 37, 32, 62	syl3anc 1398	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (𝑡𝐷𝑠) = (𝑠𝐷𝑡))
64	61, 63	breqtrd 5133	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ≤ (𝑠𝐷𝑡))
65	12, 2, 3, 5, 4, 7	metnrmlem1 25191	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ≤ (𝑠𝐷𝑡))
66	40	rpxrd 13175	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ∈ ℝ^*)
67	45	rpxrd 13175	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ∈ ℝ^*)
68		xmetcl 24662	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑠 ∈ 𝑋 ∧ 𝑡 ∈ 𝑋) → (𝑠𝐷𝑡) ∈ ℝ^*)
69	24, 32, 37, 68	syl3anc 1398	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (𝑠𝐷𝑡) ∈ ℝ^*)
70		xle2add 13399	. . . . . . . . . . . . . . . . 17 ⊢ (((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ∈ ℝ^* ∧ if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ∈ ℝ^) ∧ ((𝑠𝐷𝑡) ∈ ℝ^ ∧ (𝑠𝐷𝑡) ∈ ℝ^*)) → ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ≤ (𝑠𝐷𝑡) ∧ if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ≤ (𝑠𝐷𝑡)) → (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) +_e if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) ≤ ((𝑠𝐷𝑡) +_e (𝑠𝐷𝑡))))
71	66, 67, 69, 69, 70	syl22anc 852	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) ≤ (𝑠𝐷𝑡) ∧ if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) ≤ (𝑠𝐷𝑡)) → (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) +_e if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) ≤ ((𝑠𝐷𝑡) +_e (𝑠𝐷𝑡))))
72	64, 65, 71	mp2and 712	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) +_e if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) ≤ ((𝑠𝐷𝑡) +_e (𝑠𝐷𝑡)))
73	48, 50	readdcld 11348	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) ∈ ℝ)
74	73	recnd 11347	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) ∈ ℂ)
75	74, 55, 57	divcan2d 12105	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (2 · ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2)) = (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))))
76		2re 12427	. . . . . . . . . . . . . . . . 17 ⊢ 2 ∈ ℝ
77	73	rehalfcld 12603	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2) ∈ ℝ)
78		rexmul 13411	. . . . . . . . . . . . . . . . 17 ⊢ ((2 ∈ ℝ ∧ ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2) ∈ ℝ) → (2 ·_e ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2)) = (2 · ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2)))
79	76, 77, 78	sylancr 599	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (2 ·_e ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2)) = (2 · ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2)))
80	48, 50	rexaddd 13374	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) +_e if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) = (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))))
81	75, 79, 80	3eqtr4d 2808	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (2 ·_e ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2)) = (if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) +_e if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))))
82		x2times 13439	. . . . . . . . . . . . . . . 16 ⊢ ((𝑠𝐷𝑡) ∈ ℝ^* → (2 ·_e (𝑠𝐷𝑡)) = ((𝑠𝐷𝑡) +_e (𝑠𝐷𝑡)))
83	69, 82	syl 18	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (2 ·_e (𝑠𝐷𝑡)) = ((𝑠𝐷𝑡) +_e (𝑠𝐷𝑡)))
84	72, 81, 83	3brtr4d 5139	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (2 ·_e ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2)) ≤ (2 ·_e (𝑠𝐷𝑡)))
85	77	rexrd 11369	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2) ∈ ℝ^*)
86		2rp 13135	. . . . . . . . . . . . . . . 16 ⊢ 2 ∈ ℝ⁺
87	86	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → 2 ∈ ℝ⁺)
88		xlemul2 13431	. . . . . . . . . . . . . . 15 ⊢ ((((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2) ∈ ℝ^* ∧ (𝑠𝐷𝑡) ∈ ℝ^* ∧ 2 ∈ ℝ⁺) → (((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2) ≤ (𝑠𝐷𝑡) ↔ (2 ·_e ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2)) ≤ (2 ·_e (𝑠𝐷𝑡))))
89	85, 69, 87, 88	syl3anc 1398	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → (((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2) ≤ (𝑠𝐷𝑡) ↔ (2 ·_e ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2)) ≤ (2 ·_e (𝑠𝐷𝑡))))
90	84, 89	mpbird 260	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) + if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡))) / 2) ≤ (𝑠𝐷𝑡))
91	59, 90	eqbrtrd 5129	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) +_e (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2)) ≤ (𝑠𝐷𝑡))
92		bldisj 24729	. . . . . . . . . . . 12 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑠 ∈ 𝑋 ∧ 𝑡 ∈ 𝑋) ∧ ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) ∈ ℝ^* ∧ (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2) ∈ ℝ^* ∧ ((if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2) +_e (if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2)) ≤ (𝑠𝐷𝑡))) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) = ∅)
93	24, 32, 37, 42, 47, 91, 92	syl33anc 1412	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) = ∅)
94		eqimss 3970	. . . . . . . . . . 11 ⊢ (((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) = ∅ → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) ⊆ ∅)
95	93, 94	syl 18	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑠 ∈ 𝑆 ∧ 𝑡 ∈ 𝑇)) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) ⊆ ∅)
96	95	anassrs 473	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝑆) ∧ 𝑡 ∈ 𝑇) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) ⊆ ∅)
97	96	ralrimiva 3157	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑆) → ∀𝑡 ∈ 𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) ⊆ ∅)
98		iunss 5005	. . . . . . . 8 ⊢ (∪ 𝑡 ∈ 𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) ⊆ ∅ ↔ ∀𝑡 ∈ 𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) ⊆ ∅)
99	97, 98	sylibr 237	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑆) → ∪ 𝑡 ∈ 𝑇 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹‘𝑡), 1, (𝐹‘𝑡)) / 2))) ⊆ ∅)
100	23, 99	eqsstrid 3950	. . . . . 6 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑆) → ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) ⊆ ∅)
101	100	ralrimiva 3157	. . . . 5 ⊢ (𝜑 → ∀𝑠 ∈ 𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) ⊆ ∅)
102		iunss 5005	. . . . 5 ⊢ (∪ 𝑠 ∈ 𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) ⊆ ∅ ↔ ∀𝑠 ∈ 𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) ⊆ ∅)
103	101, 102	sylibr 237	. . . 4 ⊢ (𝜑 → ∪ 𝑠 ∈ 𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) ⊆ ∅)
104		ss0 4354	. . . 4 ⊢ (∪ 𝑠 ∈ 𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) ⊆ ∅ → ∪ 𝑠 ∈ 𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) = ∅)
105	103, 104	syl 18	. . 3 ⊢ (𝜑 → ∪ 𝑠 ∈ 𝑆 ((𝑠(ball‘𝐷)(if(1 ≤ (𝐺‘𝑠), 1, (𝐺‘𝑠)) / 2)) ∩ 𝑈) = ∅)
106	20, 105	eqtrid 2810	. 2 ⊢ (𝜑 → (𝑉 ∩ 𝑈) = ∅)
107		sseq2 3938	. . . 4 ⊢ (𝑧 = 𝑉 → (𝑆 ⊆ 𝑧 ↔ 𝑆 ⊆ 𝑉))
108		ineq1 4112	. . . . 5 ⊢ (𝑧 = 𝑉 → (𝑧 ∩ 𝑤) = (𝑉 ∩ 𝑤))
109	108	eqeq1d 2765	. . . 4 ⊢ (𝑧 = 𝑉 → ((𝑧 ∩ 𝑤) = ∅ ↔ (𝑉 ∩ 𝑤) = ∅))
110	107, 109	3anbi13d 1466	. . 3 ⊢ (𝑧 = 𝑉 → ((𝑆 ⊆ 𝑧 ∧ 𝑇 ⊆ 𝑤 ∧ (𝑧 ∩ 𝑤) = ∅) ↔ (𝑆 ⊆ 𝑉 ∧ 𝑇 ⊆ 𝑤 ∧ (𝑉 ∩ 𝑤) = ∅)))
111		sseq2 3938	. . . 4 ⊢ (𝑤 = 𝑈 → (𝑇 ⊆ 𝑤 ↔ 𝑇 ⊆ 𝑈))
112		ineq2 4113	. . . . 5 ⊢ (𝑤 = 𝑈 → (𝑉 ∩ 𝑤) = (𝑉 ∩ 𝑈))
113	112	eqeq1d 2765	. . . 4 ⊢ (𝑤 = 𝑈 → ((𝑉 ∩ 𝑤) = ∅ ↔ (𝑉 ∩ 𝑈) = ∅))
114	111, 113	3anbi23d 1467	. . 3 ⊢ (𝑤 = 𝑈 → ((𝑆 ⊆ 𝑉 ∧ 𝑇 ⊆ 𝑤 ∧ (𝑉 ∩ 𝑤) = ∅) ↔ (𝑆 ⊆ 𝑉 ∧ 𝑇 ⊆ 𝑈 ∧ (𝑉 ∩ 𝑈) = ∅)))
115	110, 114	rspc2ev 3591	. 2 ⊢ ((𝑉 ∈ 𝐽 ∧ 𝑈 ∈ 𝐽 ∧ (𝑆 ⊆ 𝑉 ∧ 𝑇 ⊆ 𝑈 ∧ (𝑉 ∩ 𝑈) = ∅)) → ∃𝑧 ∈ 𝐽 ∃𝑤 ∈ 𝐽 (𝑆 ⊆ 𝑧 ∧ 𝑇 ⊆ 𝑤 ∧ (𝑧 ∩ 𝑤) = ∅))
116	11, 15, 16, 17, 106, 115	syl113anc 1409	1 ⊢ (𝜑 → ∃𝑧 ∈ 𝐽 ∃𝑤 ∈ 𝐽 (𝑆 ⊆ 𝑧 ∧ 𝑇 ⊆ 𝑤 ∧ (𝑧 ∩ 𝑤) = ∅))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1569 ∈ wcel 2146 ≠ wne 2958 ∀wral 3079 ∃wrex 3089 ⊆ wss 3899 ∩ cin 4091 ∅c0 4280 ifcif 4484 ∪ cuni 4869 ∪ ciun 4953 class class class wbr 5105 ↦ cmpt 5188 ran crn 5655 ‘cfv 6546 (class class class)co 7427 infcinf 9443 ℝcr 11209 0cc0 11210 1c1 11211 + caddc 11213 · cmul 11215 ℝ^*cxr 11352 < clt 11353 ≤ cle 11354 / cdiv 11983 2c2 12407 ℝ⁺crp 13130 +_e cxad 13249 ·_e cxmu 13250 ∞Metcxmet 21675 ballcbl 21677 MetOpencmopn 21680 Clsdccld 23346

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1944 ax-6 2001 ax-7 2042 ax-8 2148 ax-9 2156 ax-10 2179 ax-11 2196 ax-12 2215 ax-ext 2735 ax-rep 5234 ax-sep 5251 ax-nul 5262 ax-pow 5330 ax-pr 5394 ax-un 7758 ax-cnex 11266 ax-resscn 11267 ax-1cn 11268 ax-icn 11269 ax-addcl 11270 ax-addrcl 11271 ax-mulcl 11272 ax-mulrcl 11273 ax-mulcom 11274 ax-addass 11275 ax-mulass 11276 ax-distr 11277 ax-i2m1 11278 ax-1ne0 11279 ax-1rid 11280 ax-rnegex 11281 ax-rrecex 11282 ax-cnre 11283 ax-pre-lttri 11284 ax-pre-lttrn 11285 ax-pre-ltadd 11286 ax-pre-mulgt0 11287 ax-pre-sup 11288

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2101 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2838 df-nfc 2912 df-ne 2959 df-nel 3065 df-ral 3080 df-rex 3090 df-rmo 3368 df-reu 3369 df-rab 3416 df-v 3455 df-sbc 3742 df-csb 3851 df-ss 3900 df-pss 4016 df-dif 4049 df-in 4093 df-un 4153 df-nul 4281 df-if 4485 df-pw 4561 df-sn 4588 df-pr 4590 df-op 4838 df-uni 4870 df-int 4910 df-iun 4955 df-iin 4956 df-br 5106 df-opab 5170 df-mpt 5189 df-tr 5215 df-id 5549 df-eprel 5554 df-po 5562 df-so 5563 df-fr 5607 df-we 5609 df-xp 5660 df-rel 5661 df-cnv 5662 df-co 5663 df-dm 5664 df-rn 5665 df-res 5666 df-ima 5667 df-pred 6310 df-ord 6371 df-on 6372 df-lim 6373 df-suc 6374 df-iota 6500 df-fun 6548 df-fn 6549 df-f 6550 df-f1 6551 df-fo 6552 df-f1o 6553 df-fv 6554 df-riota 7384 df-ov 7430 df-oprab 7431 df-mpo 7432 df-om 7885 df-1st 8008 df-2nd 8009 df-frecs 8310 df-wrecs 8341 df-recs 8390 df-rdg 8429 df-er 8728 df-ec 8730 df-map 8860 df-en 8985 df-dom 8986 df-sdom 8987 df-sup 9444 df-inf 9445 df-pnf 11355 df-mnf 11356 df-xr 11357 df-ltxr 11358 df-le 11359 df-sub 11553 df-neg 11554 df-div 11984 df-nn 12346 df-2 12415 df-n0 12617 df-z 12704 df-uz 12976 df-q 13086 df-rp 13131 df-xneg 13251 df-xadd 13252 df-xmul 13253 df-icc 13493 df-topgen 17626 df-psmet 21682 df-xmet 21683 df-bl 21685 df-mopn 21686 df-top 23224 df-topon 23241 df-bases 23276 df-cld 23349 df-ntr 23350 df-cls 23351

This theorem is used by: metnrm 25194

W3C validator