metnrmlem1 - Metamath Proof Explorer

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

Theorem metnrmlem1 25026

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

**Hypotheses**
Ref	Expression
metdscn.f	⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ inf(ran (𝑦 ∈ 𝑆 ↦ (𝑥𝐷𝑦)), ℝ^*, < ))
metdscn.j	⊢ 𝐽 = (MetOpen‘𝐷)
metnrmlem.1	⊢ (𝜑 → 𝐷 ∈ (∞Met‘𝑋))
metnrmlem.2	⊢ (𝜑 → 𝑆 ∈ (Clsd‘𝐽))
metnrmlem.3	⊢ (𝜑 → 𝑇 ∈ (Clsd‘𝐽))
metnrmlem.4	⊢ (𝜑 → (𝑆 ∩ 𝑇) = ∅)

**Assertion**
Ref	Expression
metnrmlem1	⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐴𝐷𝐵))

Distinct variable groups: 𝑥,𝑦,𝐴 𝑥,𝐷,𝑦 𝑦,𝐽 𝑥,𝐵,𝑦 𝑥,𝑇,𝑦 𝑥,𝑆,𝑦 𝑥,𝑋,𝑦 Allowed substitution hints: 𝜑(𝑥, 𝑦) 𝐹(𝑥, 𝑦) 𝐽(𝑥)

**Proof of Theorem metnrmlem1**
Step	Hyp	Ref	Expression
1		1xr 11272	. . 3 ⊢ 1 ∈ ℝ^*
2		metnrmlem.1	. . . . . . 7 ⊢ (𝜑 → 𝐷 ∈ (∞Met‘𝑋))
3	2	adantr 485	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐷 ∈ (∞Met‘𝑋))
4		metnrmlem.2	. . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ (Clsd‘𝐽))
5	4	adantr 485	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑆 ∈ (Clsd‘𝐽))
6		eqid 2763	. . . . . . . . 9 ⊢ ∪ 𝐽 = ∪ 𝐽
7	6	cldss 23195	. . . . . . . 8 ⊢ (𝑆 ∈ (Clsd‘𝐽) → 𝑆 ⊆ ∪ 𝐽)
8	5, 7	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑆 ⊆ ∪ 𝐽)
9		metdscn.j	. . . . . . . . 9 ⊢ 𝐽 = (MetOpen‘𝐷)
10	9	mopnuni 24607	. . . . . . . 8 ⊢ (𝐷 ∈ (∞Met‘𝑋) → 𝑋 = ∪ 𝐽)
11	3, 10	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑋 = ∪ 𝐽)
12	8, 11	sseqtrrd 3974	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑆 ⊆ 𝑋)
13		metdscn.f	. . . . . . 7 ⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ inf(ran (𝑦 ∈ 𝑆 ↦ (𝑥𝐷𝑦)), ℝ^*, < ))
14	13	metdsf 25015	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋) → 𝐹:𝑋⟶(0[,]+∞))
15	3, 12, 14	syl2anc 595	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐹:𝑋⟶(0[,]+∞))
16		metnrmlem.3	. . . . . . . . 9 ⊢ (𝜑 → 𝑇 ∈ (Clsd‘𝐽))
17	16	adantr 485	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑇 ∈ (Clsd‘𝐽))
18	6	cldss 23195	. . . . . . . 8 ⊢ (𝑇 ∈ (Clsd‘𝐽) → 𝑇 ⊆ ∪ 𝐽)
19	17, 18	syl 18	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑇 ⊆ ∪ 𝐽)
20	19, 11	sseqtrrd 3974	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑇 ⊆ 𝑋)
21		simprr 784	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐵 ∈ 𝑇)
22	20, 21	sseldd 3938	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐵 ∈ 𝑋)
23	15, 22	ffvelcdmd 7080	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ∈ (0[,]+∞))
24		eliccxr 13466	. . . 4 ⊢ ((𝐹‘𝐵) ∈ (0[,]+∞) → (𝐹‘𝐵) ∈ ℝ^*)
25	23, 24	syl 18	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ∈ ℝ^*)
26		ifcl 4533	. . 3 ⊢ ((1 ∈ ℝ^* ∧ (𝐹‘𝐵) ∈ ℝ^) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ∈ ℝ^)
27	1, 25, 26	sylancr 598	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ∈ ℝ^*)
28		simprl 782	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐴 ∈ 𝑆)
29	12, 28	sseldd 3938	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐴 ∈ 𝑋)
30		xmetcl 24497	. . 3 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐴𝐷𝐵) ∈ ℝ^*)
31	3, 29, 22, 30	syl3anc 1398	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐴𝐷𝐵) ∈ ℝ^*)
32		xrmin2 13208	. . 3 ⊢ ((1 ∈ ℝ^* ∧ (𝐹‘𝐵) ∈ ℝ^*) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐹‘𝐵))
33	1, 25, 32	sylancr 598	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐹‘𝐵))
34	13	metdstri 25018	. . . 4 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋) ∧ (𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋)) → (𝐹‘𝐵) ≤ ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)))
35	3, 12, 22, 29, 34	syl22anc 851	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ≤ ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)))
36		xmetsym 24513	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋) → (𝐵𝐷𝐴) = (𝐴𝐷𝐵))
37	3, 22, 29, 36	syl3anc 1398	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐵𝐷𝐴) = (𝐴𝐷𝐵))
38	13	metds0 25017	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑆) → (𝐹‘𝐴) = 0)
39	3, 12, 28, 38	syl3anc 1398	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐴) = 0)
40	37, 39	oveq12d 7428	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)) = ((𝐴𝐷𝐵) +_𝑒 0))
41	31	xaddridd 13273	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → ((𝐴𝐷𝐵) +_𝑒 0) = (𝐴𝐷𝐵))
42	40, 41	eqtrd 2798	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)) = (𝐴𝐷𝐵))
43	35, 42	breqtrd 5137	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ≤ (𝐴𝐷𝐵))
44	27, 25, 31, 33, 43	xrletrd 13191	1 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐴𝐷𝐵))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 400 = wceq 1570 ∈ wcel 2143 ∩ cin 3904 ⊆ wss 3905 ∅c0 4286 ifcif 4487 ∪ cuni 4872 class class class wbr 5109 ↦ cmpt 5192 ran crn 5662 ⟶wf 6532 ‘cfv 6536 (class class class)co 7410 infcinf 9397 0cc0 11104 1c1 11105 +∞cpnf 11244 ℝ^*cxr 11246 < clt 11247 ≤ cle 11248 +_𝑒 cxad 13139 [,]cicc 13379 ∞Metcxmet 21516 MetOpencmopn 21521 Clsdccld 23182

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1825 ax-4 1839 ax-5 1940 ax-6 1997 ax-7 2038 ax-8 2145 ax-9 2153 ax-10 2176 ax-11 2192 ax-12 2213 ax-ext 2735 ax-sep 5257 ax-nul 5269 ax-pow 5336 ax-pr 5404 ax-un 7732 ax-cnex 11160 ax-resscn 11161 ax-1cn 11162 ax-icn 11163 ax-addcl 11164 ax-addrcl 11165 ax-mulcl 11166 ax-mulrcl 11167 ax-mulcom 11168 ax-addass 11169 ax-mulass 11170 ax-distr 11171 ax-i2m1 11172 ax-1ne0 11173 ax-1rid 11174 ax-rnegex 11175 ax-rrecex 11176 ax-cnre 11177 ax-pre-lttri 11178 ax-pre-lttrn 11179 ax-pre-ltadd 11180 ax-pre-mulgt0 11181 ax-pre-sup 11182

