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 24825

Description: Lemma for metnrm 24828. (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 11204	. . 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 2736	. . . . . . . . 9 ⊢ ∪ 𝐽 = ∪ 𝐽
7	6	cldss 22994	. . . . . . . 8 ⊢ (𝑆 ∈ (Clsd‘𝐽) → 𝑆 ⊆ ∪ 𝐽)
8	5, 7	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑆 ⊆ ∪ 𝐽)
9		metdscn.j	. . . . . . . . 9 ⊢ 𝐽 = (MetOpen‘𝐷)
10	9	mopnuni 24406	. . . . . . . 8 ⊢ (𝐷 ∈ (∞Met‘𝑋) → 𝑋 = ∪ 𝐽)
11	3, 10	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑋 = ∪ 𝐽)
12	8, 11	sseqtrrd 3959	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑆 ⊆ 𝑋)
13		metdscn.f	. . . . . . 7 ⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ inf(ran (𝑦 ∈ 𝑆 ↦ (𝑥𝐷𝑦)), ℝ^*, < ))
14	13	metdsf 24814	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋) → 𝐹:𝑋⟶(0[,]+∞))
15	3, 12, 14	syl2anc 585	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐹:𝑋⟶(0[,]+∞))
16		metnrmlem.3	. . . . . . . . 9 ⊢ (𝜑 → 𝑇 ∈ (Clsd‘𝐽))
17	16	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑇 ∈ (Clsd‘𝐽))
18	6	cldss 22994	. . . . . . . 8 ⊢ (𝑇 ∈ (Clsd‘𝐽) → 𝑇 ⊆ ∪ 𝐽)
19	17, 18	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑇 ⊆ ∪ 𝐽)
20	19, 11	sseqtrrd 3959	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝑇 ⊆ 𝑋)
21		simprr 773	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐵 ∈ 𝑇)
22	20, 21	sseldd 3922	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐵 ∈ 𝑋)
23	15, 22	ffvelcdmd 7037	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ∈ (0[,]+∞))
24		eliccxr 13388	. . . 4 ⊢ ((𝐹‘𝐵) ∈ (0[,]+∞) → (𝐹‘𝐵) ∈ ℝ^*)
25	23, 24	syl 17	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ∈ ℝ^*)
26		ifcl 4512	. . 3 ⊢ ((1 ∈ ℝ^* ∧ (𝐹‘𝐵) ∈ ℝ^) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ∈ ℝ^)
27	1, 25, 26	sylancr 588	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ∈ ℝ^*)
28		simprl 771	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐴 ∈ 𝑆)
29	12, 28	sseldd 3922	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → 𝐴 ∈ 𝑋)
30		xmetcl 24296	. . 3 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) → (𝐴𝐷𝐵) ∈ ℝ^*)
31	3, 29, 22, 30	syl3anc 1374	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐴𝐷𝐵) ∈ ℝ^*)
32		xrmin2 13130	. . 3 ⊢ ((1 ∈ ℝ^* ∧ (𝐹‘𝐵) ∈ ℝ^*) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐹‘𝐵))
33	1, 25, 32	sylancr 588	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐹‘𝐵))
34	13	metdstri 24817	. . . 4 ⊢ (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋) ∧ (𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋)) → (𝐹‘𝐵) ≤ ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)))
35	3, 12, 22, 29, 34	syl22anc 839	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ≤ ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)))
36		xmetsym 24312	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐵 ∈ 𝑋 ∧ 𝐴 ∈ 𝑋) → (𝐵𝐷𝐴) = (𝐴𝐷𝐵))
37	3, 22, 29, 36	syl3anc 1374	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐵𝐷𝐴) = (𝐴𝐷𝐵))
38	13	metds0 24816	. . . . . 6 ⊢ ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆 ⊆ 𝑋 ∧ 𝐴 ∈ 𝑆) → (𝐹‘𝐴) = 0)
39	3, 12, 28, 38	syl3anc 1374	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐴) = 0)
40	37, 39	oveq12d 7385	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)) = ((𝐴𝐷𝐵) +_𝑒 0))
41	31	xaddridd 13195	. . . 4 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → ((𝐴𝐷𝐵) +_𝑒 0) = (𝐴𝐷𝐵))
42	40, 41	eqtrd 2771	. . 3 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → ((𝐵𝐷𝐴) +_𝑒 (𝐹‘𝐴)) = (𝐴𝐷𝐵))
43	35, 42	breqtrd 5111	. 2 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → (𝐹‘𝐵) ≤ (𝐴𝐷𝐵))
44	27, 25, 31, 33, 43	xrletrd 13113	1 ⊢ ((𝜑 ∧ (𝐴 ∈ 𝑆 ∧ 𝐵 ∈ 𝑇)) → if(1 ≤ (𝐹‘𝐵), 1, (𝐹‘𝐵)) ≤ (𝐴𝐷𝐵))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1542 ∈ wcel 2114 ∩ cin 3888 ⊆ wss 3889 ∅c0 4273 ifcif 4466 ∪ cuni 4850 class class class wbr 5085 ↦ cmpt 5166 ran crn 5632 ⟶wf 6494 ‘cfv 6498 (class class class)co 7367 infcinf 9354 0cc0 11038 1c1 11039 +∞cpnf 11176 ℝ^*cxr 11178 < clt 11179 ≤ cle 11180 +_𝑒 cxad 13061 [,]cicc 13301 ∞Metcxmet 21337 MetOpencmopn 21342 Clsdccld 22981

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 2708 ax-sep 5231 ax-nul 5241 ax-pow 5307 ax-pr 5375 ax-un 7689 ax-cnex 11094 ax-resscn 11095 ax-1cn 11096 ax-icn 11097 ax-addcl 11098 ax-addrcl 11099 ax-mulcl 11100 ax-mulrcl 11101 ax-mulcom 11102 ax-addass 11103 ax-mulass 11104 ax-distr 11105 ax-i2m1 11106 ax-1ne0 11107 ax-1rid 11108 ax-rnegex 11109 ax-rrecex 11110 ax-cnre 11111 ax-pre-lttri 11112 ax-pre-lttrn 11113 ax-pre-ltadd 11114 ax-pre-mulgt0 11115 ax-pre-sup 11116

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 2539 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2811 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3062 df-rmo 3342 df-reu 3343 df-rab 3390 df-v 3431 df-sbc 3729 df-csb 3838 df-dif 3892 df-un 3894 df-in 3896 df-ss 3906 df-pss 3909 df-nul 4274 df-if 4467 df-pw 4543 df-sn 4568 df-pr 4570 df-op 4574 df-uni 4851 df-iun 4935 df-br 5086 df-opab 5148 df-mpt 5167 df-tr 5193 df-id 5526 df-eprel 5531 df-po 5539 df-so 5540 df-fr 5584 df-we 5586 df-xp 5637 df-rel 5638 df-cnv 5639 df-co 5640 df-dm 5641 df-rn 5642 df-res 5643 df-ima 5644 df-pred 6265 df-ord 6326 df-on 6327 df-lim 6328 df-suc 6329 df-iota 6454 df-fun 6500 df-fn 6501 df-f 6502 df-f1 6503 df-fo 6504 df-f1o 6505 df-fv 6506 df-riota 7324 df-ov 7370 df-oprab 7371 df-mpo 7372 df-om 7818 df-1st 7942 df-2nd 7943 df-frecs 8231 df-wrecs 8262 df-recs 8311 df-rdg 8349 df-er 8643 df-ec 8645 df-map 8775 df-en 8894 df-dom 8895 df-sdom 8896 df-sup 9355 df-inf 9356 df-pnf 11181 df-mnf 11182 df-xr 11183 df-ltxr 11184 df-le 11185 df-sub 11379 df-neg 11380 df-div 11808 df-nn 12175 df-2 12244 df-n0 12438 df-z 12525 df-uz 12789 df-q 12899 df-rp 12943 df-xneg 13063 df-xadd 13064 df-xmul 13065 df-icc 13305 df-topgen 17406 df-psmet 21344 df-xmet 21345 df-bl 21347 df-mopn 21348 df-top 22859 df-topon 22876 df-bases 22911 df-cld 22984

This theorem is referenced by: metnrmlem3 24827

W3C validator