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 24802

Description: Lemma for metnrm 24805. (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 11189	. . 3 ⊢ 1 ∈ ℝ^*
2		metnrmlem.1	. . . . . . 7 ⊢ (𝜑 → 𝐷 ∈ (∞Met‘𝑋))
3	2	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐷 ∈ (∞Met‘𝑋))
4		metnrmlem.2	. . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ (Clsd‘𝐽))
5	4	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑆 ∈ (Clsd‘𝐽))
6		eqid 2734	. . . . . . . . 9 ⊢ ∪ 𝐽 = ∪ 𝐽
7	6	cldss 22971	. . . . . . . 8 ⊢ (𝑆 ∈ (Clsd‘𝐽) → 𝑆 ⊆ ∪ 𝐽)
8	5, 7	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑆 ⊆ ∪ 𝐽)
9		metdscn.j	. . . . . . . . 9 ⊢ 𝐽 = (MetOpen‘𝐷)
10	9	mopnuni 24383	. . . . . . . 8 ⊢ (𝐷 ∈ (∞Met‘𝑋) → 𝑋 = ∪ 𝐽)
11	3, 10	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑋 = ∪ 𝐽)
12	8, 11	sseqtrrd 3969	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑆 ⊆ 𝑋)
13		metdscn.f	. . . . . . 7 ⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ inf(ran (𝑦 ∈ 𝑆 ↦ (𝑥𝐷𝑦)), ℝ^*, < ))
14	13	metdsf 24791	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋) → 𝐹:𝑋⟶(0[,]+∞))
15	3, 12, 14	syl2anc 584	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐹:𝑋⟶(0[,]+∞))
16		metnrmlem.3	. . . . . . . . 9 ⊢ (𝜑 → 𝑇 ∈ (Clsd‘𝐽))
17	16	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑇 ∈ (Clsd‘𝐽))
18	6	cldss 22971	. . . . . . . 8 ⊢ (𝑇 ∈ (Clsd‘𝐽) → 𝑇 ⊆ ∪ 𝐽)
19	17, 18	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑇 ⊆ ∪ 𝐽)
20	19, 11	sseqtrrd 3969	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑇 ⊆ 𝑋)
21		simprr 772	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐵 ∈ 𝑇)
22	20, 21	sseldd 3932	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐵 ∈ 𝑋)
23	15, 22	ffvelcdmd 7028	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ∈ (0[,]+∞))
24		eliccxr 13349	. . . 4 ⊢ ((𝐹‘𝐵) ∈ (0[,]+∞) → (𝐹‘𝐵) ∈ ℝ^*)
25	23, 24	syl 17	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ∈ ℝ^*)
26		ifcl 4523	. . 3 ⊢ ((1 ∈ ℝ^* ∧ (𝐹‘𝐵) ∈ ℝ^) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ∈ ℝ^)
27	1, 25, 26	sylancr 587	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ∈ ℝ^*)
28		simprl 770	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐴 ∈ 𝑆)
29	12, 28	sseldd 3932	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐴 ∈ 𝑋)
30		xmetcl 24273	. . 3 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐴𝐷𝐵) ∈ ℝ^*)
31	3, 29, 22, 30	syl3anc 1373	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐴𝐷𝐵) ∈ ℝ^*)
32		xrmin2 13091	. . 3 ⊢ ((1 ∈ ℝ^* ∧ (𝐹‘𝐵) ∈ ℝ^*) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐹‘𝐵))
33	1, 25, 32	sylancr 587	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐹‘𝐵))
34	13	metdstri 24794	. . . 4 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋) ∧ (𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋)) → (𝐹‘𝐵) ≤ ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)))
35	3, 12, 22, 29, 34	syl22anc 838	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ≤ ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)))
36		xmetsym 24289	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋) → (𝐵𝐷𝐴) = (𝐴𝐷𝐵))
37	3, 22, 29, 36	syl3anc 1373	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐵𝐷𝐴) = (𝐴𝐷𝐵))
38	13	metds0 24793	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑆) → (𝐹‘𝐴) = 0)
39	3, 12, 28, 38	syl3anc 1373	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐴) = 0)
40	37, 39	oveq12d 7374	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)) = ((𝐴𝐷𝐵) +_𝑒 0))
41	31	xaddridd 13156	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → ((𝐴𝐷𝐵) +_𝑒 0) = (𝐴𝐷𝐵))
42	40, 41	eqtrd 2769	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)) = (𝐴𝐷𝐵))
43	35, 42	breqtrd 5122	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ≤ (𝐴𝐷𝐵))
44	27, 25, 31, 33, 43	xrletrd 13074	1 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐴𝐷𝐵))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1541 ∈ wcel 2113 ∩ cin 3898 ⊆ wss 3899 ∅c0 4283 ifcif 4477 ∪ cuni 4861 class class class wbr 5096 ↦ cmpt 5177 ran crn 5623 ⟶wf 6486 ‘cfv 6490 (class class class)co 7356 infcinf 9342 0cc0 11024 1c1 11025 +∞cpnf 11161 ℝ^*cxr 11163 < clt 11164 ≤ cle 11165 +_𝑒 cxad 13022 [,]cicc 13262 ∞Metcxmet 21292 MetOpencmopn 21297 Clsdccld 22958

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2115 ax-9 2123 ax-10 2146 ax-11 2162 ax-12 2182 ax-ext 2706 ax-sep 5239 ax-nul 5249 ax-pow 5308 ax-pr 5375 ax-un 7678 ax-cnex 11080 ax-resscn 11081 ax-1cn 11082 ax-icn 11083 ax-addcl 11084 ax-addrcl 11085 ax-mulcl 11086 ax-mulrcl 11087 ax-mulcom 11088 ax-addass 11089 ax-mulass 11090 ax-distr 11091 ax-i2m1 11092 ax-1ne0 11093 ax-1rid 11094 ax-rnegex 11095 ax-rrecex 11096 ax-cnre 11097 ax-pre-lttri 11098 ax-pre-lttrn 11099 ax-pre-ltadd 11100 ax-pre-mulgt0 11101 ax-pre-sup 11102

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2537 df-eu 2567 df-clab 2713 df-cleq 2726 df-clel 2809 df-nfc 2883 df-ne 2931 df-nel 3035 df-ral 3050 df-rex 3059 df-rmo 3348 df-reu 3349 df-rab 3398 df-v 3440 df-sbc 3739 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4284 df-if 4478 df-pw 4554 df-sn 4579 df-pr 4581 df-op 4585 df-uni 4862 df-iun 4946 df-br 5097 df-opab 5159 df-mpt 5178 df-tr 5204 df-id 5517 df-eprel 5522 df-po 5530 df-so 5531 df-fr 5575 df-we 5577 df-xp 5628 df-rel 5629 df-cnv 5630 df-co 5631 df-dm 5632 df-rn 5633 df-res 5634 df-ima 5635 df-pred 6257 df-ord 6318 df-on 6319 df-lim 6320 df-suc 6321 df-iota 6446 df-fun 6492 df-fn 6493 df-f 6494 df-f1 6495 df-fo 6496 df-f1o 6497 df-fv 6498 df-riota 7313 df-ov 7359 df-oprab 7360 df-mpo 7361 df-om 7807 df-1st 7931 df-2nd 7932 df-frecs 8221 df-wrecs 8252 df-recs 8301 df-rdg 8339 df-er 8633 df-ec 8635 df-map 8763 df-en 8882 df-dom 8883 df-sdom 8884 df-sup 9343 df-inf 9344 df-pnf 11166 df-mnf 11167 df-xr 11168 df-ltxr 11169 df-le 11170 df-sub 11364 df-neg 11365 df-div 11793 df-nn 12144 df-2 12206 df-n0 12400 df-z 12487 df-uz 12750 df-q 12860 df-rp 12904 df-xneg 13024 df-xadd 13025 df-xmul 13026 df-icc 13266 df-topgen 17361 df-psmet 21299 df-xmet 21300 df-bl 21302 df-mopn 21303 df-top 22836 df-topon 22853 df-bases 22888 df-cld 22961

This theorem is referenced by: metnrmlem3 24804

W3C validator