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

Theorem metnrmlem2 23929
Description: Lemma for metnrm 23931. (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))
Assertion
Ref Expression
metnrmlem2 (𝜑 → (𝑈𝐽𝑇𝑈))
Distinct variable groups:   𝑥,𝑦,𝑡,𝐷   𝑡,𝐽,𝑦   𝜑,𝑡   𝑡,𝑇,𝑥,𝑦   𝑡,𝑆,𝑥,𝑦   𝑡,𝑋,𝑥,𝑦   𝑡,𝐹
Allowed substitution hints:   𝜑(𝑥,𝑦)   𝑈(𝑥,𝑦,𝑡)   𝐹(𝑥,𝑦)   𝐽(𝑥)

Proof of Theorem metnrmlem2
StepHypRef Expression
1 metnrmlem.u . . 3 𝑈 = 𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2))
2 metnrmlem.1 . . . . 5 (𝜑𝐷 ∈ (∞Met‘𝑋))
3 metdscn.j . . . . . 6 𝐽 = (MetOpen‘𝐷)
43mopntop 23501 . . . . 5 (𝐷 ∈ (∞Met‘𝑋) → 𝐽 ∈ Top)
52, 4syl 17 . . . 4 (𝜑𝐽 ∈ Top)
62adantr 480 . . . . . 6 ((𝜑𝑡𝑇) → 𝐷 ∈ (∞Met‘𝑋))
7 metnrmlem.3 . . . . . . . . 9 (𝜑𝑇 ∈ (Clsd‘𝐽))
8 eqid 2738 . . . . . . . . . 10 𝐽 = 𝐽
98cldss 22088 . . . . . . . . 9 (𝑇 ∈ (Clsd‘𝐽) → 𝑇 𝐽)
107, 9syl 17 . . . . . . . 8 (𝜑𝑇 𝐽)
113mopnuni 23502 . . . . . . . . 9 (𝐷 ∈ (∞Met‘𝑋) → 𝑋 = 𝐽)
122, 11syl 17 . . . . . . . 8 (𝜑𝑋 = 𝐽)
1310, 12sseqtrrd 3958 . . . . . . 7 (𝜑𝑇𝑋)
1413sselda 3917 . . . . . 6 ((𝜑𝑡𝑇) → 𝑡𝑋)
15 metdscn.f . . . . . . . . . 10 𝐹 = (𝑥𝑋 ↦ inf(ran (𝑦𝑆 ↦ (𝑥𝐷𝑦)), ℝ*, < ))
16 metnrmlem.2 . . . . . . . . . 10 (𝜑𝑆 ∈ (Clsd‘𝐽))
17 metnrmlem.4 . . . . . . . . . 10 (𝜑 → (𝑆𝑇) = ∅)
1815, 3, 2, 16, 7, 17metnrmlem1a 23927 . . . . . . . . 9 ((𝜑𝑡𝑇) → (0 < (𝐹𝑡) ∧ if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ∈ ℝ+))
1918simprd 495 . . . . . . . 8 ((𝜑𝑡𝑇) → if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) ∈ ℝ+)
2019rphalfcld 12713 . . . . . . 7 ((𝜑𝑡𝑇) → (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2) ∈ ℝ+)
2120rpxrd 12702 . . . . . 6 ((𝜑𝑡𝑇) → (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2) ∈ ℝ*)
223blopn 23562 . . . . . 6 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑡𝑋 ∧ (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2) ∈ ℝ*) → (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) ∈ 𝐽)
236, 14, 21, 22syl3anc 1369 . . . . 5 ((𝜑𝑡𝑇) → (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) ∈ 𝐽)
2423ralrimiva 3107 . . . 4 (𝜑 → ∀𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) ∈ 𝐽)
25 iunopn 21955 . . . 4 ((𝐽 ∈ Top ∧ ∀𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) ∈ 𝐽) → 𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) ∈ 𝐽)
265, 24, 25syl2anc 583 . . 3 (𝜑 𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) ∈ 𝐽)
271, 26eqeltrid 2843 . 2 (𝜑𝑈𝐽)
28 blcntr 23474 . . . . . . 7 ((𝐷 ∈ (∞Met‘𝑋) ∧ 𝑡𝑋 ∧ (if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2) ∈ ℝ+) → 𝑡 ∈ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
296, 14, 20, 28syl3anc 1369 . . . . . 6 ((𝜑𝑡𝑇) → 𝑡 ∈ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
3029snssd 4739 . . . . 5 ((𝜑𝑡𝑇) → {𝑡} ⊆ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
3130ralrimiva 3107 . . . 4 (𝜑 → ∀𝑡𝑇 {𝑡} ⊆ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
32 ss2iun 4939 . . . 4 (∀𝑡𝑇 {𝑡} ⊆ (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)) → 𝑡𝑇 {𝑡} ⊆ 𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
3331, 32syl 17 . . 3 (𝜑 𝑡𝑇 {𝑡} ⊆ 𝑡𝑇 (𝑡(ball‘𝐷)(if(1 ≤ (𝐹𝑡), 1, (𝐹𝑡)) / 2)))
34 iunid 4986 . . . 4 𝑡𝑇 {𝑡} = 𝑇
3534eqcomi 2747 . . 3 𝑇 = 𝑡𝑇 {𝑡}
3633, 35, 13sstr4g 3962 . 2 (𝜑𝑇𝑈)
3727, 36jca 511 1 (𝜑 → (𝑈𝐽𝑇𝑈))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1539  wcel 2108  wral 3063  cin 3882  wss 3883  c0 4253  ifcif 4456  {csn 4558   cuni 4836   ciun 4921   class class class wbr 5070  cmpt 5153  ran crn 5581  cfv 6418  (class class class)co 7255  infcinf 9130  0cc0 10802  1c1 10803  *cxr 10939   < clt 10940  cle 10941   / cdiv 11562  2c2 11958  +crp 12659  ∞Metcxmet 20495  ballcbl 20497  MetOpencmopn 20500  Topctop 21950  Clsdccld 22075
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879  ax-pre-sup 10880
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-iin 4924  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-er 8456  df-map 8575  df-en 8692  df-dom 8693  df-sdom 8694  df-sup 9131  df-inf 9132  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-div 11563  df-nn 11904  df-2 11966  df-n0 12164  df-z 12250  df-uz 12512  df-q 12618  df-rp 12660  df-xneg 12777  df-xadd 12778  df-xmul 12779  df-icc 13015  df-topgen 17071  df-psmet 20502  df-xmet 20503  df-bl 20505  df-mopn 20506  df-top 21951  df-topon 21968  df-bases 22004  df-cld 22078  df-ntr 22079  df-cls 22080
This theorem is referenced by:  metnrmlem3  23930
  Copyright terms: Public domain W3C validator