This proof depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1810 df-nf 1814 df-sb 2097 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 3369 df-reu 3370 df-rab 3417 df-v 3457 df-sbc 3745 df-csb 3854 df-dif 3908 df-un 3910 df-in 3912 df-ss 3922 df-pss 3925 df-nul 4287 df-if 4488 df-pw 4564 df-sn 4590 df-pr 4592 df-op 4596 df-uni 4873 df-iun 4958 df-br 5110 df-opab 5174 df-mpt 5193 df-tr 5219 df-id 5556 df-eprel 5561 df-po 5569 df-so 5570 df-fr 5614 df-we 5616 df-xp 5667 df-rel 5668 df-cnv 5669 df-co 5670 df-dm 5671 df-rn 5672 df-res 5673 df-ima 5674 df-pred 6302 df-ord 6363 df-on 6364 df-lim 6365 df-suc 6366 df-iota 6492 df-fun 6538 df-fn 6539 df-f 6540 df-f1 6541 df-fo 6542 df-f1o 6543 df-fv 6544 df-riota 7367 df-ov 7413 df-oprab 7414 df-mpo 7415 df-om 7859 df-1st 7982 df-2nd 7983 df-frecs 8274 df-wrecs 8305 df-recs 8354 df-rdg 8393 df-er 8690 df-ec 8692 df-map 8822 df-en 8940 df-dom 8941 df-sdom 8942 df-sup 9398 df-inf 9399 df-pnf 11249 df-mnf 11250 df-xr 11251 df-ltxr 11252 df-le 11253 df-sub 11447 df-neg 11448 df-div 11876 df-nn 12238 df-2 12307 df-n0 12509 df-z 12596 df-uz 12867 df-q 12977 df-rp 13021 df-xneg 13141 df-xadd 13142 df-xmul 13143 df-icc 13383 df-topgen 17500 df-psmet 21523 df-xmet 21524 df-bl 21526 df-mopn 21527 df-top 23060 df-topon 23077 df-bases 23112 df-cld 23185

This theorem is used by: metnrmlem3 25028

W3C validator