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

Theorem metnrmlem1 25126
Description: Lemma for metnrm 25129. (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
StepHypRef Expression
1 1xr 11325 . . 3 1 ∈ ℝ*
2 metnrmlem.1 . . . . . . 7 (𝜑𝐷 ∈ (∞Met‘𝑋))
32adantr 486 . . . . . 6 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝐷 ∈ (∞Met‘𝑋))
4 metnrmlem.2 . . . . . . . . 9 (𝜑𝑆 ∈ (Clsd‘𝐽))
54adantr 486 . . . . . . . 8 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝑆 ∈ (Clsd‘𝐽))
6 eqid 2760 . . . . . . . . 9 𝐽 = 𝐽
76cldss 23294 . . . . . . . 8 (𝑆 ∈ (Clsd‘𝐽) → 𝑆 𝐽)
85, 7syl 18 . . . . . . 7 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝑆 𝐽)
9 metdscn.j . . . . . . . . 9 𝐽 = (MetOpen‘𝐷)
109mopnuni 24707 . . . . . . . 8 (𝐷 ∈ (∞Met‘𝑋) → 𝑋 = 𝐽)
113, 10syl 18 . . . . . . 7 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝑋 = 𝐽)
128, 11sseqtrrd 3968 . . . . . 6 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝑆𝑋)
13 metdscn.f . . . . . . 7 𝐹 = (𝑥𝑋 ↦ inf(ran (𝑦𝑆 ↦ (𝑥𝐷𝑦)), ℝ*, < ))
1413metdsf 25115 . . . . . 6 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) → 𝐹:𝑋⟶(0[,]+∞))
153, 12, 14syl2anc 596 . . . . 5 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝐹:𝑋⟶(0[,]+∞))
16 metnrmlem.3 . . . . . . . . 9 (𝜑𝑇 ∈ (Clsd‘𝐽))
1716adantr 486 . . . . . . . 8 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝑇 ∈ (Clsd‘𝐽))
186cldss 23294 . . . . . . . 8 (𝑇 ∈ (Clsd‘𝐽) → 𝑇 𝐽)
1917, 18syl 18 . . . . . . 7 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝑇 𝐽)
2019, 11sseqtrrd 3968 . . . . . 6 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝑇𝑋)
21 simprr 785 . . . . . 6 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝐵𝑇)
2220, 21sseldd 3932 . . . . 5 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝐵𝑋)
2315, 22ffvelcdmd 7074 . . . 4 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → (𝐹𝐵) ∈ (0[,]+∞))
24 eliccxr 13521 . . . 4 ((𝐹𝐵) ∈ (0[,]+∞) → (𝐹𝐵) ∈ ℝ*)
2523, 24syl 18 . . 3 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → (𝐹𝐵) ∈ ℝ*)
26 ifcl 4528 . . 3 ((1 ∈ ℝ* ∧ (𝐹𝐵) ∈ ℝ*) → if(1 ≤ (𝐹𝐵), 1, (𝐹𝐵)) ∈ ℝ*)
271, 25, 26sylancr 599 . 2 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → if(1 ≤ (𝐹𝐵), 1, (𝐹𝐵)) ∈ ℝ*)
28 simprl 783 . . . 4 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝐴𝑆)
2912, 28sseldd 3932 . . 3 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → 𝐴𝑋)
30 xmetcl 24597 . . 3 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐴𝑋𝐵𝑋) → (𝐴𝐷𝐵) ∈ ℝ*)
313, 29, 22, 30syl3anc 1398 . 2 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → (𝐴𝐷𝐵) ∈ ℝ*)
32 xrmin2 13263 . . 3 ((1 ∈ ℝ* ∧ (𝐹𝐵) ∈ ℝ*) → if(1 ≤ (𝐹𝐵), 1, (𝐹𝐵)) ≤ (𝐹𝐵))
331, 25, 32sylancr 599 . 2 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → if(1 ≤ (𝐹𝐵), 1, (𝐹𝐵)) ≤ (𝐹𝐵))
3413metdstri 25118 . . . 4 (((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋) ∧ (𝐵𝑋𝐴𝑋)) → (𝐹𝐵) ≤ ((𝐵𝐷𝐴) +𝑒 (𝐹𝐴)))
353, 12, 22, 29, 34syl22anc 852 . . 3 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → (𝐹𝐵) ≤ ((𝐵𝐷𝐴) +𝑒 (𝐹𝐴)))
36 xmetsym 24613 . . . . . 6 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝐵𝑋𝐴𝑋) → (𝐵𝐷𝐴) = (𝐴𝐷𝐵))
373, 22, 29, 36syl3anc 1398 . . . . 5 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → (𝐵𝐷𝐴) = (𝐴𝐷𝐵))
3813metds0 25117 . . . . . 6 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑆𝑋𝐴𝑆) → (𝐹𝐴) = 0)
393, 12, 28, 38syl3anc 1398 . . . . 5 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → (𝐹𝐴) = 0)
4037, 39oveq12d 7427 . . . 4 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → ((𝐵𝐷𝐴) +𝑒 (𝐹𝐴)) = ((𝐴𝐷𝐵) +𝑒 0))
4131xaddridd 13328 . . . 4 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → ((𝐴𝐷𝐵) +𝑒 0) = (𝐴𝐷𝐵))
4240, 41eqtrd 2795 . . 3 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → ((𝐵𝐷𝐴) +𝑒 (𝐹𝐴)) = (𝐴𝐷𝐵))
4335, 42breqtrd 5131 . 2 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → (𝐹𝐵) ≤ (𝐴𝐷𝐵))
4427, 25, 31, 33, 43xrletrd 13246 1 ((𝜑 ∧ (𝐴𝑆𝐵𝑇)) → if(1 ≤ (𝐹𝐵), 1, (𝐹𝐵)) ≤ (𝐴𝐷𝐵))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wa 401   = wceq 1570  wcel 2145  cin 3898  wss 3899  c0 4279  ifcif 4482   cuni 4867   class class class wbr 5103  cmpt 5186  ran crn 5649  wf 6524  cfv 6528  (class class class)co 7409  infcinf 9411  0cc0 11157  1c1 11158  +∞cpnf 11297  *cxr 11299   < clt 11300  cle 11301   +𝑒 cxad 13194  [,]cicc 13434  ∞Metcxmet 21610  MetOpencmopn 21615  Clsdccld 23281
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7735  ax-cnex 11213  ax-resscn 11214  ax-1cn 11215  ax-icn 11216  ax-addcl 11217  ax-addrcl 11218  ax-mulcl 11219  ax-mulrcl 11220  ax-mulcom 11221  ax-addass 11222  ax-mulass 11223  ax-distr 11224  ax-i2m1 11225  ax-1ne0 11226  ax-1rid 11227  ax-rnegex 11228  ax-rrecex 11229  ax-cnre 11230  ax-pre-lttri 11231  ax-pre-lttrn 11232  ax-pre-ltadd 11233  ax-pre-mulgt0 11234  ax-pre-sup 11235
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5543  df-eprel 5548  df-po 5556  df-so 5557  df-fr 5601  df-we 5603  df-xp 5654  df-rel 5655  df-cnv 5656  df-co 5657  df-dm 5658  df-rn 5659  df-res 5660  df-ima 5661  df-pred 6294  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6484  df-fun 6530  df-fn 6531  df-f 6532  df-f1 6533  df-fo 6534  df-f1o 6535  df-fv 6536  df-riota 7366  df-ov 7412  df-oprab 7413  df-mpo 7414  df-om 7862  df-1st 7985  df-2nd 7986  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-er 8696  df-ec 8698  df-map 8828  df-en 8953  df-dom 8954  df-sdom 8955  df-sup 9412  df-inf 9413  df-pnf 11302  df-mnf 11303  df-xr 11304  df-ltxr 11305  df-le 11306  df-sub 11500  df-neg 11501  df-div 11929  df-nn 12291  df-2 12360  df-n0 12562  df-z 12649  df-uz 12921  df-q 13031  df-rp 13076  df-xneg 13196  df-xadd 13197  df-xmul 13198  df-icc 13438  df-topgen 17561  df-psmet 21617  df-xmet 21618  df-bl 21620  df-mopn 21621  df-top 23159  df-topon 23176  df-bases 23211  df-cld 23284
This theorem is used by:  metnrmlem3  25128
  Copyright terms: Public domain W3C validator